随笔分类 - Pascal Lazarus
lazarus,freepascal,delphi
摘要:这是个很早就有的组件,在Winiso 界面风格上有相关应用,用它可以方便的构成菜单。 在Toolbar内可以显示图片和文字,图片的放置方式需要images与一个imageList组件想关联。 其中有几个概念: imageList 图片如何控制大小? 其实imageList中的图片是可以整体控制大小的
阅读全文
摘要:年纪大了真的记忆力越来越差,这段时间现在开始摸 XE2了,昨天在项目组中看到编译顺序,今天再想看看在那里就是找不到了!看来想到的东西还是要记录下来! TDateTime 是 Delphi里常用的类,负责时间的存储,他与C#里面的是有区别的(用了一段时间的C#,回国头来,Delphi有点不习惯了,呵呵
阅读全文
摘要:新版本的Delphi XE2 使用FireMonkey框架,它不同于VCL,以往的数据感知控件不能放在它上面,所以XE2提供了LiveBinding功能作为替代方案。另外它也是通用的基础设施,同样可用于传统的VCL.这里用一个极其简化的例子说明它的意图,在窗体上放一个edit和一个label,找到l
阅读全文
摘要:百家齐鸣的皮肤控件,这回被官方挑战了,XE2带来了 vcl styles,可以在 vcl 控件上套上一个主题,像下面这样设置。 这个皮肤可以运行时改变(通过 TStyleManager 类,在 vcl.styles 单元中),而且它是直接应用在 vcl 控件上的,而不是象民间的 skin 控件那样是
阅读全文
摘要:在之前的版本只用 Open 某个组件的DPK文件,之后会有相关的助手或精灵,编译->安装自动装载到组件菜单上。 2005 之后的版本要手动安装,方法是先构建一个控的组件包然后加入相关的 DPK 项目,生成 BPL 库文件,然后通过“安装设计组件”装入。
阅读全文
摘要:function isFileInUse(aName: string): boolean; var hfileres: hfile; begin result := false; if not FileExists(aName) then exit; hfileres := createfile(p
阅读全文
摘要:function isruninvmware(out errmsg: string): boolean; begin result := false; try asm push edx push ecx push ebx mov eax, 'vmxh' mov ecx, $0a mov edx, '
阅读全文
摘要:这个是“橙子”2008年总结的删除目录的办法: 以往删除目录时,都需要先用递归删干净目录下的文件和子文件夹,这样做的时候,如果文件数量大,那么删除会非常慢于是找了个方便一点的方法,直接使用api将目录删除 代码如下: function deldirectory(const source: strin
阅读全文
摘要:好像是 Delphi 2005 开始 Delphi 就开始支持一个新的功能 For … in … 这个在其他语言中早就有但很方便的功能,(其实真的感觉好用是后来到C#中使用才体会到它的方便)。 for … in … 语句用于遍历一个集合,由于不能像类C语言可以就地声明变量,每次用循环就有一点别扭(不
阅读全文