Текущий архив: 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.018 c