class function TObject.MethodAddress(const Name: ShortString): Pointer;asm { -> EAX Pointer to class } { EDX Pointer to name } PUSH EBX PUSH ESI PUSH Read More
posted @ 2015-12-02 06:10 findumars Views(349) Comments(0) Diggs(0)
虽然用delphi也有7,8年了,但大部分时间还是用在系统的架构上,对delphi底层还是一知半解,今天在网上看到一篇文章写得很好,虽然是07年的,但仍有借鉴的价值。现摘录如下:Delphi程序设计之--经验技巧这些日子太忙了,今天把剩下的部分贴完,希望对大家有用。看过前一篇的都知道此文的作者和出处... Read More
posted @ 2015-12-02 06:09 findumars Views(519) Comments(0) Diggs(0)
由于TFlowPanel中没有设置滚动条的相关属性。所以我们只好另辟溪径。再加一个tscrollbox来实现。 具体操作如下: 1,先添加一个Tscrollbox,设置其align为alclient。autosize默认为false,不用改动。 2,在其中添加一个tflowpanel,设置align Read More
posted @ 2015-12-02 06:03 findumars Views(3239) Comments(0) Diggs(0)
这是一个在窗体标题栏添加自定义按钮的组件(TTitleBarButton)开发实例,标题栏按钮组件TTitleBarButton以TComponent为直接继承对象,它是一个可以在窗体标题栏上显示按钮的组件,像最大化、最小化和关闭按钮等。 1、首先确定组件的属性。 属性是组件的重要组成部分,它相当于 Read More
posted @ 2015-12-02 06:02 findumars Views(2663) Comments(1) Diggs(0)
一般来说,由Delphi生成的EXE文件,要比其由它编程语言生成的体积大一些。这主要是由于使用VCL的原因(当然,VCL是有许多优点的!) 以下是减小EXE文件大小的几种途径: 01) 使用加壳工具(如 UPX,ASPack 等) 02) 使用 KOL 03) 不使用VCL来编写程序 04) 使用 Read More
posted @ 2015-12-02 05:55 findumars Views(2729) Comments(0) Diggs(0)