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
384
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
- 1361240
Kauhavan häiriköijistä
Juttua Iltalehdessä. Pakko sanoa että noi nuoret on kyllä ihan pimeitä. Putkin peltoja jupksevat kiusaamaan kun ei tietä34791Tehdäänkö tänään toiveista totta?
Poikkea tänä illasta siinä lähellä ja annetaan silmien puhua ja sen jälkeen puhu sinä lopulta mitä ajattelet..46577- 14570
Miksi Lapset kiusaa yöllä
Miksi Lapset kiusaa yöllä ihmisiä? Miksi vanhemmat antaa tämän tapahtua? Eikö ne huomaa ettei lapset ole kotona vai eivä23512Ajatteletko ollenkaan minua
Naiselle, jonka kanssa vahva tunne yhteydestä. Jota kipeästi kaipaan, mutta jota ei juuri näe. Onko siitä jo kolme vuott29506Haluan sinut, kuuletko minua.
Haluan sinut. Toivon, että voisimme olla yhdessä. Mietin pystynkö täyttämään toiveesi, olemaan arvoisesi. Voisitko saad21465Viimeinen lankafest
Käykää viimeisessä lanka festissä. Ensivuonna sitä ei enää ole. Rahat on loppu. Harmi .14462Sama ransetti taas!
Keikkui tällä kertaa Honkavaaran tien varressa muutaman sadan metrin päässä Louhenkoskelta.. Otin rekisterin ylös ja ver14461- 21447