Perform

← →
Elast (2004-01-25 10:02) [0]

Уважаемые мастера!Есть ли возможность становить курсор для Ричедит таким образом:

procedure TfrmMain.Button1Click(Sender: TObject);
begin
RichEdit1.SelStart := strtoint(edEdit1.Text);
RichEdit1.Perform(EM_SCROLLCARET, 0,0);
RichEdit1.SetFocus;
end;

Устанавливается при первом нажатии на кнопку. При последующих - курсор меняет расположение, но его не видно.
Заранее благодарен.

← →
Elast (2004-01-25 11:59) [1]

Просьба, обратить внимание на мой вопрос ...

Perform Найти похожие ветки