> 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

Reply via email to