Главная страница
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.051 c
8-1077631750
Neep
2004-02-24 17:09
2004.05.16
Кто знает как вписать текст в прямоугольник


1-1083261874
Nous Mellon
2004-04-29 22:04
2004.05.16
Нестандартный ЛистВью


1-1083245971
Шнур
2004-04-29 17:39
2004.05.16
Округление


3-1082385329
Vit
2004-04-19 18:35
2004.05.16
Какая функция преобразует Date в String


3-1082352506
explorer
2004-04-19 09:28
2004.05.16
Использование DBкомпонент для вставки данных