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

Вниз

Помогите кто работал с функцией ShellExecute   Найти похожие ветки 

 
JTAG   (2005-09-05 15:26) [0]

Возникла такая ситуация помогите плз разобраться
Из программы на Delphi при помощи функции ShellExecute вызываю прогу file.exe. Вызов функции ShellExecute ставлю в обработчик нажстии кнопки button
Вот пример
//----------------------------------
procedure TForm1.Button2Click(Sender: TObject);
begin
ShellExecute(handle,"open","file.exe",nil,nil,SW_RESTORE);
end;
//----------------------------------
Все работает нормально, но если я вызов функции ShellExecute ставлю в процедуру созданную мной, то компилятор ругается так
[Error] test.pas(100): Undeclared identifier: "handle"  
Вот пример
procedure SendFile;
begin
ShellExecute(handle,"open","file.exe",nil,nil,SW_RESTORE);
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
SendFile;
end;
В чем проблема почитал в Хелпе
Параметр handle является дискриптором родительского окна , в котором отображаются сообщения запускаемого приложения. Имеет тип
HWnd.
Как можно эту функцию вызвать из моей процедуры.


 
begin...end ©   (2005-09-05 15:28) [1]

Application.Handle


 
Anatoly Podgoretsky ©   (2005-09-05 15:33) [2]

Она просто не знает переменно с именем handle, такой просто нет.
Но ты не мучайся, а замени на 0.


 
JTAG   (2005-09-05 15:44) [3]

Спасибо огромное ЗАРАБОТАЛО в обоих вариантах!!!



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

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

Наверх




Память: 0.44 MB
Время: 0.035 c
4-1124135334
Dot
2005-08-15 23:48
2005.10.16
Извлеч файл из ресурса


5-1102767773
alo
2004-12-11 15:22
2005.10.16
как перенести свойство предка из published в public?


2-1127097538
antikaban
2005-09-19 06:38
2005.10.16
Открытие файла


1-1127374944
DimonNew
2005-09-22 11:42
2005.10.16
Hint из своей программы, как в IDE Delphi2005


3-1125647332
Леди
2005-09-02 11:48
2005.10.16
Программное создание DSN





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский