Функция "Сохранить как"

[GibiW]

Добрый день! Предупреждаю, что я новичок и не сильно "шарю" в программировании. Сразу говорю, что рылся в гугле, но именно того что мне нужно не нашел, так что жду вашей помощи. Я написал программу построения графика функции по заданным координатам, как мне сделать функцию "Сохранить как" моих введенных величин? Аналогично "Открыть" то что я сохраню... Заранее спасибо.

[Neeter]

Киньте на форму TOpenDialog и TSaveDialog с закладки Dialogs
А дальше при нажатии на кнопки:

procedure TForm1.bt_SaveClick(Sender: TObject);
var
 t: TextFile;
begin
 if SaveDialog1.Execute then
 begin
  AssignFile(t, SaveDialog1.FileName);
  try
   rewrite(t);
   Writeln(t, IntToStr(x1)); //Тут вместо x1 ввести одно значение
   Writeln(t, IntToStr(x2)); //Ну и так далее записать все значения
   ...
  finally
   CloseFile(t);
  end;
 end;
end;

procedure TForm1.bt_OpenClick(Sender: TObject);
var
 t: TextFile;
 str: string;
begin
 if OpenDialog1.Execute then
 begin
  AssignFile(t, OpenDialog1.FileName);
  try
   reset(t);
   Readln(t, str); 
   x1 := StrToInt(str);
   Readln(t, str); 
   x2 := StrToInt(str); //И так далее, но все значения должны стоять в таком же порядке как и при записи
   ...
  finally
   CloseFile(t);
  end;
 end;
end;

Лучше конечно использовать ini-файлы для этого. Но это другая тема

[GibiW]

Спасибо большое за ответ, сейчас попробую сделать то что вы написали!