Hi everyone,
How can i add a new TGroupBox to a form at runtime, inheriting events
from a customized base TGroupBox, and without any TGroupBox on the
form at design-time ?
I've tried something like :
TGBx = class(TGroupBox)
procedure MouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer); reintroduce;
end;
...
procedure TGBx.MouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
... and the code to instantiate the new GroupBox :
GBx := TGBx.Create(Form1);
GBx.Caption := 'NEW GROUPBOX';
After that, i see a new groupBox on the form, with the name i've
assigned to it, but it not respond to any events ...
Please help me, Thanks
-----------------------------------------------------
Home page: http://groups.yahoo.com/group/delphi-en/
To unsubscribe: [EMAIL PROTECTED]
Yahoo! Groups Links
<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/delphi-en/
<*> To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]
<*> Your use of Yahoo! Groups is subject to:
http://docs.yahoo.com/info/terms/
