Ajuda com Listview

[bertu]

Ae galera, estou desenvolvendo uma aplicacao que adiciona certas linhas de um Memo, num Listview!! Queria saber se tem como deixar uma determinada Linha do Listview em negrito ? Quais eu iria determinar de acordo com uma variavel! So queria saber se tem como por uma linha do listview em negrito!

[Jhonas]

Ae galera, estou desenvolvendo uma aplicacao que adiciona certas linhas de um Memo, num Listview!! Queria saber se tem como deixar uma determinada Linha do Listview em negrito ? Quais eu iria determinar de acordo com uma variavel! So queria saber se tem como por uma linha do listview em negrito!

procedure TForm1.ListView1CustomDrawItem(Sender: TCustomListView;
  Item: TListItem; State: TCustomDrawState; var DefaultDraw: Boolean);
begin
  if item.Caption = 'aaaaa' then
     ListView1.Items.Item[0].ListView.Canvas.Font.Style := [fsBold];
end;

OBS: no evento o OnCustomDrawItem do listview voce procura pelo caption do item e deixa ele em negrito

abraço

[bertu]

Ae galera, estou desenvolvendo uma aplicacao que adiciona certas linhas de um Memo, num Listview!! Queria saber se tem como deixar uma determinada Linha do Listview em negrito ? Quais eu iria determinar de acordo com uma variavel! So queria saber se tem como por uma linha do listview em negrito!

procedure TForm1.ListView1CustomDrawItem(Sender: TCustomListView;
  Item: TListItem; State: TCustomDrawState; var DefaultDraw: Boolean);
begin
  if item.Caption = 'aaaaa' then
     ListView1.Items.Item[0].ListView.Canvas.Font.Style := [fsBold];
end;

OBS: no evento o OnCustomDrawItem do listview voce procura pelo caption do item e deixa ele em negrito

abraço

não sei oque aconteceu, mais não funcionou não! Coloquei o codigo aqui, mais nenhuma linha ficou em negrito !!! No caso eu tenho uma Coluna no Listview que chama Visualizada, ae seria caso tivesse não ficaria em Negrito, se tivesse SIM ficaria normal intendeu ?