Source position: xforms.pp line 2062
type TFL_Dirlist = record
name: pchar;
ftype: LongInt;
dl_mtime: LongInt;
dl_size: Cardinal;
filler: array [0..2] of LongInt;
end;