Вниз
Скачать: CL | DM;

Программно нажать кнопку на форме   Найти похожие ветки 

← →
Aks13   (2006-12-12 11:22) [0]

Есть стандартная форма, на ней кнопка ИшеИте1 как на нее нажать программно?

Или что ей послать в качествете Sender ? Чтобы вызвать ее событие клик?
TForm1.BitBnt1Click(?)

procedure TFMain.BitBtnClearClick(Sender: TObject);
begin
 Form2.Close;
end;


← →
clickmaker ©   (2006-12-12 11:23) [1]

Btn.Click();
но можно и событие. Сендер - сама кнопка


← →
Dmitrij_K   (2006-12-12 11:29) [2]

procedure TFMain.Button2Click(Sender: TObject);
begin
 BitBtnClearClick(nil);
 // или
 BitBtnClearClick(BitBtnClear);
end;

Если sender в процедуре BitBtnClearClick никак не используется, то можно передавать nil.
ЗЫ
сама delphi вызывает BitBtnClearClick(BitBtnClear)


← →
Aks13   (2006-12-12 11:35) [3]

если писать так 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"

Так что так не выходит.


← →
clickmaker ©   (2006-12-12 11:36) [4]


> [3] Aks13   (12.12.06 11:35)

а разницу между определением класса и экземпляром класса знаем?


← →
Aks13   (2006-12-12 11:39) [5]

Наверное не совсем :(


← →
ЮЮ ©   (2006-12-12 11:40) [6]

где в [2] хоть намек на "TFmain.", так щедро тобой расставленные?


← →
Aks13   (2006-12-12 11:51) [7]

Люди но я помню как то давно в FAQ был простой пример из двух строк, как программно нажать на кнопку расположеную на форме.


← →
clickmaker ©   (2006-12-12 11:53) [8]


> [7] Aks13   (12.12.06 11:51)

так тебе его уже сюда принесли. На блюдечке, можно сказать


← →
Aks13   (2006-12-12 11:58) [9]

To Clickmaker & Dmitrij_K  
Большое спасибо, просто не много протупил. Все работает.



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.028 c
15-1165871895
IMHO
2006-12-12 00:18
2006.12.31
Слово о eDonkey


5-1145509871
Lanc
2006-04-20 09:11
2006.12.31
Как определить предка?


2-1165821105
RightD
2006-12-11 10:11
2006.12.31
По TdxDBGrid


2-1165830912
Филон
2006-12-11 12:55
2006.12.31
текст


15-1165867511
Handle
2006-12-11 23:05
2006.12.31
TrayBar




   Наверх