TQMessage

type TQMessage = record

  qm_Msg: tMessage;

  qm_ID: LONG;

  qm_Status: LongInt;

  qm_Path: Pchar;

  qm_Data: pointer;

  qm_DataLen: ULONG;

  qm_ActualLen: ULONG;

  qm_ErrorLine: ULONG;

  qm_Private: pointer;

  qm_Private2: pointer;

  qm_Session: PQSession;

end;