LabeledEdit'y zapis

Hej
Mam kod do zapisu i odczytu z jednego Edita. Chciałem zrobić aby mi zapisywał do pliku i odczytywał z niego zawartość Labeleditów. Jest ich 15 sztuk. Nie chcę używać Savedialog i Opendialog. Chcę od razu zapisywać. Jak to wykonać? Dla wyrozumiałych wielkie dzięki.

//Zapis edita do pliku

var plik:TextFile;
begin
AssignFile(plik,'costam.txt');
Rewrite(plik);
WriteLn(plik,Edit1.Text);
CloseFile(plik);
end;


//Odczyt

var plik:TextFile;linia:string;
begin
AssignFile(plik,'costam.txt');
Reset(plik);
ReadLn(plik,linia);
Edit1.Text:=linia;
CloseFile(plik);
End;

Nie spotkałem się co prawda z LabelEdit, ale zapewne ma on swoje właściwości - Text albo Caption więc pewnie Tak samo zapisujesz..

I radzę skorzystać czasem z pomocy...

Własnie ja też nie spotkalem się z Label editami, ale z tego co zauważyłem w Twoim kodzie, to chodzi Tobie o zwykłe edity.
Ok, nie wiem, czy powinienem, ale tutaj masz kod do zapisania danych ze wszystkich Editów na formie do pliku. Mam nadzieję, że z odczytem sobie już poradzisz! :)

 plik:='f:\edity.txt';
    assignfile(f,plik);
    rewrite(f);

      for i:=0 to form1.ComponentCount-1 do
      begin
        if (form1.Components[i] is TEdit) then
           writeln(f,(form1.components[i] as Tedit).text);
      end;

    closefile(f);

Nie spotkaliście się? To macie pecha :) LabeledEdit to połączenie komponentów Label i Edit (w skrócie Edit z tytułem, czyli Labelem). Na pewno istnieje od Delphi 6. Znajduje się na palecie Additional.