SetTextColor

色設定  2005-01-26 16:27:02  No: 12885  IP: 192.*.*.*

SetTextColor/SetBkColorにてclBtnFaceなどのシステムカラーを使うにはどうすればよいのでしょうか？

編集 削除
りおりお  2005-01-26 16:37:40  No: 12886  IP: 192.*.*.*

ColorToRGB() が使えそうです

procedure TForm1.Button1Click(Sender: TObject);
begin
  with Canvas do
  begin
    SetTextColor(Handle,ColorToRGB(clActiveCaption));
    Windows.TextOut(Handle,20,20,'TEST',4)
  end;
end;

編集 削除