On Mon, 24 Aug 2015 16:29:49 +0200
Martin Grajcar <[email protected]> wrote:

> In code I'm working on, I've found a pattern like
> 
> PROCEDURE HideIt;
> BEGIN
>   SomeComponent.Visible := FALSE;
>   SomeComponent.Parent := SELF;
>   SomeComponent.Visible := TRUE;
> END;
> 
> PROCEDURE ShowIt(NewParent: TForm);
> BEGIN
>   SomeComponent.Visible := FALSE;
>   SomeComponent.Parent := NewParent;
>   ...some more stuff...
>   SomeComponent.Visible := TRUE;
>   ...some more stuff...
> END;
> 
> I can't really see what it's good for. I guess, the idea was to preserve
> the widget, but the widget seems to get freed immediately in the first
> line. It comes from D7 or older. Does it make sense on Lazarus 1.4 using
> GTK+?

No.
Simply do "SomeComponent.Parent := NewParent;".


Mattias

--
_______________________________________________
Lazarus mailing list
[email protected]
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Reply via email to