Помогите разобраться....
В программе 2 формы.
2ая форма открывает некий файл и выписывает его путь в Edit1.Text
Код:
procedure TForm2.btOpenClick(Sender: TObject);
begin
if opendialog1.execute then
if FileExists(OpenDialog1.FileName) then
Edit1.Text := OpenDialog1.FileName;
OpenDialog1.free;
end;
А первая сохраняет в другой совсем файл совсем другую запись...
procedure TfmMain.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
var
f: TextFile;
begin
Код:
AssignFile(f,'Papka\'+file+'.am');
Rewrite(f); // тут уже коспилятор ругается
пишет ошибку Invalif File Name...
ошибка возникает только после того как я Воспользуюсь Открытием Open Dialog.. если его не трогать то ошибки не будет.. вообще не вижу связи и логики между ними.. в чем причина???
