unit SerialParams; interface uses // VCL Windows; type { TSerialParams } TSerialParams = class Mode: LongWord; Parity: DWORD; Timeout: DWORD; BaudRate: DWORD; ReaderName: string; PortNumber: Integer; CardBaudRate: DWORD; PollInterval: Integer; PollAutoDisable: Boolean; end; implementation end.