2024年11月21日 星期四 首页 编程论坛 技术文档 黑客安全 源代码 应用下载 电子图书 电脑硬件 游戏开发 休闲娱乐 编程网站  
‹‹ 上一主题 | 下一主题 ››
发新话题
打印

[控件] 如何防止text框上下滚动

xiangwentian

初级程序员

Rank: 2Rank: 2
1# 大中 小发表于 2010-6-17 16:55  只看该作者

如何防止text框上下滚动

我用一个text控件来输出socket连接返回的代码，每次定位到最后一行
    Text1.Text = Text1.Text + STR1
   Text1.SelStart = Len(Text1.Text)

我的问题是，每次socket有输出，text框都会从最上面的一行滚到最后一行，让人眼晕，text控件能不能不来回滚动啊，
还有一个问题就是，text框能不能固定行数或大小，也就是说当text1.text达到一定的行数或大小时，超过的部分自动消失（不要让text过大，占用过多内存，text只保留固定大小或行数的最新内容）
请各位高手不吝赐教

TOP

xiangwentian

初级程序员

Rank: 2Rank: 2
2# 大中 小发表于 2010-6-22 10:17  只看该作者
没有人会么，郁闷中

TOP

Nothing

管理员

Rank: 9Rank: 9Rank: 9Rank: 9Rank: 9
3# 大中 小发表于 2010-6-22 12:38  只看该作者
Text1.SelStart = Len(Text1.Text)
Text1.selText = Text1.Text + STR1
Text1.SelStart = Len(Text1.Text)
换个头像，看见广告就眼红，直接封ID。

TOP

xiangwentian

初级程序员

Rank: 2Rank: 2
4# 大中 小发表于 2010-6-22 16:59  只看该作者
不行啊，每次运行Text1.SelStart = Len(Text1.Text)，都是text1框从最上面滚到最下面，如果换成上面脚本，屏幕滚动更厉害了啊

TOP

Nothing

管理员

Rank: 9Rank: 9Rank: 9Rank: 9Rank: 9
5# 大中 小发表于 2010-6-23 20:43  只看该作者
如果是滚的慢，可能是你的文本太大，正常是很快的，如果文本量太大，可以使用richtextbox
换个头像，看见广告就眼红，直接封ID。

TOP

Nothing

管理员

Rank: 9Rank: 9Rank: 9Rank: 9Rank: 9
6# 大中 小发表于 2010-6-23 21:10  只看该作者
上面的错了，你这样试试
Text1.SelStart = Len(Text1.Text)
Text1.selText = STR1
Text1.SelStart = Len(Text1.Text)
换个头像，看见广告就眼红，直接封ID。

TOP

‹‹ 上一主题 | 下一主题 ››
发新话题