Registriert seit: 31. Aug 2005
1.622 Beiträge
FreePascal / Lazarus
|
Re: Problem mit ListView, OwnerDraw und Font
31. Jan 2007, 20:40
Du hast recht...
Danke!
Kannst du mir jetzt nur noch erklären, warum das jetzt funktioniert?
Wie kann ich jetzt aber die zweite Zeile nicht dick schreiben, also folgendes?
Delphi-Quellcode:
for i := 0 to Item.SubItems.Count-1 do
begin
s := Item.SubItems[i];
TextOut(x,y,s);
y := y + TextHeight(s);
Font.Style := [];
end;
Das klappt nämlich nicht...
Andreas "Sollen sich auch alle schämen, die gedankenlos sich der Wunder der Wissenschaft und Technik bedienen, und nicht mehr davon geistig erfasst haben als die Kuh von der Botanik der Pflanzen, die sie mit Wohlbehagen frisst." - Albert Einstein
|