找回密码
 立即注册→加入我们

QQ登录

只需一步,快速开始

搜索
热搜: 下载 VB C 实现 编写
查看: 1441|回复: 15

【VB6】【自定义内置控件】UnicodeTextBox.ctl

[复制链接]

55

主题

271

回帖

9330

积分

用户组: 管理员

UID
77
精华
16
威望
237 点
宅币
8199 个
贡献
251 次
宅之契约
0 份
在线时间
253 小时
注册时间
2014-2-22
发表于 2022-6-1 03:42:36 | 显示全部楼层 |阅读模式

欢迎访问技术宅的结界,请注册或者登录吧。

您需要 登录 才可以下载或查看,没有账号?立即注册→加入我们

×
这是一个“内置控件”,无需携带OCX或DLL。只需把这个文件加入到你的VB工程里,即可像使用普通TextBox一样使用这个支持UNICODE的TextBox。它支持的属性仅有几个(Flat、Text、MultiLine),也不支持任何事件。但是提供了句柄,你可以通过子类化来实现截获事件。
+.png
游客,如果您要查看本帖隐藏内容请回复

本帖被以下淘专辑推荐:

回复

使用道具 举报

9

主题

172

回帖

1万

积分

用户组: 真·技术宅

UID
4293
精华
6
威望
441 点
宅币
8636 个
贡献
850 次
宅之契约
0 份
在线时间
335 小时
注册时间
2018-9-19
发表于 2022-6-1 12:37:44 | 显示全部楼层
本帖最后由 系统消息 于 2022-6-1 12:43 编辑

怎么感觉不对劲呢?我记得好像是 UserControl_Initialize 里面不能使用 UserControl.hWnd 吧,比较这是这对象创建的时候执行的,这个时候控件都没创建。需要在 InitProperties 和 ReadProperties 这俩事件里面进行。
回复 赞! 靠!

使用道具 举报

9

主题

172

回帖

1万

积分

用户组: 真·技术宅

UID
4293
精华
6
威望
441 点
宅币
8636 个
贡献
850 次
宅之契约
0 份
在线时间
335 小时
注册时间
2018-9-19
发表于 2022-6-3 10:16:53 | 显示全部楼层
系统消息 发表于 2022-6-1 12:37
怎么感觉不对劲呢?我记得好像是 UserControl_Initialize 里面不能使用 UserControl.hWnd 吧,比较这是这对 ...

我去试了一下,没想到居然可以用,看来是我记错了,只有 Print、Ambient 和 Extender 才是不能在 UserControl_Initialize 中使用,hWnd 是可以使用的。
最神奇的是,在你使用了 hWnd 之后,Print 就开始可以用了(原理和Form类似,隐式自动Load),但 Ambient 和 Extender 还是不能用(只有等控件与调用者把父容器连接上了才可以,这种情况要在 UserControl_InitProperties 和 UserControl_ReadProperties 里面才可以)。
回复 赞! 靠!

使用道具 举报

1109

主题

1649

回帖

7万

积分

用户组: 管理员

一只技术宅

UID
1
精华
244
威望
743 点
宅币
24180 个
贡献
46222 次
宅之契约
0 份
在线时间
2294 小时
注册时间
2014-1-26
发表于 2022-6-3 13:04:30 | 显示全部楼层
你这个竟然不支持事件!

VB6 里面声明事件的方法是在用户控件的开头(第一个过程或函数的前面)使用这样的语句:
  1. Public Event 事件名(参数列表)
复制代码
然后在应当触发事件的地方使用以下代码来触发事件:
  1. RaiseEvent 事件名(参数列表)
复制代码
举例:

vbevent.png

该代码将 PictureBox 制作的“picItemList”的 Click 和 DblClick 事件包装为本控件自己的点击事件、双击事件。

类似的,KeyDown、KeyUp、MouseDown、MouseUp、MouseMove 等事件也可以像这样封装。
回复 赞! 靠!

使用道具 举报

1

主题

157

