Memo问题

khzide 2003-07-29 01:58:16

在Memo中使用SetSel时，如果此时设置范围不在可视区域内，会自动滚动到可视区域。怎样才能不让其滚动。

...全文

36 5 打赏收藏转发到动态举报

写回复

5 条回复

切换为时间正序

请发表友善的回复…

发表回复

elilor 2003-08-02

打赏
举报

回复

我是试过的，是有一点闪,不会滚屏的，应该能够满足要求

我要是第一个up就好了，唉

khzide 2003-08-01

打赏
举报

回复

楼上说的不行，因为Visible之后，不光是屏会闪，还会自动滚屏，不可取。

elilor 2003-07-29

打赏
举报

回复

Memo1.Visible:=false;
Memo1.SetSelTextBuf('Hello');
Memo1.Visible:=true;

web700 2003-07-29

打赏
举报

回复

up

wisefish 2003-07-29

打赏
举报

回复

up

当memo内容多时,换行定位类似假死…… 1、内容读进readTxtKeep 2、要查找的关键字KeyStr 3、刷新Memeo显示ss 4、然后根据前面显示的次数、关键字,Memeo定位到需要的位置

MEMO控件MEMO控件

这是早上传的发现有问题不能在Delphi Xe5中运行但能在Delphi7中运行我想删除它也没权限 http://download.csdn.net/detail/teststudio/6404077 所以重传下 Delphi TMemo字符串的查找完全实现已经完全的解决Delphi TMemo的查找对话框和替换对话框功能的所有功能查看 GIF http://images.cnblogs.com/cnblogs_com/xe2011/524919/o_TFindDialog.gif

一个简单的备忘录 public void doPost(HttpServletRequest request, HttpServletResponse response) throws ServletException, IOException { String action = request.getParameter("action"); if(action.equals("add")) { Memo memo = new Memo(); String path = memo.add(request, response); this.dispatch(request,response,path); } if(action.equals("select")) { Memo memo = new Memo(); String path = memo.select(request, response); this.dispatch(request, response, path); } if(action.equals("save")) { Memo memo = new Memo(); String path = memo.save(request, response); this.dispatch(request, response, path); } }

Delphi XE7 Indy的IdHTTP写的微信公众平台，只做了部分功能，希望大家能用上 temp := JSONObject.Values['subscribe'].ToString; Memo1.Lines.Add('subscribe:' + temp); temp := JSONObject.Values['openid'].ToString; Memo1.Lines.Add('openid:' + temp); temp := JSONObject.Values['nickname'].ToString; Memo1.Lines.Add('nickname:' + temp); temp := JSONObject.Values['sex'].ToString; Memo1.Lines.Add('sex:' + temp); temp := JSONObject.Values['city'].ToString; Memo1.Lines.Add('city:' + temp); temp := JSONObject.Values['country'].ToString; Memo1.Lines.Add('country:' + temp); temp := JSONObject.Values['province'].ToString; Memo1.Lines.Add('province:' + temp); temp := JSONObject.Values['language'].ToString; Memo1.Lines.Add('language:' + temp); temp := JSONObject.Values['headimgurl'].ToString; Memo1.Lines.Add('headimgurl:' + temp); temp := JSONObject.Values['subscribe_time'].ToString; Memo1.Lines.Add('subscribe_time:' + temp); temp := JSONObject.Values['remark'].ToString; Memo1.Lines.Add('remark:' + temp);

5,928

社区成员

262,931

社区内容

发帖

与我相关

我的任务

社区管理员

加入社区

近7日
近30日
至今

加载中

查看更多榜单

社区公告

暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章