Thema
:
Delphi
Listbox Items unselektierbar machen ohne Enabled property
Einzelnen Beitrag anzeigen
API
Registriert seit: 18. Apr 2004
637 Beiträge
#
13
Re: Listbox Items unselektierbar machen ohne Enabled propert
17. Jan 2008, 11:06
oder so?
zusammenfalten
·
markieren
Delphi-Quellcode:
with
(Control
as
TListBox)
do
begin
Canvas.Brush.Color := Color;
Canvas.Font.Color := Font.Color;
canvas.FillRect(rect);
DrawText(Canvas.Handle,
PChar(Items[
Index
]),
-1,
Rect,
DT_SINGLELINE
or
DT_VCENTER);
if
odSelected
in
state
then
Canvas.DrawFocusRect(rect);
end
;
Zitat
API
Öffentliches Profil ansehen
Mehr Beiträge von API finden