Помогите с ошибкой

← →
ErmSergey © (2002-08-23 15:33) [0]

Почему когда я использую в TMemo в событии OnMouseMove
i:=LoWord(RichEdit1.Perform(EM_CHARFROMPOS,0,MakeLParam(X,Y)));
для определения позиции в тексте над которой находится указатель мыши все работает нормально, а в TRichEdit эта же строка вызывает
Access violation in module RICHED20.dll

← →
MBo © (2002-08-23 15:38) [1]

var
p: tpoint;
begin
p := point(x, y);
RichEdit1.SelStart := RichEdit1.Perform(EM_CHARFROMPOS, 0, Integer(@P));

Спасибо, все получилось.
Могу я поинтересоваться почему так происходит?

Помогите с ошибкой Найти похожие ветки