Preciso que meu ListView identifique os valores de um item Text, por exemplo: , "Completo"/"Pendente" e faça com que cada um tenha uma cor diferente dentro da ListView. Tentei formatar por código, mas não consegui, vi que na .VCL tem o CustomDrawSubItem que coloca-se o loop lá e faz isso, porém não achei no .FMX que é o que eu quero. A que tem abaixo dá Acess Violation, como devo fazer isso?
procedure TformExames.listView1ApplyStyleLookup(Sender: TObject);
var
i : integer;
begin
for i := 0 to listView1.Items.Count -1 do
if listView1.Items[i].Text = 'Cancel' then
listView1.BeginUpdate;
listView1.Items[i].Objects.TextObject.TextColor := 444444;
listView1.EndUpdate;
end;