TRecordLock

type TRecordLock = packed record

  rec_FH: LongInt;

Filehandle

  rec_Offset: LongWord;

Offset in file

  rec_Length: LongWord;

Length of file to be locked

  rec_Mode: LongWord;

Type of lock (REC_*)

end;