Форум: "Основная";
Текущий архив: 2004.05.02;
Скачать: [xml.tar.bz2];

Вниз

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

← →
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 и прокручивайте его (фрейм) при помощи полосы прокрутки формы.

---

← →
Kreon ©   (2004-04-17 17:46) [6]

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

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

---

Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2004.05.02;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.45 MB
Время: 0.036 c