Подскажите, как сохранить Эдит? и когда этиъ эдитов целая куча...

[Lemontree]

Подскажите, как сохранить Эдит в текстовом виде? и когда этих эдитов целая куча...
У меня прога, в которой куча Эдитов, Лабелов, и прочей прелести...
каким-то образом мне это всё надо сохранить! можно в принципе не в текстовом, но а как подругому?
выручите пожалуйста!

[russian-stalker]

procedure TForm1.Button1Click(Sender: TObject);
var
i:integer;
s:tstringlist;
begin
s:=tstringlist.Create;
for i:=0 to ComponentCount-1 do
begin
if components[i].ClassName='TLabel' then
s.Add((components[i] as tlabel).Caption);
if components[i].ClassName='TEdit' then
s.Add((components[i] as tedit).Text);
s.savetofile(FILENAME);
end;
s.free;
end;

[Lemontree]

на строке s.savetofile(FILENAME); выдает ошибку...
что делать?

[russian-stalker]

FileName Поменяй на свой путь до файла

[Lemontree]

это в смысле как..?=) я дурак...) скажите подробнее плиз...

[dr.Chas]

Подробнее некуда, вот пример:

s.savetofile('C:\имя.txt');

[russian-stalker]

Я ошибся немного. Надо s.Savetofile... написать после End'а