Непонятки с ShellExecute...

← →
ArchValentin © (2005-01-09 08:41) [0]

Народ, подскажите. Чё за фигня?
Делаю так:

if ShellExecute(h, "open", "C:\Program Files\Odigo\Bin\Odigo.exe", nil, nil, SW_SHOW) < 32 then begin ShowMessage("Немогу выполнить ShellExecute !") end;
Работает!

А так:

edit1.text:="C:\Program Files\Odigo\Bin\Odigo.exe" if ShellExecute(h, "open", PChar(edit1.text), nil, nil, SW_SHOW) < 32 then begin ShowMessage("Немогу выполнить ShellExecute !") end;

Нифига не хочет! Ткните меня носом, где я ошибаюсь.

← →
Fay © (2005-01-09 08:52) [1]

Давай с начала. Что возврашает ShellExecute?

← →
YurikGL © (2005-01-09 14:19) [2]

> if ShellExecute(h, "open", edit1.text, nil, nil,
> SW_SHOW) < 32 then

а так работает?

Кстати, что говорит то?

← →
Kerk © (2005-01-09 14:24) [3]

YurikGL © (09.01.05 14:19) [2]
так не будет компилироваться.

ArchValentin © (09.01.05 8:41)
скажи что возвращает ShellExecute

← →
ArchValentin © (2005-01-09 15:47) [4]

> скажи что возвращает ShellExecute

а говорит оно, многозначительно "2"

← →
Kerk © (2005-01-09 15:53) [5]

ArchValentin © (09.01.05 15:47) [4]
а говорит оно, многозначительно "2"
действительно многозначительно.. и означает оно ERROR_FILE_NOT_FOUND

← →
ArchValentin © (2005-01-10 05:46) [6]

...что невозможно, т.к. всё это распологается на одной форме...

← →
VMcL © (2005-01-10 06:32) [7]

>>ArchValentin © (10.01.05 05:46) [6]

Ну раз невозможно, то медицина тут бессильна.

← →
ArchValentin © (2005-01-10 06:53) [8]

ха, народ, извиняйте, действительно мой косяк, я с именам едитов напутал, всй равно всем спасиба...

ха, народ, извиняйте, действительно мой косяк, я с именам едитов напутал, всй равно всем спасиба... Отсюда вывод, ночью надо спать, а не перед компом зависать :)))

← →
www.Vlad.uk (2005-01-10 11:59) [10]

А как зависнешь-что делать-то будешь?:)))

...путать имена едитов...:)))

Непонятки с ShellExecute... Найти похожие ветки