Como alterar fonte num listview dependendo de uma condi��o?

Question

Fala galera blz?Dei uma pesquisada aqui no f�rum mais n�o achei.To usando um listview no lugar do DBGrid e gostaria de alterar a fonte de um registro para negrito, s� que dependendo de uma condi��o.Nu...

Rodc · Answer

[code:1:7a3334c9b1]ListView1.Font.Style := &#91;fsBold&93;;[/code:1:7a3334c9b1]Isto n�o resolve o problema?...

Vitoreduardo · Answer

Fala rodcN�o funcionou.Fiz assim:[code:1:867397d1ca]If DM_Geral.IBDSContas.FieldByName(�Situacao�).Value = �Pago�thenbegin ListView1.Font.Style := &#91;fsBold&93;; end;[/code:1:867397d1ca]...

Rodc · Answer

Usando a fun��o OnCustomDrawItem() do ListView eu consegui fazer a linha ficar em negrito. Mas n�o entendi bem como funciona, porque se tirar a linha do TextOut ele n�o faz o negrito. Mas tenta a�. Se n�o conseguir d� uma olhada no help e na net para descobrir como estes eventos de OnDraw do ListView funcionam.

    if (Item.Caption = �teste�)
    begin
        Sender.Canvas.Font->Style := [fsBold];
        Sender.Canvas.TextOut(0, 0, ��);
    end;

Abra�os,

Rodc · Answer

Op�, no c�digo troca o �->� por ponto. � que eu copiei do BCB....

Vitoreduardo · Answer

Ow rodc blz?Fiz do jeito que vc falo.[code:1:1865db94ca]if (Item.Caption = �teste�)     begin         Sender.Canvas.Font->Style := &#91;fsBold&93;;         Sender.Canvas.TextOut(0, 0, ��);     end;[/code:1:1865db94ca]Mais n�o deu muito certo n�o, s� se o ultimo registro tiver com a situa��o igual a pago, s� que ai todos os registro fica em negrito.Mais vou continuar tentando.Obrigado....

Rodc · Answer

Tente tirar o negrito nos outros casos:[code:1:109e5fc23b]    if (Item.Caption = �teste�)     begin         Sender.Canvas.Font.Style := &#91;fsBold&93;;         Sender.Canvas.TextOut(0, 0, ��);     end    else    begin        Sender.Canvas.Font.Style := &91;&93;;         Sender.Canvas.TextOut(0, 0, ��);     end;[/code:1:109e5fc23b]...

Vitoreduardo · Answer

Fiz isso:[code:1:c2190b34b7]if (Item.Caption = �teste�)     begin         Sender.Canvas.Font.Style := &#91;fsBold&93;;         Sender.Canvas.TextOut(0, 0, ��);     end     else     begin         Sender.Canvas.Font.Style := &91;&93;;         Sender.Canvas.TextOut(0, 0, ��);     end;[/code:1:c2190b34b7]Mais mesmo assim todos os registros ficam em negrito....

Rodc · Answer

Tenta usar nos outros eventos �Draw� do componente, d� uma olhada no help para saber como usar os eventos, e procura no google algum c�digo usando estas fun��es e que tenha a palavra �fsBold�, talv�s voc� encontre.

F�rum Como alterar fonte num listview dependendo de uma condi��o? #323771