Код нажатия кнопки и установки или снятия метки CheckBox в другом приложенииDelphi , Программа и Интерфейс , Приложения чужиеКод нажатия кнопки и установки или снятия метки CheckBox в другом приложении
Автор: Bramus // Для приложений написанных на Delphi - TCheckBox, TButton, TBitBtn, // для других языков - CheckBox, Button, BitBtn. // Нажатие на кнопку: procedure TForm1.Button1Click(Sender: TObject); var h1, h2: hwnd; begin h1 := FindWindow('tform2', nil); h2 := FindWindowEx(h1, 0, 'TBitBtn', '&No'); SendMessage(h2, BM_CLICK, 0, 0); end; // Установка или снятие флажка: procedure TForm1.Button2Click(Sender: TObject); var h1, h2: hwnd; begin h1 := FindWindow('tform2', nil); h2 := FindWindowEx(h1, 0, 'TCheckBox', 'Флажок'); SendMessage(h2, BM_SetCheck, 1, 0); end; Код нажатия кнопки и установки или снятия метки CheckBox в другом приложении описывает использование Delphi для создания программы, которая может взаимодействовать с другими приложениями. Комментарии и вопросыМатериалы статей собраны из открытых источников, владелец сайта не претендует на авторство. Там где авторство установить не удалось, материал подаётся без имени автора. В случае если Вы считаете, что Ваши права нарушены, пожалуйста, свяжитесь с владельцем сайта. :: Главная :: Приложения чужие ::
|
||||
©KANSoftWare (разработка программного обеспечения, создание программ, создание интерактивных сайтов), 2007 |