TDynHashArray.Contains

Returns true if the item is in the set.

Declaration

Source position: dynhasharray.pp line 103

public function TDynHashArray.Contains(

Item: Pointer

):Boolean;

Description

An example:

uses
   {$IFDEF UNIX}{$IFDEF UseCThreads}
   cthreads,
   {$ENDIF}{$ENDIF}
   Classes, dynhasharray,strings;

var
   A: TDynHashArray;
   s: pchar;
begin
  A := TDynHashArray.Create;
  s := StrNew ('u');
  A.Add(s);
  if A.Contains(s) then
    writeln('1:it contains s.');
    writeln('1:count:',A.Count);
  A.Clear;

  if A.Contains(s) then
    writeln('2:it contains s.');
    writeln('2:count:',A.Count);
  ReadLn;
  StrDispose(s);