企业管理软件版1楼: procedure TCustomComm.SetDTRState(State: boolean);
const
DTR: array[boolean] of Integer = (CLRDTR, SETDTR);
begin
EscapeComm(DTR[State]);
end;
array[boolean]相当于array[0..1]吗？

2楼: array[boolean]相当于array[False, True] 如药品进销存5.32.6

3楼: See:
ShowMessage(IntToStr(Ord(True)));
//ShowMessage(IntToStr(Ord(False)));

4楼: array[boolean]值的范围位0..1

5楼: boolean = 0 , 1

6楼: 谢谢:)