My earlier I have solved to the extent I can get the onMouseUp event working but only 
on
some parts of the created CustomForm. What I'd appreciate is the correct syntax
for the part marked //***************** to //****************
I dont know how to insert the needed parameters eg it wants
OnMouseUp(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer); but the component does not know about
those Objects/variables thanks:

constructor TBalloon.CreateNew(AOwner: TComponent; Dummy: Integer = 0);
begin
  inherited;
  OnActivate := OnChange;
  OnDeactivate := OnChange;
  OnClick := OnMouseClick;
//************************
OnMouseUp:=OnMouseUp;
//************************

_______________________________________________
Delphi mailing list
[EMAIL PROTECTED]
http://ns3.123.co.nz/mailman/listinfo/delphi

Reply via email to