Вниз
Скачать: 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 вся ветка

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



Память: 0.46 MB
Время: 0.012 c
6-44298
shil
2003-02-18 15:05
2003.04.14
Indy 9 Помогите с ошибка при стандартном чтении


14-44431
Alexandrius
2003-03-28 20:06
2003.04.14
Нужен бесплатный компонент для работы с Excel файлами


14-44399
Карелин Артем
2003-03-25 13:02
2003.04.14
Глючные компоенты.


14-44351
Карлсон
2003-03-30 14:05
2003.04.14
2k


3-44001
Ihtiandr
2003-03-25 10:31
2003.04.14
first




   Наверх