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

Вниз

Помогите кто работал с функцией 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;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.44 MB
Время: 0.075 c
14-1127307517
Layner
2005-09-21 16:58
2005.10.16
Вот записался на курсы C#


14-1127846871
syte_ser78
2005-09-27 22:47
2005.10.16
Посоветуйте программу.


14-1127394578
GuAV
2005-09-22 17:09
2005.10.16
Вопрос про синтаксис :-)


14-1127490900
YurikGL
2005-09-23 19:55
2005.10.16
Американские русофобы


6-1111927099
Nes
2005-03-27 16:38
2005.10.16
IdUDPClient & IdUDPServer ==> Вешаться или подскажите?





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