请教关于RichEdit的问题

[bluearc888]

我用两个并排的richedit来处理数据和显视数据的相关属性。
请问怎么做到：
1、对其中一个richedit做滚动操作时，另一个richedit也同时跟着滚动?
2、当我选中（或点击）一个richedit中的某行时，另一个richedit也自动选中相应行?

[hellolongbin]

发送消息

[hellolongbin]

RichEdit1.SelStart := SendMessage(RichEdit1.Handle, EM_LINEINDEX, 这里写你要跳转的行数, 0);
RichEdit1.SelLength:=0;
SendMessage(RichEdit1.Handle, EM_SCROLLCARET, 0, 0);