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?
Vastaukset 3
- 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
- 101729
Perhoseni (miehelle)
Miksi et usko, että mun rakkaus sinuun on aitoa ja vilpitöntä? Tai että se oli jo silloin? Miksi ajattelet, ettet ole r1671078Totta on asia. Jeffrey Cohen on jättänyt Sofian.
Vaimon viesti on paljastanut totuuden.262953- 73825
- 63788
- 75741
Mies, näetkö minut myös
Seksuaalisena ihmisenä ja naisena? Haluatko minua seksuaalisesti? Vai olenko mielestäsi tyttönen?22686Kuinkahan monen
Naisen puolisoa olet nainen vikitellyt ja eron aiheuttanut? Toivottavasti karma on ku*sut muroihisi useamman kuin kerran69661Nainen, mitä mieltä olet kodittomista?
Ja heistä jotka eivät kykene huolehtimaan asioistaan, itsestään eikä terveydestään? Miten heidän kanssaan tulisi toimia?138657- 42609
- 62606
Voiko se ikinä toimia
Voiko meistä ikinä tulla mitään? Näin kauan aikaa on kulunut ja mitään ei tapahdu... En usko, että sinä mietit minua het32588Mies, kumman ottaisit mieluummin
176 cm vai 154 cm naisen, jos molemmat muuten yhtä viehättäviä? Mikä on oma pituutesi?120580- 55538
Tekisi mieli vetäistä kunnon jurrit sinun kanssasi
Ja keskustella asiat, ei tästä tule hevonvttua.43535- 48519
- 38509
Anteeksi mies
En jaksa tätä…, en halua, että sinulla on paha mieli tämän takia. Viestiä Sinulle.40503Kerro mies tarinasi
Miksi kaikki meni niinkuin meni? Haluaisin vieläkin ymmärtää. Tuskin saan vastausta häneltä, koska etsin aavikolta juuri20488- 30483