Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.05.16;
Скачать: CL | DM;

Вниз

Popupmenu и ShellExecute   Найти похожие ветки 

 
sensor   (2004-04-29 01:19) [0]

Как мне подружить Popupmenu и ShellExecute. Если программа содержит параметры (типа ping.exe 127.0.0.1) то ShellExecute не работает.
Исходник:
begin
if (Sender is TMenuItem) then
begin
ShellExecute(Form1.handle, nil, PChar(StripHotKey((Sender as TMenuItem).Caption)), nil, nil, SW_ShowNormal);
end;
end;

Параметры должны быть после имени файла в этой функции, но я не могу их туда запихнуть. Кто-нить может знает, как поступить?
Заранее пасиба


 
Юрий Зотов ©   (2004-04-29 10:14) [1]

Просто добавьте в командную строку через пробел. И as не нужно - Вы же уже сделали проверку is, так что Sender уже точно есть TMenuItem и можно пользоваться прямым приведением типа. Такой код получается короче и работает быстрее.

PChar(StripHotKey(TMenuItem(Sender).Caption) +" 127.0.0.1")


 
sensor   (2004-04-29 19:04) [2]

дело в том что я не могу приписать параметр, он у меня в самом меню в одном из содержимых, типа C:\Winnt\system32\ping.exe 127.0.0.1 . Они разные и параметр нельзя отделить, т.е. как то можно, но вот как, что б это заработало?


 
TUser ©   (2004-04-29 19:44) [3]

Читай хелп по ShellExecute. Там есть такой параметр, так и называется - Parametrs


 
Юрий Зотов ©   (2004-04-29 19:48) [4]

Непонятно. Если параметр УЖЕ сидит в Caption, так его и приписывать не нужно. Берете Caption, да и все.

Поясните, что же все-таки требуется, что где сидит и в чем проблема.


 
sensor   (2004-04-29 20:59) [5]


> Непонятно. Если параметр УЖЕ сидит в Caption, так его и
> приписывать не нужно. Берете Caption, да и все.
>
> Поясните, что же все-таки требуется, что где сидит и в чем
> проблема.


в том то и проблема, что все по идее должно работать, но не работает


 
VMcL ©   (2004-04-29 21:07) [6]

>>sensor  (29.04.04 20:59) [5]

Что по этому поводу глаголет интегрированный отладчик, а также GetLastError?


 
sensor   (2004-04-29 22:33) [7]

ничего не говорит, прога просто не запускает программу через ShellExecute при этом не говорит об ошибке.



Страницы: 1 вся ветка

Текущий архив: 2004.05.16;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.049 c
9-1071409745
ZAROLF
2003-12-14 16:49
2004.05.16
Нужен совет к 2D аркаде!


4-1079902615
KyRo
2004-03-21 23:56
2004.05.16
Вопрос по таймеру


1-1083158142
Николай
2004-04-28 17:15
2004.05.16
Как сделать форму невидимой?


3-1082616575
Ant
2004-04-22 10:49
2004.05.16
BDE


3-1082356165
clover
2004-04-19 10:29
2004.05.16
Где можно скачать последнюю версию IBForms?