Edit.Text till rad i textfil

Nybörjarfråga!

Har två edit-rutor, Edit1.Text och Edit2.Text

Hur gör jag för att spara de två fälten i en textfil, där Edit1.Text kommer på rad ett och Edit2.Text på rad två i textfilen?

...vill hälst inte använda OpenDialog och SaveDialog...

Ett sätt skulle kunna vara att skapa en TStringList. Visst, det kan kännas onödigt, men man får lite 'gratis'.

var
  sl_lista : TStrings;

begin
  try
     sl_lista := TStringList.Create;
     sl_lista.Add( Edit1.Text );
     sl_lista.Add( Edit2.Text );
  
     sl_lista.SaveToFile( 'filnamn.txt' );
  finally
     sl_lista.Free;
  end;
end;

eller så kan du använda:

var
   f : TextFile;
begin
   AssignFile( f, 'filnamn.txt' );
   ReWrite( f );
   
   WriteLn( f, Edit1.Text );
   WriteLn( f, Edit2.Text );
  
   CloseFile( f );
end;

Jag har skrivit kod-snuttarna ur huvet utan att testa, men funkar på ett ungefär i alla fall...