Как программно нажать кнопку?
Gyslik.
Дата: 07.06.2004 15:03:24
Нужно программно нажать на кнопку.
Вроде бы должно быть просто, но как?
Знаю только для SendKeys, а есть ли
пример именно программного нажатия
на кнопку?
Hummer
Дата: 07.06.2004 15:06:10
При открытой форме вызвать процедуру MyButton_Click
Shark
Дата: 07.06.2004 15:43:36
Если тебе это правда надо, то вот:
Declare Function PostMessage Lib "user32" Alias "PostMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As Long) As Long
Но сильно не советую
Gyslik.
Дата: 07.06.2004 16:18:22
2 Shark:
| | автор |
| | Но сильно не советую |
Почему?
И на что и куда это ставить, чтобы работало?
Hummer
Дата: 07.06.2004 16:28:31
2 Gyslik.
А на какую кнопку и где требуется нажать?:)
Gyslik.
Дата: 07.06.2004 16:39:02
Из "подформы", надо нажать на кнопку на "главной_форме", "Кнопка_1".
Hummer
Дата: 07.06.2004 16:45:47
Ёперный театр - я же написал - визин купите, легче в монитор смотреть будет.
Public Sub MySuperButton_Click делаем в главной форме и вызываем её из подчинённой.
А чтоб не было такой муры, умные люди на кнопки вешают функции или процедуры в модулях, если их требуется несколько раз вызывать...
Victosha
Дата: 07.06.2004 16:49:51
2 Hummer
не спеши.
Private Sub MySuperButton_Click - это по правилам перехвата событий
Public Sub MySuperProgrammerClick
call MySuperButton_Click()
End Sub
- это то, что ты советуешь
Hummer
Дата: 07.06.2004 16:51:17
2 Victosha
А ещё я посоветовал оформлять код под кнопкой в функцию или в процедуру в модуле...
Victosha
Дата: 07.06.2004 16:53:47
2 Hummer
OK
(пожмакивая губами)
извиняйте, батько...
:))