[VolodinAS]

Код:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19

procedure Tfrm_tmp.btn_browseClick(Sender: TObject); var   dlg: TOpenDialog; begin   dlg := TOpenDialog.Create(nil); //  if fod_main.Execute(Handle) then //  begin //    ledit_path.Text := fod_main.FileName; //  end;     try     dlg.InitialDir := APP_PATH;     dlg.Filter := 'Word 2003|*.doc';     if dlg.Execute(Handle) then       ledit_path.Text := dlg.FileName;   finally     dlg.Free;   end; end;

Выбираю файл:
https://sun9-2.userapi.com/c857236/v...9xehfy5mFs.jpg

Через несколько секунд (не сразу) появляется ошибка:
https://sun9-19.userapi.com/c857236/...o3O7-m8Kdg.jpg

В чем может быть дело?