Не удается найти %1

← →
chtr © (2003-11-25 10:05) [0]

Что это за ошибка такая (OLEException)?
Выходит в последней строке кода:

procedure TForm1.N8Click(Sender: TObject);
var
fn:string;
begin
con.Close;// con - adoconnection
con.DefaultDatabase:="";
con.Open;
fn:="c:\documents and settings\Вова\Мои документы\1.bkp";
if opendialog1.Execute then fn:=opendialog1.FileName;
runcmd("restore database garantsql from disk = "+quotedstr(fn));//Используется TADOCommand.execute
con.Close;
con.DefaultDatabase:="garantsql";
opentables;//открываются таблички
end;

Если закомментировать Opendialog, все работает. Пробовал открывать таблицы вне этой процедуры, ошибка все равно выходит. Даже не знаю где искать. Что за ошибка???

← →
Anatoly Podgoretsky © (2003-11-25 10:08) [1]

А не двойные ли кавычки требуются?

← →
chtr © (2003-11-25 10:11) [2]

Говорю же, без opendialog, с явным указанием имени файла, все работает на ура.

← →
Reindeer Moss Eater © (2003-11-25 10:12) [3]

Твой OpenDialog меняет текущий каталог родительского процесса

Не удается найти %1 Найти похожие ветки