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 Weißer Rahmen um Text bei ListBox mit Bild entfernen... (https://www.delphipraxis.net/29979-weisser-rahmen-um-text-bei-listbox-mit-bild-entfernen.html)

jfheins 17. Sep 2004 20:55

Re: Weißer Rahmen um Text bei ListBox mit Bild entfernen...
 
Ich vermute, er meit, dass du (statt) der ListBox zum anzeigen Labels nehmen sollst..
(Registerkarte: Standard; Symbol: großes A)

GuybrushThreepwood 17. Sep 2004 21:17

Re: Weißer Rahmen um Text bei ListBox mit Bild entfernen...
 
Liste der Anhänge anzeigen (Anzahl: 1)
Also... Ich hänge hier mal das Programm an, damit ihr sehen könnt, was passiert.

Das mit den Labels müsste doch Probleme machen, da man bei einem Player auch auf und ab Scrollen muss, wíe soll man das mit Labels realisieren ???

Es ist vollständig mit allen DLL's und etliches...
Das mit Canvas, dass muss ich glaub ich mal in das OnDrawItem Ereignis reintun und dann alles selberzeichnen. Aber wie ist mir n0ch unklar.

Danke vielmals...

Mr. Threepwood

Keldorn 18. Sep 2004 12:16

Re: Weißer Rahmen um Text bei ListBox mit Bild entfernen...
 
ich habe kein rar, gehts auch als zip?

scp 18. Sep 2004 12:24

Re: Weißer Rahmen um Text bei ListBox mit Bild entfernen...
 
Ich hab kein Win9x, also XP: "wolken.bmp konnte nicht gefunden werden."

GuybrushThreepwood 18. Sep 2004 13:18

Re: Weißer Rahmen um Text bei ListBox mit Bild entfernen...
 
Liste der Anhänge anzeigen (Anzahl: 1)
Liebe Leute,

ich habe das Problem gelöst indem ich jetzt alles mit Canvas selber zeichne.

Das ganze sieht nun so aus:

Code:
procedure TMain.ListBox1DrawItem(Control: TWinControl; Index: Integer;
  Rect: TRect; State: TOwnerDrawState);
begin
  ListBox1.Canvas.Brush.Bitmap := X1BMP;
  ListBox1.Canvas.FillRect(Rect);
  ListBox1.Canvas.Brush.Style := bsClear;
  Listbox1.Canvas.TextOut(Rect.Left, Rect.Top, Listbox1.Items[Index]);
end;
Es klappt auch hervorragend, aber nur bei Bildern die sich Kacheln lassen, also Bilder die meist nur ein Pixel hoch sind, denn sonst entstehen beim runterscrollen Bildfehler.

Ich danke euch für eure Hilfe und werde den Player mal anhängen, in Rar...
MfG

Mr. Threepwood


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

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