社区
VB
帖子详情
有关Procedure Attribute的问题
Corny
2002-03-16 04:31:07
我们在VB6中设计控件时都可以定义Procedure Attribute
请问在.Net中如何实现
还有自定义的属性页
.Net如何继承ActiveX控件,
我在继承时出错,出错的方式多多
包括数值类型转换和传送
由.Net自动生成的包装集不能完成继承后的参数传送
包括Color,Font,Image等类型
...全文
50
5
打赏
收藏
有关Procedure Attribute的问题
我们在VB6中设计控件时都可以定义Procedure Attribute 请问在.Net中如何实现 还有自定义的属性页 .Net如何继承ActiveX控件, 我在继承时出错,出错的方式多多 包括数值类型转换和传送 由.Net自动生成的包装集不能完成继承后的参数传送 包括Color,Font,Image等类型
复制链接
扫一扫
分享
转发到动态
举报
AI
作业
写回复
配置赞助广告
用AI写文章
5 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
Corny
2002-03-18
打赏
举报
回复
搞定,谢谢各位。有感兴趣的参见
http://msdn.microsoft.com/library/en-us/dndotnet/html/pdc_vsdescmp.asp?frame=true#pdc_vsdescmp_topic4
Corny
2002-03-17
打赏
举报
回复
to:dggh
在Windows Form里使用控件确实没问题,我要继承它做二发开发呀,但即使在userControl里做复合控件,也需要正确传送参数,但类型错误经常引发问题,即使经过interopService封装成同类型(自动)的参数,传送过程中仍然引发致命性错误
Corny
2002-03-17
打赏
举报
回复
to:装配脑袋
labelAttribute该怎么用呀?缺省的情况下是没有定义该特性的
另:按照.Net文档说明,是可以从COM继承的。先“将Com用InteropService封装后就成为了一个完全的.Net类库,可以实现.Net类库的任何操作方式”,包括继承,文档上就这么说的呀。
但在实际使用时,即使完全封装了ocx控件,仍然问题多多。是BUG,还是MS不支持,文档上为什么要说可以呀?
是不是 MS 在蒙我们呀
dggh
2002-03-16
打赏
举报
回复
你需要使用Windows Forms ActiveX Control Importer (Aximp.exe)来把一个在COM 类型库中的ActiveX控件转化成一个包装类控件,它里面有一个 ActiveX的实例知道如何与原来的控件通讯,但它可以显示为Windows Forms控件,转换命令如下:
aximp [options]{file.dll | file.ocx}
转换之后你就可以像使用Windows Forms控件一样使用它了
Ninputer
2002-03-16
打赏
举报
回复
改用Attribute Label实现。
无法继承ActiveX控件,最好不要这么做!
Oracle JOB,
procedure
,cursor 的使用
NULL 博文链接:https://springlin.iteye.com/blog/1531017
《Oracle 10g应用服务器管理与网格计算》源代码
《Oracle 10g应用服务器管理与网格计算》源代码-龚涛
oracle创建各种对象
oracle创建对象:
procedure
,index,view,function,trigger,sequence,package,type,table,cursor,job
Delphi 获取文件访问时间.rar
Delphi 获取文件访问时间,也主是最后一次打开文件 的时间,基于Delphi7实现。相关代码如下:
procedure
TForm1.SpeedButton1Click(Sender: TObject); begin if OpenDialog1.Execute then begin Edit1.Text := OpenDialog1.FileName; Edit2.Text := ''; end; end;
procedure
TForm1.Button1Click(Sender: TObject); begin if Edit1.Text<>'' then Edit2.Text := GetDateTime(Pchar(OpenDialog1.FileName)); end; function TForm1.GetDateTime(const FileName: Pchar): string; var hFile : THandle; Sy : TSecurity
Attribute
s; WTime, LTime : TFILETIME; STime : TSystemTime; begin Sy.nLength := SizeOf(TSecurity
Attribute
s); //必需参数 Sy.lpSecurityDescriptor := nil; Sy.bInheritHandle:=False; hFile := CreateFile(PChar(FileName),GENERIC_READ , 1 ,@Sy,OPEN_EXISTING, FILE_
ATTRIBUTE
_NORMAL, 1); if hFile=INVALID_HANDLE_VALUE then Result:='' else begin GetFileTime(hFile, nil, @WTime, nil); FileTimeToLocalFileTime(WTime, LTime); FileTimeToSystemTime(LTime, STime); Result:=Format('%d年%d月%d日 %2.2d:%2.2d:%2.2d',[STime.wYear,STime.wMonth,STime.wDay,STime.wHour,STime.wMinute,STime.wSecond]); end; end;
spc统计品质管理工具箱.DOC
spc统计品质管理工具箱.DOC
VB
16,721
社区成员
110,526
社区内容
发帖
与我相关
我的任务
VB
VB技术相关讨论,主要为经典vb,即VB6.0
复制链接
扫一扫
分享
社区描述
VB技术相关讨论,主要为经典vb,即VB6.0
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章