Forget about my question. 

I found the answer.

This is one way to do it:

procedure TForm1.ListView1CustomDrawItem(Sender: TCustomListView; Item: 
TListItem; State: TCustomDrawState;
  var DefaultDraw: Boolean);
begin
  if odd(Item.Index) then
    Sender.Canvas.Font.Style := [fsBold, fsUnderline]
end;





Jesper Stenlund <[EMAIL PROTECTED]> 
Sänt av: [EMAIL PROTECTED]
2008-10-20 12:47
Sänd svar till
"Borland's Delphi  Discussion List" <[email protected]>


Till
[email protected]
Kopia

Ärende
Bold row in a ListView






Is it possible to draw a bold row in a TListView? (I'm running D2009 and 
Windows XP)

I have been using some "external" component until now but that component 
doesn't work under D2009 and if I can draw a bold row without buying a new 

version of the component I would be very glad.
We are trying to get rid of our external dependencies.

//Jesper
_______________________________________________
Delphi mailing list -> [email protected]
http://lists.elists.org/cgi-bin/mailman/listinfo/delphi

_______________________________________________
Delphi mailing list -> [email protected]
http://lists.elists.org/cgi-bin/mailman/listinfo/delphi

Reply via email to