Delphi使用API开发串口时如何具体设置DCB里的flags值？

前提是我不想用MsComm和SPcomm等控件！我想设置dcb的一些属性为以下值（C++描述）dcb.fDtrControl=DTR_Control_Enable;
dcb.fRtsControl=RTS_Control_Enable;
dcb.fOutxDsrFlow=False;
dcb.fOutxCtsFlow=False;
dcb.fInX=False;
dcb.fOutX=False;
dcb.XonChar=ASCIL_XON;
dcb.XoffChar=ASCIL_XOFF;    将上面所写的C++描述 如何用delphi 的 dcb.flags  设置