精华区 [关闭][返回]

当前位置:网易精华区>>讨论区精华>>编程开发>>● Delphi>>控件开发和使用>>如何控制memo中的光标移动?

主题:如何控制memo中的光标移动?
发信人: bird_lee()
整理人: teleme(2000-12-06 19:47:45), 站内信件
【 在 zhangzgweida (zzg) 的大作中提到: 】
: 我想在memo中控制光标的移动,如按一下 [right] 将光标向右移动两格,
: 请众高手指点一下.

procedure TForm1.Memo1KeyUp(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
    if key=VK_RIGHT then   SendMessage(Memo1.handle,WM_KEYDOWN,VK_RIGH
T,1);
end;


--
Delphi Fans
http://delfan.yeah.net
Delphi Fans,技巧集(太多了),控件,源码

※ 来源:.月光软件站 http://www.moon-soft.com.[FROM: 202.101.113.205]

[关闭][返回]