Re: new components

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

Article #16

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

#16

From: Alexander Mueller
Date: Sun, 23 Apr 2000 00:00

30 lines
1720 bytes

Les Johnston wrote:
> 
> Thanks CubuD
> 
> Could I store the different shapes that I create as an array?
> 
> Les
> 
> CubuD wrote:
> 

Yes

var shapes:array[1..10] of TShape;

procedure TForm1.FormCreate(Sender:TObject);
var i:Integer;
  begin
    for i:=1 to 10 do
      begin
        shapes[i]:=TShape.Create(self);
        InsertControl(shapes[i]);
      end;
  end


Alex
-- 
Author of the free Chatsystem PINO! || Website: http://www.alcomp.net
Available at http://pino.cjb.net    || Chat   : pinochat.dhs.org:8080

Technical Details

Message-ID: <3902E658.A0604AC4@gmx.at>

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

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

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: 1043cf,a9a323c50b3bc822
X-Google-Attributes: gid1043cf,public
X-Google-Thread: 112b07,a9a323c50b3bc822
X-Google-Attributes: gid112b07,public
X-Google-Thread: fe2ce,a9a323c50b3bc822
X-Google-Attributes: gidfe2ce,public
From: Alexander Mueller <alexm@gmx.at>
Subject: Re: new components
Date: 2000/04/23
Message-ID: <3902E658.A0604AC4@gmx.at>
X-Deja-AN: 614589628
Content-Transfer-Encoding: 7bit
References: <39013F4E.50187E1F@ozemail.com.au> <iTjM4.4725$VR6.443584@news3.cableinet.net> <3902CF5E.7FEC4E6B@ozemail.com.au>
X-Accept-Language: en
Content-Type: text/plain; charset=us-ascii
X-Complaints-To: news@chello.at
X-Trace: news.chello.at 956487537 212.186.131.198 (Sun, 23 Apr 2000 12:58:57 MET DST)
Organization: Chello Austria
MIME-Version: 1.0
NNTP-Posting-Date: Sun, 23 Apr 2000 12:58:57 MET DST
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