Присвоение имени файлу в диалоге

[Beliyd]

Добрый день всем!
Хочу сохранить массив чисел в файл и сохранить его с помощью savedialog с таким названием какое я пропишу непосредственно в диалоговом окне. С записью в файл проблем нет.. вся проблема именно в присвоении имени файлу!
Подскажите пожалуйста!

[bill]

savedialog1.filename.
Я понимаю что вы хотите это потом открыть и прочитать а имени мы не знаем- вы это хотели сказать? Тогда просто надо имя куда то сохранять. Можно в файл, можно в реестр. А если файл вообще (типизированый) один такой на компе то можно это сделать через поиск.

[Beliyd]

Ну смотрите я создаю файл assignfile(f,fname)
открываю для записи rewrite (f)
вписываю туда чего хочу write(f,ххх)
Закрываю closefile(f)
при нажатии кнопки у меня открывается окно "save" где есть 2 поля одно имя файла а другое расширение
чтобы я не написал в поле имя файла...файл будет с именем fname а я хочу именно в этом поле и давать имя файлу!
вот это как сделать?
у меня получалось это только с мемо Memo1.line.savetofile(opendialog1.f name)

[bill]

 
var
  Form1: TForm1; s:string;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
begin
if savedialog1.Execute then
s:=savedialog1.FileName;
end;
procedure TForm1.Button2Click(Sender: TObject);
var f:textfile;
begin
s:=s+'.txt';
assignfile(f,s);
rewrite(f);
write(f,'asdasd');
closefile(f);
end;
end.