> You've really got to show us more code.
> What is wrong with pointing all the buttons at a single OnClick
> event that looks something like:
>
> procedure MyOnClick(Sender : TComponent );
> begin
> TSpeedButton( Sender ).Down := False;
> end;
Brilliant idea but...........handle this
procedure TCamForm.PicButtonClick(Sender: TObject);
begin
if (picselect = pic1.Tag) and (FIMG1.Visible = true) then exit;
Picclick(Pic1.Tag);
end;
//using each btn tag in subproc picclick(tag)
//there is probably a way using that nice idea, but somehow I feel I have
done that beat already.
time for the family.
BI+
---------------------------------------------------------------------------
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
Website: http://www.delphi.org.nz