TColor = -$7FFFFFFF-1..$7FFFFFFF;
clRed = TColor($0000FF);
Font.Color= $FF0000;(蓝色)
TColor类型本身就是个整数.
var
Int: Integer;
Int:= Integer(clRed);
Int:= Font.Color;
clRed = TColor($0000FF);
Font.Color= $FF0000;(蓝色)
TColor类型本身就是个整数.
var
Int: Integer;
Int:= Integer(clRed);
Int:= Font.Color;
TColor的定义是TColor = -$7FFFFFFF-1..$7FFFFFFF;
你要是喜欢就直接当整数来用得了