Re: new components

Article View: comp.lang.pascal.delphi.components.writing

Article #13

Back to comp.lang.pascal.delphi.components.writing Previous Next

#13

From: M.H. Avegaart
Date: Tue, 25 Apr 2000 00:00

39 lines
2054 bytes

You don't need to Free components if they are created with Create(Owner).
The Owner will take care of calling Free.

"CubuD" <MrPMorris@Nospam.Hotmail.com> schreef in bericht
news:iTjM4.4725$VR6.443584@news3.cableinet.net...
> public
>     MyShape : TMyShape
> end;
>
> procedure TForm1.FormCreate(Sender : TObject);
> begin
>   MyShape := TShape.Create(Self);
>   MyShape.Parent := Self;
>   MyShape.SetBounds(0,0,32,32);
> end;
>
> procedure TForm1.FormDestroy(Sender : TObject);
> begin
>   MyShape.Free;
> end;
>
>
>
> --
> petelyn@cableinet.co.uk
> "Les Johnston" <laj@ozemail.com.au> wrote in message
> news:39013F4E.50187E1F@ozemail.com.au...
> > Hi!
> >
> > As a new user of D5, I am very interested to know how to create new
> > components whilst a program is running, eg I would like to create new
> > shapes as the program need arises.
> >
> > Ta
> >
> > Les
> >
>
>

Technical Details

Message-ID: <8e3nmu$hug$1@porthos.nl.uu.net>

Path: arc1-ca.pugleaf.net!unknown!not-for-mail

References: <39013F4E.50187E1F@ozemail.com.au> <iTjM4.4725$VR6.443584@news3.cableinet.net>

Show Full Headers

Complete Article Headers

X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: fd817,a9a323c50b3bc822
X-Google-Attributes: gidfd817,public
X-Google-Thread: 112b07,a9a323c50b3bc822
X-Google-Attributes: gid112b07,public
X-Google-Thread: fe2ce,a9a323c50b3bc822
X-Google-Attributes: gidfe2ce,public
X-Google-Thread: 1043cf,a9a323c50b3bc822
X-Google-Attributes: gid1043cf,public
From: "M.H. Avegaart" <avegaart@NOSPAMmccomm.nl>
Subject: Re: new components
Date: 2000/04/25
Message-ID: <8e3nmu$hug$1@porthos.nl.uu.net>
X-Deja-AN: 615393382
References: <39013F4E.50187E1F@ozemail.com.au> <iTjM4.4725$VR6.443584@news3.cableinet.net>
X-Priority: 3
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.2919.6600
X-Complaints-To: abuse@nl.uu.net
X-Trace: porthos.nl.uu.net 956654110 18384 193.67.87.80 (25 Apr 2000 09:15:10 GMT)
Organization: UUNET-NL (http://www.nl.uu.net)
X-MSMail-Priority: Normal
NNTP-Posting-Date: 25 Apr 2000 09:15:10 GMT
Newsgroups: comp.lang.pascal.delphi.components.writing,alt.comp.lang.borland-delphi,borland.public.delphi.objectpascal,borland.public.delphi.vcl.components.writing,comp.lang.pascal.delphi.components.writing

Reply to Parent Message