1:
2:
3:
4:
5:
6:

ArrayList PeekPagesByFID(int fid)
  { 
      if(slFID2Pages[fid]==null) 
        slFID2Pages[fid] = new ArrayList(); 
      return slFID2Pages[fid] as ArrayList;
  }					

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:

namespace Something;

interface

uses
  System.Collections;

type
  SomeClass = class
  private
    slFID2Pages : ArrayList := new ArrayList;
    method GetPeekPagesByFID(fid : Integer) : ArrayList;
  public   
    property PeekPagesByFID[fid : Integer] : ArrayList read GetPeekPagesByFID; 
  end;

implementation


method SomeClass.GetPeekPagesByFID(fid : Integer) : ArrayList; 
begin
  if slFID2Pages[fid] = nil then
    slFID2Pages[fid] := new ArrayList;
    
  result := ArrayList(slFID2Pages[fid]);
end;

end.