Тема: TOpenDialog
Показать сообщение отдельно
  #2  
Старый 23.12.2010, 19:42
Аватар для Bargest
Bargest Bargest вне форума
Профессионал
  
Регистрация: 19.10.2010
Адрес: Москва
Сообщения: 2,390
Версия Delphi: XE3/VS12/FASM
Репутация: 14665
По умолчанию
по событию Image1Click:
Код:
if OpenDialog1.Execute Then
  winexec(OpenDialog1.FileName, SW_SHOW);
а в редакторе свойств в поле filter пишешь *.exe

А вообще про OpenDialog уже было в разделе "начинающим".
__________________
jmp $ ; Happy End!
The Cake Is A Lie.
Ответить с цитированием