5,388
社区成员
发帖
与我相关
我的任务
分享请发表友善的回复…
发表回复
sdxzj123456 2006-08-07
- 打赏
- 举报
CreateCaret(Edit1.Handle, 0, 10, 2);
改改坐标。。。。
//////////////////
CreateCaret()的参数和坐标无关
改改坐标。。。。
//////////////////
CreateCaret()的参数和坐标无关
zhitaoyang 2006-08-07
- 打赏
- 举报
CreateCaret(Edit1.Handle, 0, 10, 2);
改改坐标。。。。
改改坐标。。。。
sdxzj123456 2006-08-07
- 打赏
- 举报
前辈：
我用了你的代码后，光标变成横条，可是光标在ｅｄｉｔ上方，如何让光标在edit下边？
谢
我用了你的代码后，光标变成横条，可是光标在ｅｄｉｔ上方，如何让光标在edit下边？
谢
ccrun.com 2006-08-07
- 打赏
- 举报
procedure TForm1.Edit1MouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
CreateCaret(Edit1.Handle, 0, 10, 2);
ShowCaret(Edit1.Handle);
end;
Shift: TShiftState; X, Y: Integer);
begin
CreateCaret(Edit1.Handle, 0, 10, 2);
ShowCaret(Edit1.Handle);
end;
ccrun.com 2006-08-07
- 打赏
- 举报
见楼主的另一个帖子。我已回复。
