Elikkä nyt on tullu tehtyä tollanen ''osoitekirja'' Niin miten sen saisi tallentamaan niin, että kun seuraavan kerran sen avaat niin siellä näkyy edellisten kertojen tiedot?
Tallennus....
kysymys......
3
383
Vastaukset
- StringList
StringList sopii moneen (ei ehkä tässä paras mutta tutustumisen arvoinen)
A) Esittelet
private
{ private declarations }
puhluettelo : TStringList;
...
B)Luot
var i : Integer;
begin
puhluettelo := TStringList.Create;
puhluettelo.Add('Matti Niemi = 35821234567');
puhluettelo.Add('Mika Niemi = 3589123456');
...
C) Etsit
puhluettelo.Find('Mika',i);
ShowMessage(puhluettelo[i]);
...
D) Talletat
puhluettelo.SaveToFile('puhtesti.txt');
...
E) Avaat
puhluettelo.LoadFromFile('puhtesti.txt');
..- postisähkö
Listasta näytti loppuosa puuttuvan
joten siinä voisi olla
f. Lasket lukumäärän
j:=puhluettelo.Count;
g. Vapautan sen muistista
puhluettelo.Free;
- StringList
Myös TIniFile sopinee (?)
katso:
http://keskustelu.suomi24.fi/show.fcgi?category=108&conference=4500000000000646&posting=22000000032310619
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
- 1091247
Taas puukotus yläristillä!
Tänään taas puukotettu hengiltä ihminen Kuopiontien läheisyydessä yläristillä! Nyt näitä alkaa olla viikoittain!38965Mitä teillä grillataan juhannuksena? Anna oma vinkkisi grilliherkkuihin
Kesä ja juhannus on grillailun kulta-aikaa. Mitä teillä grillataan juhannuksena? Anna oma vinkkisi grilliherkkuihin. Ka41905- 102878
Ihana juhannusperinne
Lähdemme aina juhannuksena aivan hirveässä kännissä kiikkerällä veneellä pieliselle! Se on hauskaa ja jännittävää puuhaa46717Älä itke rakas.
Tunnen sun kyyneleet silmissäni. Kaikki tulee menemään hyvin. Loppu häämöttää jo...56698Olen päättänyt tappaa itseni tämän vuoden puolella
Minulla ei ole oikeastaan mitään hävittävää. Elämäni on surkeaa ja tunnen ihmisten tuijotukset ja supinat. Ne nauravat r78669Mistä tunnistaa suomussalmelaisen kassajonossa
Terveiset täältä Kuopiosta! Olen aikoinaan Suomussalmelta lähtenyt maailmalle ja muutaman mutkan kautta päätynyt savon s63625- 34606
- 57577