Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi ListBox formatieren (https://www.delphipraxis.net/92109-listbox-formatieren.html)

.chicken 14. Mai 2007 17:15


ListBox formatieren
 
Also ich habe es nun hinbekommen, die Texte in meiner ListBox zu formatieren, aber jetzt möchte ich gerne, dass das angeählte Item nicht "markiert gezeichnet" wird.
Es soll ganz normal angezeigt werden wie alle anderen auch, also man soll nich sehen welches Item angewählt ist.

Wie kann ich das anstellen?

mkinzler 14. Mai 2007 17:17

Re: ListBox formatieren
 
OwnerDraw

.chicken 14. Mai 2007 17:19

Re: ListBox formatieren
 
Ja, also im OnDawItem Event oder?
Da formatiere ich ja auch meine Schrift, aber ich weiss nicht wie ich da verhindern soll, dass angewählte Items markiert sind.

Hier mal mein Code wie ich die Schrift formatiere:
Delphi-Quellcode:
procedure TListForm.UserListDrawItem(Control: TWinControl; Index: Integer;
  Rect: TRect; State: TOwnerDrawState);
begin
  with UserList do
  begin
    Canvas.Font.Color := (Items.Objects[Index] as TListObject).Color;
    Canvas.FillRect(Rect);
    Canvas.TextOut(Rect.Left + 2, Rect.Top, Items.Strings[Index]);
  end;
end;

Keldorn 14. Mai 2007 18:15

Re: ListBox formatieren
 
Hallo

vorm Fillrect die Farbe setzen
Delphi-Quellcode:
canvas.brush.color:=clwindow;
Wenn du keinen Fokusrahmen sehen willst must du den State abfragen, ob der Eintrag den Fokus hat und mit drawfocusrect den Rahmen übermalen, dann ist er weg.

Mfg Frank

.chicken 14. Mai 2007 18:23

Re: ListBox formatieren
 
Aso, super das probier ich gleich mal aus ;-)

.chicken 14. Mai 2007 18:38

Re: ListBox formatieren
 
Hat geklappt, super danke ;-)

jmit 14. Mai 2007 18:44

Re: ListBox formatieren
 
Hallo,

Zitat:

Zitat von .chicken
Also ich habe es nun hinbekommen, die Texte in meiner ListBox zu formatieren...

Mich würde einmal interessieren wie.

EDIT: Sollte richtig lesen, Entschuldigung.

Gruß Jörg

.chicken 14. Mai 2007 18:58

Re: ListBox formatieren
 
;-)


Alle Zeitangaben in WEZ +1. Es ist jetzt 18:50 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz