[fpc-pascal] How do I add a TComponent to TPanel dynamically?
Danie
dawessels at telkomsa.net
Thu Aug 28 00:06:06 CEST 2008
Hi Micheal
On Wo, 2008-08-27 at 14:52 +0100, Michael Green wrote:
> Hi Danie,
>
> Other than what was pointed out with create/destroy, wouldn't it create
> a memory leak with the NEW?
> > procedure TForm1.Button1Click(Sender: TObject);
> > begin
> > if pTopCV = nil
> > then begin
> > NEW( pTopCV );
> > pTopCV^ := TControlVolume.Create(PanelDraft);
> Instead, simply do:
> if not assigned(pTopCV) then begin
> pTopCV^ := TControlVolume.Create(Paneldraft);
> (Same goes for the pTopCV.next entry).
>
> -- Mike
I really do not know (but would like to) but it also does not work. -
crashes at the creation point. Can you get it to work?
DanieW
More information about the fpc-pascal
mailing list