1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34
| type
TMPAConfigOption = (mcoFrameBufferSizeRx, mcoNumFrameBuffersRx, mcoBaudRate,
mcoClockRate, mcoClockMode, mcoInternalLoopback, mcoRxClockSource,
mcoTxClockSource, mcoRXCOuput, mcoEncoding, mcoDPLLClockSource, mcoDPLLMode,
mcoAutoRTSDeact, mcoCRCPreset, mcoIdleLineControl);
TMPAConfigOptions = set of TMPAConfigOption;
tagMPA_CONFIG = record
StructLen: LongWord;
Options: record
case Boolean of
False: Options: TMPAConfigOptions;
True: All: LongWord;
end;
FrameBufferSizeRx: LongWord;
NumFrameBuffersRx: LongWord;
BaudRate: LongWord;
ClockRate: LongWord;
ClockMode: LongWord;
InternalLoopback: ByteBool; // peut-être LongBool
RxClockSource: CLOCK_SOURCE;
RxClockSource: CLOCK_SOURCE;
TRXCOuput: TRXC_OUTPUT;
AEncoding: ENCODING; // Delphi est case-insensitive
DPLLClockSource: DPLL_CLOCK_SOURCE;
DPLLMode: DPLL_MODE;
AutoRTSDeact: ByteBool; // peut-être LongBool
CRCPreset: ByteBool; // peut-être LongBool
IdleLineControl: IDLE_LINE_CONTROL;
end;
TMPA_CONFIG = tagMPA_CONFIG;
TMPAConfig = TMPA_CONFIG;
PMPAConfig = ^TMPAConfig; |
Partager