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

Вниз

как в Delphi создать кнопку, при нажатии на которую, запускалась   Найти похожие ветки 

 
NetAmigo   (2002-06-15 03:25) [0]

люди, добрые, помогите начинающему, как в Delphi создать кнопку, при нажатии на которую, запускалась какая нибудь программа, например С:\games\Quake2\quake2.exe подскажите кусок кода, Please !!!


 
Voldemar   (2002-06-15 03:57) [1]


procedure TForm1.Button1Click(Sender: TObject);
begin
WinExec("С:\games\Quake2\quake2.exe", SW_SHOWNORMAL);
end;


 
Device   (2002-06-15 12:53) [2]

procedure TForm1.Button1Click(Sender: TObject);
begin
ShellExecute(0,"open","c:\windows\notepad.exe",nil,nil,SW_SHOWNORMAL);
end;


в uses включи ShellAPI

Можно пердавать параметры - посмотри хелп по ShellExecute


 
Новенький в Делфи   (2002-06-15 19:55) [3]

бросаешь на форму компоненту TOpenDialog

затем для OnCLick

if OpenDialog1.execute then
ShellExecute(0,"open",OpenDialog1.fileName,nil,nil,SW_SHOWNORMAL);


 
~Rand~   (2002-06-15 22:57) [4]

ShowExecute(NetDelay,"",0);


 
Mickle   (2002-06-16 13:52) [5]

Запуск программы с параметрами:

WinExec("C:\WINDOWS\NOTEPAD.EXE C:\WINDOWS\WIN.INI", SW_SHOWNORMAL);

-----------------------------------------------------------------
Открытие ДОС-окна:
WinExec("COMMAND.COM", SW_SHOWNORMAL);

-----------------------------------------------------------------
Запуск команды ДОС:
WinExec("COMMAND.COM /C DIR *.*", SW_SHOWNORMAL);


 
MJH   (2002-06-16 17:56) [6]

напиши свой компонент, унаследуй его от класса TButton, сделай OverRide ButtonClick, и там напиши вызов кваки...кнопка готова....



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

Форум: "WinAPI";
Текущий архив: 2002.08.19;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.007 c
1-60584
billybons
2002-08-08 07:50
2002.08.19
как программно запретить переключение между страницами PageContro


1-60717
ReZOnAnS
2002-08-07 07:05
2002.08.19
Обработка параметров


8-60756
_ncux_
2002-04-12 15:51
2002.08.19
Книга по OpenGL из Internet а


1-60719
НАИВый панк
2002-08-04 19:09
2002.08.19
как поменять байтики в файле...


3-60536
Hawk2
2002-07-30 15:20
2002.08.19
Пустые значения в полях типа DateTime.





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