![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
ShellExecute под millenium и Win98 [D6, Win95/98, WinME, Win2k]
svs-123456789@mail.ru © (2003-02-04 17:04:00)ShellExecute под w200 и Millenium
- e меня правильно вызывает исполняемую программу
- а под W98 - ShellExecute вызывает ощибку и не может найти файл - хотя путь к нему указан првильно !
(прога скомпилирована под W200)
получается что чкомпилированная программа работает только gjl w2000
svs-123456789@mail.ru (2003-02-05 09:53:00) [1]Приношу Всем свои извинения – писалось под влиянием стресса ..
Проблема в том что ошибка зависит от версии Windows – под одной работает , под другой – нет
procedure ExecuteEXE(ExecutableFile:string; Param:string; Dir:string);
var
hWnd:windows.HWND;
Operation:PChar;
FileName:PChar;
Parameters:PChar;
Directory:PChar;
ShowCmd: Integer;
Handle: HINST;
strTmp:string;
begin
Operation := "";
FileName := PChar(ExecutableFile);
Parameters := PChar(Param);
Directory := PChar(Dir);
ShowCmd := SW_SHOWMAXIMIZED;
Handle:=ShellAPI.ShellExecute(hWnd, Operation, FileName,Parameters, Directory, ShowCmd);
Handle:=ShellAPI.ShellExecute(hWnd, Operation, FileName, Parameters, Directory, ShowCmd);
if Handle<=32 then
begin
strTmp:=IntToStr(Handle);
MessageDlg("ShellExecute("+ExecutableFile+")"13#10+ "Handle="+strTmp, mtError, [mbOK], 0);
end;
end;
Скомпилировано в D6,(OC W2000)
при работе под Win 98 - ShellExecute возвращает код 2 - не найден путь ... (“C:\Plan\Plan.exe” – но путь на всех машинах одинаков )
При работе под ОС Win Millenium и W2000 - все работает правильно
- Может дело в отличающихся shell32.dll
-
Viktor Kushnir (2003-02-05 09:25:00) [2]Рабочий каталог в команде укажи.
Dr.Karter (2003-02-05 09:06:00) [3]Странно компилировал под 2000, а под миллениум работает....
Anatoly Podgoretsky (2003-02-04 18:12:00) [4]Ошибка в 17 строке.
gsu (2003-02-04 18:08:00) [5]Удалено модератором
Примечание: Трепемся в Потрепаться
gsu (2003-02-04 18:05:00) [6]Удалено модератором
Примечание: Трепемся в Потрепаться
Игорь Шевченко (2003-02-04 18:02:00) [7]Мы не телепаты. Это неуважение к форуму.
gsu (2003-02-04 17:24:00) [8]может использовать createprocess ?