TPGconn

type TPGconn = record

  pghost: Pchar;

  pgtty: Pchar;

  pgport: Pchar;

  pgoptions: Pchar;

  dbName: Pchar;

  status: TConnStatusType;

  errorMessage: array [0..(ERROR_MSG_LENGTH)-1] of char;

  Pfin: PFIle;

  Pfout: PFIle;

  Pfdebug: PFIle;

  sock: LongInt;

  laddr: TSockAddr;

  raddr: TSockAddr;

  salt: array [0..(2)-1] of char;

  asyncNotifyWaiting: LongInt;

  notifyList: PDllist;

  pguser: Pchar;

  pgpass: Pchar;

  lobjfuncs: PPGlobjfuncs;

end;