Hallo Alex
AV> a group of TSpeed Buttons on a form and would like to disable the
AV> selected one until another is selected. I have managed to assign
AV> different TAG values to each button but would like a generic
AV> procedure to enable and disable these buttons.
Link the OnClick events of all butons to the same event procedure and use the
Sender parameter to identify the button. Do something like
(Sender as TSpeedButton).Visible := ...
or
TSpeedButton(Sender),Visible := ...
Groeten, Martin.
--- FMail/386 1.02
---------------
* Origin: -=[ E-mail: m_maat@knoware.nl .......... ]=- (2:286/420.1)
|