[fpc-pascal] fpc-pascal Digest, Vol 131, Issue 19

Serguei TARASSOV serge at arbinada.com
Thu May 21 13:07:56 CEST 2015


On 21/05/2015 12:00, fpc-pascal-request at lists.freepascal.org wrote:
> Date: Wed, 20 May 2015 13:11:10 +0200 (CEST)
> From: Michael Van Canneyt<michael at freepascal.org>
> To: FPC-Pascal users discussions<fpc-pascal at lists.freepascal.org>
> Subject: Re: [fpc-pascal] TFPHashList and nil pointers
> Message-ID:<alpine.DEB.2.10.1505201310560.15503 at home.telenet.be>
> Content-Type: TEXT/PLAIN; charset=US-ASCII; format=flowed
>
>
>
> On Tue, 19 May 2015, Serguei TARASSOV wrote:
>
>> >Hello,
>> >
>> >Is it normal that TFPHashList cannot find an item by name if the pointer is
>> >nil?
>> >However, the item is stored in the list.
>> >
>> >FPC 2.6.4, both Windows and Linux versions.
>> >
>> >program project1;
>> >
>> >uses
>> >  Contnrs;
>> >
>> >var
>> >  List: TFPHashList;
>> >begin
>> >  List := TFPHashList.Create;
>> >  List.Add('Name1', List);
>> >  List.Add('Name2', nil);
>> >  writeln('List count: ', List.Count);
>> >  writeln('Index of Name1: ', List.FindIndexOf('Name1'));
>> >  writeln('Index of Name2: ', List.FindIndexOf('Name2'));
>> >  List.Free;
>> >end.
>> >
>> >Output:
>> >List count: 2
>> >Index of Name1: 0
>> >Index of Name2: -1
> It is by design.
>
> Michael.
Michael,

Thank for answer.
I would be a good idea to add this limitation in doc.

Regards,
Serguei



More information about the fpc-pascal mailing list