Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.04.14;
Скачать: CL | DM;

Вниз

Вызов обработчика события другим компонентом   Найти похожие ветки 

 
MishaS ©   (2003-04-02 16:08) [0]

Как вызвать обработчик СheckBox.OnClick при выборе определённого
пункта меню.
Я пробовал это сделать так.
procedure TForm1.CancelMClick(Sender: TObject);
begin
If (CheckBoxIns.Checked)then CheckBoxInsClick(Sender);
end;


и так

procedure TForm1.CancelMClick(Sender: TObject);
begin
If (CheckBoxIns.Checked)then CheckBoxInsClick(TCheckBox(Sender));
end;

Но обработчик так и не выполнился


 
Jel ©   (2003-04-02 16:50) [1]

а так?


procedure TForm1.CancelMClick(Sender: TObject);
begin
CheckBoxIns.CheckBoxInsClick(self);
end;



 
Jel ©   (2003-04-02 16:52) [2]

Пардон - ошибочка вышла.

Правильно будет так:


procedure TForm1.CancelMClick(Sender: TObject);
begin
CheckBoxInsClick(self);
end;


 
MishaS ©   (2003-04-03 16:53) [3]

Jel, я попробовал как ты говорил, но этот обработчик не выполнился


 
Mike Kouzmine ©   (2003-04-03 16:59) [4]

А может просто Checked := not Checked (Ну или что надо), и обработчик вызовется сам?


 
Roma ©   (2003-04-03 17:04) [5]

> MishaS © (03.04.03 16:53)

Темнишь ты что-то... Чего бы это ему не вызваться...

procedure TForm1.CancelMClick(Sender: TObject);
begin
with CheckBoxIns do
if Assigned(OnClick) then // есть обработчик?
OnClick(Sender); // вызвать его
end;


 
MishaS ©   (2003-04-03 18:35) [6]

Объясните пожалуйста, что за прараметр Sender и зачем он нужен



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

Текущий архив: 2003.04.14;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.019 c
4-44497
VitalMoya
2003-02-12 22:25
2003.04.14
LogonUser


14-44423
cd1
2003-03-28 16:22
2003.04.14
FastReport 2.47


1-44206
NAlexey
2003-04-01 16:16
2003.04.14
SelLength и SelStart при изменении Text в TEdit.


4-44501
Drw
2003-02-13 10:22
2003.04.14
Temporary Internet Files


14-44434
Merlin
2003-03-28 13:42
2003.04.14
Переезд сайта