void __fastcall TForm1::Button1Click(TObject *Sender)
{
SetScrollPos(ListView1->Handle, SB_HORZ, 50, true);
}
Программная прокрутка TListView с помощью API SetScrollPos
Кидаю на форму ListView и кнопочку. ListView в стиле vsReport, несколько колонок (чтобы выходили за размеры ListView и появился горизонтальный ScrollBar). В обработчике кнопки следующий код:
Код:
ЗЫ. Позиционировать надо абсолютно, а не относительно, поэтому TListView::Scroll не подходит
Код:
ListView1->Scroll(GetScrollPos(ListView1->Handle, SB_HORZ) * -1, 0);
ListView1->Scroll(150, 0);
ListView1->Scroll(150, 0);
не пойдёт?
а то после ScrollWindow и SetScrollPos ListView что-то не хочет перерисовываться корректно...
ЗЫ: если неправильно или коряво уж извиняй =)
Скачет только при отрисовке, ну да ладно
Код:
ListView1->Canvas->Lock();
а после
Код:
ListView1->Canvas->Unlock();
по идее, должно перестать скакать... если я не ошибаюсь, конечно.