memodakileri edite aktarma

[digital_agels]

Arkadaşlar benim aklına txt dosyalarındakini edite aktarma geldi ama bu zor olur sanırım yani şöyle txt dosyanının içindeki 1 satırı mesela edit1'e aktarcam 2. satırını edit2ye aktarcam öyle gidicek bu olurmu bilmem ama bana zor geldi daha kolay yapmak için txt dosyanını memoya aktarıp sonra edite aktarrırsak daha kolay olur sanırım hemde edite yazdıklarımızı programdan çıkarken memoya keydetcek memoda txt dosyasına amacım editler yapıcam o editlerdekiler txt olarak kayıt olucak birtane txt dosyasında sonra edite yazdıklarım txt yazıcam ve okucam
bunu nasıl yapabiliriz memodaki 1. satrı aktarıcam edit1e 2 satrırı edit2 ye böyle gidicek çıkarkende kayıt edicek editlerdekini yardımcı olursanız sevinirim

[mege]

birinci olarak memo kullanmana gerek yok stringlist de dosya açabilir.
stringlist nedir? nasıl kullanılır?

editcreateet fonksiyonunda editin textine giren texti yaz.

Kod: Tümünü seç

var
  MyList:TstringList;
begin
  MyList :=TStringList.Create;
  try
     MyList.loadfromfile('a.txt');
     for i:= 0 do mylist.count {bunu salladım hatırlamıyorum şimdi} do
     begin
        editcreateet(MyList[i]);
     end;
  finally
        MyList.Free;
  end;
end;

[digital_agels]

sağolun eywallah