checkboxのFont Colorが指定できない。


かんとく  2011-01-23 14:56:05  No: 39887  IP: 192.*.*.*

お世話になっております。

Deplhi2007、XPです。

CheckBoxの、FontのColoeが、変更できなくなりました。

以前は変更できていて、プログラムのその部分はまったくいじっていないのに、突然色が変わらなくなりました。

フォームの編集画面で、プロパティを変更したら、その場で色が変更されていたのですが、プログラム編集時も、実行時も、フォントカラーが黒のままです。

前までできていたのに、急にできなくなったので、原因がまったく分かりません。

よろしくお願いします。

編集 削除
かんとく  2011-01-23 15:20:18  No: 39888  IP: 192.*.*.*

自分で調べた結果ですが、
画面のプロパティのテーマを、
Windowsクラシックにすると色が変わるが、
WindowsXPにすると、色が変わらないようです。

まだ調査中ですが、WindowsXPでも色が変わる必要があるので、引き続きよろしくお願いします。

編集 削除
かんとく  2011-01-24 13:20:44  No: 39889  IP: 192.*.*.*

すみません。
「前までできていたのに、急にできなくなった」というのは、間違えだったようです。

開発しているパソコンの画面のプロパティのテーマがWindowsクラシックで、それをインストールして使っているパソコンの画面のプロパティのテーマがWindowsXPでした。

なので、画面のプロパティのテーマがWindowsXPのパソコンで、今までずっと文字の色が黒かったのに気づいていなかっただけかもしれません。

引き続き、よろしくお願いします。

編集 削除
引き続き…  2011-01-24 17:52:11  No: 39890  IP: 192.*.*.*

procedure TCheckBox.WmPaint(var Msg: TMessage);
var
  DC: HDC;
  CV: TCanvas;
begin
  inherited;
  DC := GetDC(Handle);
  CV := TCanvas.Create;
  try
   CV.Handle := DC;
   CV.Font.Assign(Font);
   CV.Brush.Style := bsClear;
   CV.TextOut(16, 3, Caption);
  finally
   CV.Free;
   ReleaseDC(Handle, DC);
  end;

ところで、前の質問は解決したの?
解決できたのなら チェックを付けておいてね、
掲示板の質問は皆で共有するものだよ。
  https://www.petitmonte.com/bbs/answers?question_id=7209

編集 削除