Image控件的Object Inspector中的Picture属性是如何连接的? 双击Picture就可以弹出一个Form,是如何连接进去的啊?谢谢! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 通过属性编辑器(Property Editors),标准可编辑属性都实现了基本的Editor,自定义属性也可以实现自己的Editor,相关内容请看Delphi帮助的Component Writer's guide的Adding Property Editors章节或相关内容。 type TmyPro=class(TWinControl)protected readString:String; procedure writeString(Value:string);public property FormCaption:String read readString write writeString;end;TMypro.writeString;var Form1:TForm;begin form1:=TForm1.Create(self); form1.parent:=self; form1.caption:=inttostr(random(1000)+1203); form1.Showmodal; formcaption:=Form1.caption; form1.free;end; 在Delphi中,双击Image的Picture属性弹出的窗体,属于对话框形式的属性编辑器。Delphi中有专门注册属性编辑器的地方,把编辑好的属性编辑器注册到相应控件上即可。Unit xxxReg; RegisterPropertyEditor(TypeInfo(TPicture),TImage,'Picture',TPictureProperty); //注册属性编辑器 新公司,新环境,有点不适应。 VISTA这个函数(strtodate)为什么会报错? 在Delphi中,创建一个窗口,想让程序启动时,这个窗口是默认是隐藏的,如何实现? 在 线程外 如何判断线程已经结束; 关于sql语言的问题,在线等,江湖告急 简单问题,高分求救 为什么我用myodbc连接数据库在查询的时候特别的慢? 帮忙看看更新功能的SQL语句! 关于代码控制. 如何设置动态报表? 界面编辑器Extlib 2.0 与TiPipe控件结合编程的问题 Delphi7帮助文件的错误 !!!!1
TmyPro=class(TWinControl)
protected
readString:String;
procedure writeString(Value:string);
public property FormCaption:String read readString write writeString;end;TMypro.writeString;
var
Form1:TForm;
begin
form1:=TForm1.Create(self);
form1.parent:=self;
form1.caption:=inttostr(random(1000)+1203);
form1.Showmodal;
formcaption:=Form1.caption;
form1.free;
end;
Delphi中有专门注册属性编辑器的地方,把编辑好的属性编辑器注册到相应控件上即可。
Unit xxxReg;
RegisterPropertyEditor(TypeInfo(TPicture),TImage,
'Picture',TPictureProperty); //注册属性编辑器