Прокрутка двух RichEdit ов одновременно

← →
Mitrofan (2003-03-10 10:03) [0]

Уважаемые мастера, подскажите как сделать следующее.
Задача следующая:
Имеется два RichEdit"a и один ScrollBar, нужно синхронно прокручивать эти два RichEdit"a. RichEdit"ы содержат порядка
300 строк.
Пробовал в обработчике
Scrollbar1Scroll(Sender: TObject; ScrollCode: TScrollCode;
var ScrollPos: Integer);
вызывать такой код:
{
wParam:=SB_THUMBTRACK + ScrollPos shl 16;
RichEdit1.Perform(WM_VSCROLL,wParam,0);
RichEdit2.Perform(WM_VSCROLL,wParam,0);
}
Прокручивается но не до конца :( Где копать ???

← →
Song © (2003-03-10 10:07) [1]

Да SelStart одинаковый устанавливай для обоих.

← →
Mitrofan (2003-03-10 10:11) [2]

А что этот парпметр обозначает ???

← →
Mitrofan (2003-03-10 10:20) [3]

Не помогает :( Может пару строк кода подкинете, а то я может не туда всавляю ?

← →
Song © (2003-03-10 10:28) [4]

RichEdit2.SelStart:=RichEdit1.SelStart;
RichEdit2.Perform(EM_SCROLLCARET,0,0);

Это если фокус в первом ричедите. Если во втором, тогда нужно сообщение первому посылать.

← →
Mitrofan (2003-03-10 10:31) [5]

Дело в том что у RichEdit"ов установлено Enabled в false :(

← →
Mitrofan (2003-03-10 12:50) [6]

Никак не получается, помогите кто-нибудь, плизззззззз !!!

Прокрутка двух RichEdit ов одновременно Найти похожие ветки