回帖

605

积分

用户组: 大·技术宅

UID
7535
精华
0
威望
0 点
宅币
447 个
贡献
0 次
宅之契约
0 份
在线时间
68 小时
注册时间
2021-10-16
发表于 2022-6-7 10:16:00 | 显示全部楼层
珍惜生命,果断回帖。
回复 赞! 靠!

使用道具 举报

0

主题

22

回帖

47

积分

用户组: 初·技术宅

UID
7859
精华
0
威望
2 点
宅币
21 个
贡献
0 次
宅之契约
0 份
在线时间
9 小时
注册时间
2022-5-24
发表于 2022-8-11 11:40:17 | 显示全部楼层
为什么不支持事件呢
回复 赞! 靠!

使用道具 举报

0

主题

26

回帖

98

积分

用户组: 小·技术宅

UID
2399
精华
0
威望
0 点
宅币
72 个
贡献
0 次
宅之契约
0 份
在线时间
26 小时
注册时间
2017-4-12
发表于 2022-10-31 22:47:53 | 显示全部楼层
学习一下
回复

使用道具 举报

0

主题

17

回帖

51

积分

用户组: 小·技术宅

UID
2974
精华
0
威望
2 点
宅币
42 个
贡献
0 次
宅之契约
0 份
在线时间
8 小时
注册时间
2017-10-18
发表于 2022-11-4 11:31:14 | 显示全部楼层
学习一下
回复

使用道具 举报

0

主题

11

回帖

44

积分

用户组: 初·技术宅

UID
8289
精华
0
威望
2 点
宅币
29 个
贡献
0 次
宅之契约
0 份
在线时间
2 小时
注册时间
2023-4-7
发表于 2023-4-7 23:56:02 | 显示全部楼层
XX
回复

使用道具 举报

0

主题

11

回帖

268

积分

用户组: 中·技术宅

UID
8012
精华
0
威望
2 点
宅币
253 个
贡献
0 次
宅之契约
0 份
在线时间
57 小时
注册时间
2022-8-9
发表于 2023-4-9 16:11:06 | 显示全部楼层
感谢分享!
终于不用为Unicode发愁了!
回复 赞! 靠!

使用道具 举报

0

主题

3

回帖

19

积分

用户组: 初·技术宅

UID
3113
精华
0
威望
2 点
宅币
12 个
贡献
0 次
宅之契约
0 份
在线时间
0 小时
注册时间
2017-11-20
发表于 2023-7-18 21:14:28 | 显示全部楼层
谢谢
回复

使用道具 举报

0

主题

4

回帖

19

积分

用户组: 初·技术宅

UID
8384
精华
0
威望
2 点
宅币
11 个
贡献
0 次
宅之契约
0 份
在线时间
1 小时
注册时间
2023-8-3
发表于 2023-8-4 14:51:29 | 显示全部楼层
看看这个text控件怎么样
回复 赞! 靠!

使用道具 举报

0

主题

5

回帖

27

积分

用户组: 初·技术宅

UID
8405
精华
0
威望
2 点
宅币
18 个
贡献
0 次
宅之契约
0 份
在线时间
2 小时
注册时间
2023-8-14
发表于 2023-8-19 15:43:47 | 显示全部楼层
來學習這個物件怎樣使用。
回复 赞! 靠!

使用道具 举报

5

主题

27

回帖

359

积分

用户组: 中·技术宅

UID
8534
精华
0
威望
2 点
宅币
323 个
贡献
0 次
宅之契约
0 份
在线时间
54 小时
注册时间
2024-1-14
发表于 2024-3-16 21:22:52 | 显示全部楼层
感谢分享,回复学习!
回复 赞! 靠!

使用道具 举报

QQ|Archiver|小黑屋|技术宅的结界 ( 滇ICP备16008837号 )|网站地图

GMT+8, 2024-3-29 17:36 , Processed in 0.055109 second(s), 36 queries , Gzip On.

Powered by Discuz! X3.5

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表