Kod
Listview'in ListViewCustomDrawSubItem olayına...
begin
if SubItem = 0 then Exit;
if Pos('E', Item.SubItems[2]) > 0 then begin
ListView1.Canvas.Font.Color := $00191919;
ListView1.Canvas.Font.Style := [fsbold];
end; end;
Listview'in ListViewCustomDrawSubItem olayına...
begin
if SubItem = 0 then Exit;
if Pos('E', Item.SubItems[2]) > 0 then begin
ListView1.Canvas.Font.Color := $00191919;
ListView1.Canvas.Font.Style := [fsbold];
end; end;
Digg
Del.icio.us
Technorati
Twitter| LinkBack |
LinkBack URL |
About LinkBacks |
| Bookmark & Share |
Digg this Thread! |
Add Thread to del.icio.us |
Bookmark in Technorati |
Tweet this thread |

Normal