[VolodinAS]

Код:

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

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

[lmikle]

Ну, напрямую с этим кодом ошибка явно не связана.
Надо смотреть что ты делаешь с этим файлом дальше.
Ну или у тебя стоит какой-то предпросмоторщик, который пытается через Word показать содержимое файла, он запускает Word в невидимом режиме (как OLE-сервер скорее всего), а Word пытается что-то спросить...