delphi запись в текстовый файл

Ответ от Jurii[гуру]
Только так:
var
T : Text;
procedure Save(Edit);
begin
WriteLn(T, Edit.Caption);
end;
begin
Assign(T, 'my.ini');
Rewrite(T);
Save(Edit1); Save(Edit2); ...Save(EditN);
Close(T);
end;