Главная страница
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.021 c
14-44389
romychk
2003-03-25 11:24
2003.04.14
SQL сервер PostgreSQL


1-44249
Soft
2003-04-01 18:00
2003.04.14
Дата и время в BCD формате в TDateTime


1-44161
denis24
2003-04-03 14:10
2003.04.14
замена символа в tedit


1-44150
Filat
2003-04-02 15:52
2003.04.14
Почему не компилится проект?


1-44192
DeathMOROZ
2003-04-01 15:24
2003.04.14
диалог выбора каталога...