Re: array of ... ???

Article View: borland.public.delphi.language.objectpascal

Article #32494

Back to borland.public.delphi.language.objectpascal Previous Next

#32494

From: Sebastian Silva
Date: Fri, 22 Nov 2002 14:59

28 lines
1730 bytes

>     SetLength(ACostTypeArray, Length(CostTypeArray)+1);
should be
>     SetLength(ACostTypeArray, Length(ACostTypeArray)+1);

Seba

"Dion" <dion@softek.co.za> escribi� en el mensaje
news:3dde320c@newsgroups.borland.com...
> Hi,
>
> Why can't I do the following?
>
> function GetPremBreakDown(var ACostTypeArray: array of TCostBreakDown;
>                           AListOfCosts: array of TCostStruct): boolean;
> begin
>     Finalize(ACostTypeArray);
>     SetLength(ACostTypeArray, Length(CostTypeArray)+1);
> end;
>
> I want to pass GetPremBreakDown an array declared in the calling proc, and
> add items to the array. However, I get an 'Incompatible types' error on
the
> SetLength(ACostTypeArray... line. Why???
>
> Thanks,
> Dion.
>
>

Technical Details

Message-ID: <3dde4615@newsgroups.borland.com>

Path:

arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-03!sn-xit-06!sn-xit-04!supernews.com!news.maxwell.syr.edu!newsfeed1.cidera.com!Cidera!news.uni-x.net!newsgroups.borland.com!not-for-mail

References: <3dde320c@newsgroups.borland.com>

Show Full Headers

Complete Article Headers

X-Google-Language: ENGLISH,ASCII
X-Google-Thread: 109d30,27bfb155f17a25ee
X-Google-Attributes: gid109d30,public
X-Google-ArrivalTime: 2002-11-22 07:16:07 PST
Reply-To: "Sebastian Silva" <ssilva@discar.com>
From: "Sebastian Silva" <ssilva@discar.com>
Newsgroups: borland.public.delphi.language.objectpascal
References: <3dde320c@newsgroups.borland.com>
Subject: Re: array of ... ???
Date: Fri, 22 Nov 2002 11:59:58 -0300
Lines: 30
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 6.00.2720.3000
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2600.0000
NNTP-Posting-Host: 200.69.212.171
Message-ID: <3dde4615@newsgroups.borland.com>
X-Trace: newsgroups.borland.com 1037977109 200.69.212.171 (22 Nov 2002 06:58:29 -0800)
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-03!sn-xit-06!sn-xit-04!supernews.com!news.maxwell.syr.edu!newsfeed1.cidera.com!Cidera!news.uni-x.net!newsgroups.borland.com!not-for-mail

Reply to Parent Message