Delphi-PRAXiS
Seite 2 von 2     12   

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 Listboxitem zentrieren? (https://www.delphipraxis.net/180998-listboxitem-zentrieren.html)

Mikkey 8. Jul 2014 07:22

AW: Listboxitem zentrieren?
 
Zitat:

Zitat von Mattze (Beitrag 1264786)
Ob das vom Zeitbedarf noch sinnvoll wird oder die Listbox da zu langsam wird?!

Das ist das geringste Problem.

Ich habe früher (r), als es noch keine Listviews gab, (in C++) so etwas häufig gemacht und dabei sogar die (über der Listbox plazierten) Label richtig hingeschoben.

Wahrscheinlich suchst Du eher nach einer Möglichkeit, die "eklige Rechnung" nicht durchzuführen. Aber - wenn Du denn die Anforderungen erfüllen willst - da wirst Du nicht drumherum kommen.

Geht es jeweils nur um eine Zeile oder können sich die "Tabstops" für die ganze Listbox durch einen besonders langen Textteil verschieben?

himitsu 8. Jul 2014 09:43

AW: Listboxitem zentrieren?
 
Man könnte notfalls das Zeichnen und Berechnen zusammen durchführen.

- ein Bitmap im Hintergrund
- das wird so groß gemacht, wie die zu zeichnende Zelle
- da wird dann der Text draufgezeichnet und dabei lässt man sich auch gleich die Größe geben, um den nächsten Text hinten anzuhängen
- am Ende hat man die Gesamtlänge (abgerundet auf die Zellenbreite, wenn breiter)
- berechnet nun den Zentrierungsanfang
- und kopiert das Bitmap ins Canvas der ListBox

Oder man berechnet die Breite schon beim Einfügen/Ändern der Texte, bzw. spätestens beim/vorm ersten Zeichnen, und speichert sie für die nachfolgende Zeichenoperationen.

Mattze 8. Jul 2014 13:29

AW: Listboxitem zentrieren?
 
Hallo himitsu,

ich danke Dir!!!
Das ist nämlich die Idee, die ich im ersten Post hatte, aber an der ich selber noch etwas zweifelte. obei die gleichzeitige Ausgabe und Längenberechnung auf der Bitmap genau der zusätzliche Kick war, den ich brauchte.
(Mich störte einfach, dass ich das zweimal machen sollte. Einmal die Ausgabe und einmal die Längenberechnung.)

Diese Möglichkeit hast Du mir bestätigt, also ran...
WMal sehen, wie das am besten ist...

Gruß
Mattze

Mattze 11. Jul 2014 06:19

AW: Listboxitem zentrieren?
 
Hallo Allerseits,

ich habe noch eine einfachere Methode gefunden, um einen Listboxeintrag bzgl. Listbox.clientwidth zu zentrieren:
Im Drawitem habe ich hinzugefügt:
(crect ist eine TRECT-Variable. Unnötig, aber so brauche ich das nur einmal berechnen.
l ist die letzte penpos.x. Am besten nimmt man etwas mehr oder berechnet l exakt. Damit "kursive TTs" beachtet werden.)

Delphi-Quellcode:
      bmp:=Tbitmap.create;
      with bmp do
        try
          height:=itemheight;
          width:=324;
          crect:=classes.rect(0,0,l,height);
          canvas.CopyRect(crect,self.canvas,classes.rect(0,rect.top,l,rect.top+itemheight));
          self.Canvas.FillRect(rect);
          i:=(clientwidth-l) Div 2;
          if i<0 then i:=0;
          self.Canvas.CopyRect(classes.rect(i,rect.top,i+l,rect.Top+itemheight),bmp.canvas,crect);
        finally
          bmp.free
        end;
Das geht schnell und einfach.

Gruß
Mattze


Alle Zeitangaben in WEZ +1. Es ist jetzt 03:33 Uhr.
Seite 2 von 2     12   

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