Как синхронизировать скрол фрейма о скролом формы ?

← →
Kreon © (2004-04-16 18:44) [0]

Я так понял синхронизацию нужно делать на обработчике OnScroll,
но дело в том что стандартный скрол формы(Form1.VertScrollBar) такого обработчика не имеет. Кде же синхронизировать эти самые скролы?

← →
ASMiD (2004-04-16 18:57) [1]

Только косвенно - по изменению Left или Top какого-либо компонента

← →
TUser © (2004-04-16 19:10) [2]

Наверное, ловить и посылать WM_VSCROLL/WM_HSCROLL/WM_MOUSEWHEEL

← →
ASMiD (2004-04-16 19:11) [3]

>WM_VSCROLL/WM_HSCROLL/WM_MOUSEWHEEL
не получится

← →
TUser © (2004-04-16 19:27) [4]

unit Unit2; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TFrame2 = class(TFrame) ... // кучу компонентов, чтобы было чего скролить // и на форму тоже самое private procedure scr(var Msg:TMessage ); message wm_vscroll; { Private declarations } public { Public declarations } end; implementation uses unit1; {$R *.dfm} procedure TFrame2.scr(var Msg:TMessage ); begin sendMessage(form1.Handle,wm_vscroll,msg.WParam,msg.LParam); inherited; end; end.

← →
Mim1 (2004-04-16 19:53) [5]

А зачем прокручивать фрейм если не секрет?

Отобразите его во весь размер, или поставте для него autosize и прокручивайте его (фрейм) при помощи полосы прокрутки формы.

Mim1 :
Ставишь autosize скрол во фрейме исчезает, но ни фига не прокручивается, а отображение во весь размер ничего не дает. Хотя получилось так что остался один скрол который прокручивал и форму и фрейм. Но это не подходит (содержимое формы глючит :( ).

TUser : Спасибо за код, обязательно попробую.

Как синхронизировать скрол фрейма о скролом формы ? Найти похожие ветки