Tallennus....

kysymys......

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?

3

384

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • 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;


    Ketjusta on poistettu 0 sääntöjenvastaista viestiä.

    Luetuimmat keskustelut

    1. Keitä täällä on??

      Kertokaa nimenne!! 🤔
      Ikävä
      114
      1148
    2. Tiedät, että en voi enää laittaa viestiä

      Aikaa kulunut. Eikä se näyttäisi enää luontevalta vastata näin pitkän ajan jälkeen. Tiedän myös, että sinä et enää lait
      Ikävä
      89
      864
    3. Nostetaanpas kissa pöydälle: Onko Kuhmossa työpaikkakiusaamista?

      Kuka uskaltaa puhua? Vai uskaltaako kukaan? Naisvaltaisella alalla on kuulemma Kuhmossa ruma tilanne. Mitä aikuiset ede
      Kuhmo
      18
      689
    4. Mitä sanoisit

      juuri nyt kaivatullesi jos uskaltaisit/kehtaisit?
      Ikävä
      74
      664
    5. Tuleeko Martinasta rouva Muhis

      Saako vihdoinkin ne haaveilemansa prinsessa häät Hajjin entinen Muhammad kanssa, 😂 yhteistä heillä on se, että molemmat
      Kotimaiset julkkisjuorut
      276
      655
    6. Mitä hyvää

      Mitä hyvää hän on tuonut elämääsi?
      Ikävä
      82
      629
    7. Ei enää kauaa rakkaani

      Ensin minun pitää saatella narsistit oikeuden eteen ❤️
      Ikävä
      107
      604
    8. Oletko miettinyt sitä

      Että jos meidän persoonat ei sovi yhtään yhteen ;) No onneksi kumpikin on fiksu eikä halua toiselle mitään pahaa.
      Ikävä
      49
      533
    9. Miten näytät / näytit ihastumisesi hänelle?

      Toimiko, miten hän vastasi? vinkki5
      Ikävä
      26
      532
    10. Eipä oo näkyny montakkasn etelänvetelää vielä kylällä.

      Liekkö tuo pensanhinta vetelille liian kallista, kun ovat jeäneet kesäksi kottiinsa vetelehtimmään. Pärjätään iliman vet
      Suomussalmi
      94
      465
    Aihe