Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2004.05.16;
Скачать: [xml.tar.bz2];

Вниз

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;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.036 c
1-1083583187
SashaNevid
2004-05-03 15:19
2004.05.16
Обращение к Edit ам по индексам?


4-1080393046
Deb
2004-03-27 16:10
2004.05.16
Изменение размеров и перетаскивание объектов на форме


3-1082298316
chainik
2004-04-18 18:25
2004.05.16
Копирование данных из одной базы Access в другую


6-1080020357
Ламерочек
2004-03-23 08:39
2004.05.16
email


3-1082557469
AMB
2004-04-21 18:24
2004.05.16
Отчет из Delphi7 в Word-97





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский