Текущий архив: 2005.07.11;
Скачать: CL | DM;
Вниз
Размер формы < размера компонента Найти похожие ветки
← →
heckfy1 (2005-06-23 12:35) [0]На форме лежит панель, её высота больше чем форма при этом у формы появляутся скролбар.
Такой вопрос как отловить скролинг этого скролбара ???
← →
heckfy1 (2005-06-23 12:43) [1]и как программно его (скроллбар) можно сдвинуть??
Подскажите пожалуста!!!
← →
begin...end © (2005-06-23 12:43) [2]WM_VSCROLL + WM_HSCROLL + F1
← →
begin...end © (2005-06-23 12:46) [3]> heckfy1 (23.06.05 12:43) [1]
SetScrollInfo или ScrollWindow
← →
heckfy1 (2005-06-23 12:50) [4]как программно сдвинуть понял а как отловить нет.
киньте процедурку срабатывающую при скролинге формы.
← →
begin...end © (2005-06-23 12:54) [5]> heckfy1 (23.06.05 12:50) [4]
type
TForm1 = class(TForm)
...
private
procedure WMVScroll(var Message: TMessage); message WM_VSCROLL; // вертикальный скроллинг
...
end;
...
procedure TForm1.WMVScroll(var Message: TMessage);
begin
inherited;
Caption := "Ура, товарищи!"
end
Страницы: 1 вся ветка
Текущий архив: 2005.07.11;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.04 c
