Article View: borland.public.cppbuilder.database.ado
Article #5076Re: TShape Array
From: Mark Cashman
Date: Tue, 14 Aug 2001 11:40
Date: Tue, 14 Aug 2001 11:40
28 lines
1797 bytes
1797 bytes
for(i = 0; i <= 11; i++)
{
ShapeArray[i] = new TShape; // You have to create the object
ShapeArray[i]->Shape = stSquare;
ShapeArray[i]->Top = 100;
ShapeArray[i]->Left = 100;
ShapeArray[i]->Width = 25;
ShapeArray[i]->Height = 25;
ShapeArray[i]->Brush->Color = clRed;
ShapeArray[i]->Visible = false;
ShapeArray[i]->Enabled = true;
}
Please note that your question would have been more appropriately posted
to borland.public.cppbuilder.graphics, as database.ado is focused on the
ADOExpress database components.
Thanks!
------
Mark Cashman (TeamB - C++ Builder), creator of The Temporal Doorway at
http://www.temporaldoorway.com
- Original digital art, writing, music and more -
C++ Builder / JBuilder Tips and The C++ Builder Programmer's Webring
(Join us!)
http://www.temporaldoorway.com/programming/index.htm
------
Technical Details
Message-ID:
<3B790E2C.75255EEF@temporaldoorway.com>Path:
arc1-ca.pugleaf.net!archiver1.google.com!newsfeed.google.com!sn-xit-02!supernews.com!newsfeed.direct.ca!look.ca!novia!novia!intgwlon.nntp.telstra.net!newsfeeds.ihug.co.nz!ihug.co.nz!dnewsReferences:
<3b767b5c_1@dnews>Show Full Headers
Complete Article Headers
X-Google-Language: ENGLISH,ASCII-7-bit X-Google-Thread: 10698b,a9a01fba6d2ee27f X-Google-Attributes: gid10698b,public X-Google-ArrivalTime: 2001-08-14 04:51:02 PST Message-ID: <3B790E2C.75255EEF@temporaldoorway.com> Date: Tue, 14 Aug 2001 07:40:28 -0400 From: Mark Cashman <mcashman@temporaldoorway.com> Reply-To: mcashman@temporaldoorway.com X-Mailer: Mozilla 4.77 [en] (Win98; U) X-Accept-Language: en MIME-Version: 1.0 Newsgroups: borland.public.cppbuilder.database.ado Subject: Re: TShape Array References: <3b767b5c_1@dnews> Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: 7bit NNTP-Posting-Host: 24.14.197.193 X-Trace: dnews 997789288 24.14.197.193 (14 Aug 2001 04:41:28 -0700) Lines: 30 Path: arc1-ca.pugleaf.net!archiver1.google.com!newsfeed.google.com!sn-xit-02!supernews.com!newsfeed.direct.ca!look.ca!novia!novia!intgwlon.nntp.telstra.net!newsfeeds.ihug.co.nz!ihug.co.nz!dnews