掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
TDBComboBoxでのアンダーライン表示を行わないようにするには (ID:34874)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
DBCtrls.pas の procedure TDBComboBox.WMPaint(var Message: TWMPaint); 内の if Child <> 0 then begin Windows.GetClientRect(Child, R); Windows.MapWindowPoints(Child, FPaintControl.Handle, R.TopLeft, 2); GetWindowOrgEx(Message.DC, P); SetWindowOrgEx(Message.DC, P.X - R.Left, P.Y - R.Top, nil); IntersectClipRect(Message.DC, 0, 0, R.Right - R.Left, R.Bottom - R.Top); //SendMessage(Child, WM_PAINT, Message.DC, 0); Canvas := TCanvas.Create; Canvas.Handle := Message.DC; Canvas.Brush.Color := Color; Canvas.FillRect(Rect(0,0,R.Right,R.Bottom)); Canvas.Font.Assign(Font); Canvas.TextOut(0,0,S); Canvas.Free; end; として自分で描画すれば出来る
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.