Sender?!

← →
Reticent (2002-06-10 16:08) [0]

Доброе время суток!

У меня есть процедура, используемая в нескольких CheckBox в событии OnClickCheck. Так вот как мне определять какой CheckBox Вызвал эту процедуру? Мне надо просто узнать все ли пункты отмечены. Я пишу
procedure ...OnClickCheck(Sender : Onjekt)
...
if Sender.Checked=true <-- тут говорит, что он не знает никакого Checked.
...

как быть подскажте

Всего хорошего!

← →
Kaban (2002-06-10 16:11) [1]

if (sender as ...).Checked then
=true уберите

← →
Reticent (2002-06-10 16:20) [2]

так он на Checked ругается, говорит у sender нет такого. Вообще, если я даже Sender.Items... возьму, ну хоть что-нибудь - он ругается при компиляции :(

← →
Fly` (2002-06-10 16:22) [3]

with (sender as TCheckBox) do begin if (Name="CheckBox1") and (Checked) then ... end

← →
MBo (2002-06-10 16:23) [4]

If Sender is TCheckBox then
if TCheckBox(sender).checked then...
или (sender as TCheckBox).

← →
Kaban (2002-06-10 16:23) [5]

Sender : TObject

if (Sender as TCheckBox).Items[0].Checked then

← →
MBo (2002-06-10 16:24) [6]

>Reticent
новостей еще не знаю - какие Items у CheckBox появились???????

← →
Kaban (2002-06-10 16:24) [7]

MBO

TCheckBox(sender).checked

Не смущайте новичка

← →
Kaban (2002-06-10 16:28) [8]

2MBO
Sorry
Новичок же меня и збил с толку
Конечно же
TCheckBox(sender).checked
или
if (Sender as TCheckBox).Checked then

← →
Reticent (2002-06-10 16:47) [9]

>MBo
ну items, a controls. Спутал :*)

Всем спасибо, TCheckBox(Sender).checked сработал :)

Sender?! Найти похожие ветки