谁能告诉我？50+150（分）！(50分)

Y

yangh

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-12-21

• #1

我用syneidt控件的时候，不知如何得到当前鼠标位置的
行和列，SendMessage(synEdit1.Handle, EM_CHARFROMPOS, 0, LongInt(@mpt));
怎么不好使？另外，如何把鼠标位置，移到当前位置？

 

R

Reboot

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-12-21

• #2

我没有用过synEdit，下面是我刚做的Memo版本，光标跟随鼠标移动，希望有所帮助
procedure TForm1.Memo1MouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
var
RetVal: DWord;
begin
RetVal := SendMessage(Memo1.Handle,
EM_CHARFROMPOS,0,MAKELPARAM(X,Y));
if RetVal<>-1 then
SendMessage(Memo1.Handle,EM_SETSEL,
LOWORD(RetVal),LOWORD(RetVal));
end;

 

Y

yangh

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-12-21

• #3

在memo 和 richedit 中都好使，但在synedit中不好使，
synedit是从TCustomControl 继承过来的，怎样才能实现
这一功能呢？

 

R

Reboot

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-12-22

• #4

yangh:
>>synedit是从TCustomControl 继承过来
synedit根本没用Windows的Edit或RichEdit?
编辑方法完全自己做的?

 

Y

yangh

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-12-24

• #5

reboot :这如何是好？如何进行编程实现这一功能！
庆诸位帮帮忙！

 

J

jqw

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-12-26

• #6

I donot use syneidt

 

Y

yangh

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-12-28

• #7

reboot:
虽然你没回答对，让你捡了个便宜!

 

Y

yangh

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-01-04

• #8

接受答案了.