Перейти к содержанию
Fire Monkey от А до Я
  • 0

Обработчик достижения конца списка listview в Delphi XE7


Satellite

Вопрос

Здравствуйте, каким образом можно отследить достижение конца списка в listview?

Наверное, все пользовались приложениями социальных сетей, где список обновляется автоматически. (Пример: VK)

Хочется сделать также и в Delphi XE7.

 

В Java обрабатывается с помощью onOverScrolled

Ссылка на комментарий

Рекомендуемые сообщения

  • 0

Как вам такой вариант?

procedure TForm1.ListView1Painting(Sender: TObject; Canvas: TCanvas;
  const ARect: TRectF);
begin
   if ListView1.GetItemRect( ListView1.ItemCount-1 ).Bottom = ListView1.Height then
      Label1.Text := 'YES! Через одно место, но работает!'
   else
      Label1.Text := 'Это еще не конец...';
end;
Ссылка на комментарий

Присоединяйтесь к обсуждению

Вы можете написать сейчас и зарегистрироваться позже. Если у вас есть аккаунт, авторизуйтесь, чтобы опубликовать от имени своего аккаунта.

Гость
Ответить на вопрос...

×   Вставлено с форматированием.   Вставить как обычный текст

  Разрешено использовать не более 75 эмодзи.

×   Ваша ссылка была автоматически встроена.   Отображать как обычную ссылку

×   Ваш предыдущий контент был восстановлен.   Очистить редактор

×   Вы не можете вставлять изображения напрямую. Загружайте или вставляйте изображения по ссылке.

×
×
  • Создать...