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

Listbox и scroll to end


DMS

Вопрос

Как программно прокрутить листбокс в самый конец списка?

Мой код не работает:

var
  Item: TListBoxItem;

  Item := ListBox1.ListItems[ListBox1.Items.Count - 1];
  ListBox1.ScrollToItem(Item);

Спасибо заранее.

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

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

  • 0
  • Модераторы

ну незнаю, у меня работает

procedure TForm3.Button1Click(Sender: TObject);
var
  I: Integer;
begin
  for I := 0 to 49 do
    ListBox1.Items.Add(I.ToString);
end;

procedure TForm3.Button2Click(Sender: TObject);
begin
  ListBox1.ScrollToItem(ListBox1.ItemByIndex(ListBox1.Count - 1));
end;

 

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

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

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

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

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

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

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

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

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

  • Последние посетители   0 пользователей онлайн

    • Ни одного зарегистрированного пользователя не просматривает данную страницу
×
×
  • Создать...