TCOLOR转化为字符串

字体大小: 中小 标准 ->行高大小: 标准 中 大 
procedure TForm1.Button1Click(Sender: TObject);
begin
  Memo1.Lines.Add(ColorToString(clRed));
  Memo1.Lines.Add(IntToStr(StringToColor('clRed')));
end;

此文章由 http://www.ositren.com 收集整理 ,地址为: http://www.ositren.com/htmls/67966.html