sexta-feira, 14 de junho de 2019

Saber se o listview do firemonkey chegou no fim
var
  R: TRectF;
begin
  if TListView(Sender).ItemCount > 0 then // Just in case...
  begin
    // Get the last item's Rect
    R := TListView(Sender).GetItemRect(TListView(Sender).ItemCount - 1);
    // Bottom?
    if R.Bottom = TListView(Sender).Height then
      showmessage('Reached bottom');
  end;
end; 


Basta colocar no evento OnScrollViewChange do listview.

Nenhum comentário: