Seçili satır

[brs]

Merhabalar,

Listviewde seçili satırın item background rengini değiştirmek istiyorum fakat, bir türlü çözüm bulamadım, bu konuda nasıl bir yol izleye bilirim?

var
  LStyleObject: TFmxObject;
begin
  LStyleObject := ListView.FindStyleResource('itembackground');
  if LStyleObject is TColorObject then
    TColorObject(LStyleObject).Color := TAlphaColorRec.Slategray;
end;

 

 var
  Obj: TFMXObject;
begin
  if (Sender is TListView) then
  begin
    Obj := TListView(Sender).FindStyleResource('itembackground');
    if assigned(Obj) then
      if Obj is TColorObject then
        TColorObject(Obj).Color :=TAlphaColors.Red;
  end;
end;