摘要:// a:=stringtoguid({000208fb-0000-0000-c000-000000000046});// ichart 和 chart接口各自具有不同的guid根本不相容// a:=stringtoguid({000208fb-0001-0000-c000-000000000046});}// stringtoguid 用于将 字符串guid转换为 tguid// guidtos......
摘要: 一直都听说delphi中画布使用简单方便。现在我就利用画布实现一个简单的树机构的图形表示。系统支持节点选择、移动、保存树、打开树等。为了实现的方便用到了递归与指针,虽然效率有点问题但是在快速解决问题还是蛮好的。
程序写的比较乱,欢迎交流:sss@pacia.com.cn
源代码如下:
unit u_tree;
interface
uses windows, messages, s......
组件制作之一(概念)
上一页 ...??????????end; 【程序编程相关:
跨多个数据源的 J2EE 开发: 细节探】 【推荐阅读:
专家访谈: Carol Rigdon,I】????其中属性定义中的default 0并不是默认值(即对象察看器显示的值),默认值要在组件类的构造函数中设定.而default有这样的作用,决定dfm文件中是否要保存该属性的值,比如上面为default?0,即当该属性值为0时,则该属性不会被保存到dfm中,如果该属性值不为0,则该属性会被保存到dfm中.另外属性定义还有一个关键字为 【扩展信息:
将DB2 Information Int】 nodefault,设置了这个关键字,比如 property?count:integer?read?fcount?write?setcount?nodefault; 则无论它的值是什么,都会被写到dfm文件中. ? 属性可以有如下几种类型,下面只给出简单介绍,而这些类型的属性,会在组件制作时详细的运用: 简单类型属性:如上面定义的,加一个例子 property?text:string?read?ftext?write?settext; 枚举类型属性:tenumtype=(enum1,enum2,enum3); ??????????????fenumtype:tenumtype; ??????????????property?enumtype:tenumtype?read?fenumtype?write?fenumtype; ?? 在对象察看器中看来就是下拉列框选择值. 集合类型属性:tset=(set1,set2,set3); ??????????????tsets=set?of??tset; ??????????????fsets:tsets; ??????????????property?sets:tsets?read?fsets?write?fsets; 在对象察看器中看来,就是列出几个选项分别设置真假.比如tform的bordericons属性即是. 对象类型属性:一个属性是一个对象,而这个对象必须派生自tpersistent或者他之下的类,才能在对象察看器中可以展开它,并设置它里面的属性. ????数组类型属性:数组属性如果要在对象察看器中看见,需要有自己的属性编辑器(如果不想在对象察看器看当然就不用啦),是比较高级的组件,在后来的组件制作再来介绍,会更直观一些.这里只给出它的定义形式: ...
下一页 摘要:最近在做一个短信相关的项目。从联通网关deliver过来的短信都是ucs2编码的。
在网上找了些资料,找到一些使用java语言本身带的api转换的代码,但没有合适的delphi源码,所以经研究后自己写了一个,很简单的:
function ucs2togbk(const invalue: string): string;var i: integer;begin result := ; for i......