![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Программно нажать кнопку на форме [D7, WinXP]
Aks13 © (2006-12-12 11:22:00)Есть стандартная форма, на ней кнопка ИшеИте1 как на нее нажать программно?
Или что ей послать в качествете Sender ? Чтобы вызвать ее событие клик?
TForm1.BitBnt1Click(?)
procedure TFMain.BitBtnClearClick(Sender: TObject);
begin
Form2.Close;
end;
Aks13 (2006-12-12 11:58:00) [1]To Clickmaker & Dmitrij_K
Большое спасибо, просто не много протупил. Все работает.
clickmaker (2006-12-12 11:53:00) [2]
> [7] Aks13 (12.12.06 11:51)
так тебе его уже сюда принесли. На блюдечке, можно сказать
Aks13 (2006-12-12 11:51:00) [3]Люди но я помню как то давно в FAQ был простой пример из двух строк, как программно нажать на кнопку расположеную на форме.
ЮЮ (2006-12-12 11:40:00) [4]где в [2] хоть намек на 'TFmain.', так щедро тобой расставленные?
Aks13 (2006-12-12 11:39:00) [5]Наверное не совсем :(
clickmaker (2006-12-12 11:36:00) [6]
> [3] Aks13 (12.12.06 11:35)
а разницу между определением класса и экземпляром класса знаем?
Aks13 (2006-12-12 11:35:00) [7]если писать так TFMain.BitBtnClearClick(TFmain.BitBtnClear); то вылетает при компиляции
[Error] UMain.pas(78): Method identifier expected
[Error] UMain.pas(78): This form of method call only allowed for class methods
[Fatal Error] eXsrc.dpr(5): Could not compile used unit 'UMain.pas'
Так что так не выходит.
Dmitrij_K (2006-12-12 11:29:00) [8]
procedure TFMain.Button2Click(Sender: TObject);
begin
BitBtnClearClick(nil);
// или
BitBtnClearClick(BitBtnClear);
end;
Если sender в процедуре BitBtnClearClick никак не используется, то можно передавать nil.
ЗЫ
сама delphi вызывает BitBtnClearClick(BitBtnClear)
clickmaker (2006-12-12 11:23:00) [9]Btn.Click();
но можно и событие. Сендер - сама кнопка