[lazarus] Lazarus CVS update
Nicolas Aragon
nico at clubdelphi.com
Thu Apr 29 02:27:04 EDT 1999
Hello,
>Should we remove the tables from our forms or is this the only way to throw a button on a form and be able to move it around freely? What is the NEED for the table? I don't remember why we required it.
I suppose you walked the same road as me.
There's a solution, though. The only problem is that this widget is
undocummented. At least in my gtk manual copy. Anyway it's not very
difficult to figure out what it does from the interface (gtkfixed.pp).
I do it this way:
procedure TGtkControl.InsertChildControl( Child: TGtkControl );
begin
if Box = nil then begin
Box := gtk_fixed_new();
gtk_widget_show( Box );
gtk_container_add( pGtkContainer( PWidget ), Box );
end;
gtk_fixed_put( pGtkFixed( Box ),
Child.PWidget,
Child.FLeft,
Child.FTop );
end;
Obviously my TGtkControl has:
PWidget: PGtkWidget;
Box: PGtkWidget;
FTop: Integer;
FLeft: Integer;
Hope it helps :)
A question: is CVS public? I suppose I have a pretty old copy of your
sources.
greetings
Nico
More information about the Lazarus
mailing list