Como atribuir uma Imagem a um Item do ListView? Estou querendo colocar uma imagem de acordo com o status do processo. Inicialmente só conseguir fazendo statusbar com componentes externos, porém não posso usar externos. Então usarei uma Imagem de acordo o status mudará a cor, pois retângulo não consegui também. É o seguinte que estou tentando:
var
listStatusExame : TList<TImage>;
txtStatusExame : TListItemImage;
begin
listStatusExame := TList<TImage>.Create;
listview1.BeginUpdate;
for I := 0 to (listview1.Items.Count - 1) do
begin
txtStatusExame := TListItemImage(lvwAtendimentos.Items[i].Objects.FindDrawable
('status_img'));
listStatusExame.add(Image1);
txtStatusExame.ImageSource.ImageList := ImageList1;
end;
end.
Se alguém souber como adicionar um retângulo em um Item do ListView, seria melhor ainda, por gentileza.