摘要：
Delphi之静态方法,虚方法virtual,动态dynamic,抽象abstract,消息 http://www.cnblogs.com/zhwx/archive/2012/08/28/2660555.html 对象的方法能定义成静态(static)、虚拟(virtual)、动态(dynamic) 阅读全文
posted @ 2016-12-12 09:46
海蓝7
阅读(2013)
评论(0)
推荐(0)
摘要：
【观看须知:】 本套视频教程为传智播客Spring2.5视频教程，教程采用的AVI方式发布，所以看起来很流畅，大家可以通过包中附带的CamPlay.exe（拖入即可）观看和学习。 【视频介绍：】 Spring2.5相比Spring 2.0和更低版本来说，虽然核心思想和原理一脉相承，但在使用和功能上都 阅读全文
posted @ 2016-12-01 00:32
海蓝7
阅读(309)
评论(0)
推荐(0)
摘要：
http://blog.163.com/l1_jun/blog/static/143863882011741124581/ 由于 Delphi2005 支持中文标识符，在编写 PASCAL 词法分析器的过程中遇到了这个问题，经过多次试验找到了解决方案，至今未发现问题。 代码如下： //判断字符是否是 阅读全文
posted @ 2016-11-30 17:05
海蓝7
阅读(2689)
评论(0)
推荐(1)
摘要：
http://www.cnblogs.com/Jekhn/archive/2012/08/25/2656656.html 线程，消息函数，SetWindowPos设置窗体位置 if WaitForSingleObject(FEvent,FInterval)=WAIT_OBJECT_0 then用法 阅读全文
posted @ 2016-11-25 12:26
海蓝7
阅读(181)
评论(0)
推荐(0)
摘要：
http://blog.csdn.net/xiaobai1593/article/details/6672193 在多线程下面，有时候我们会希望等待某一线程完成了再继续做其他事情，要实现这个目的，可以使用Windows API函数WaitForSingleObject，或者WaitForMultip 阅读全文
posted @ 2016-11-25 12:08
海蓝7
阅读(697)
评论(0)
推荐(0)
摘要：
system.Math和system.StrUtils都有IfThen方法， 返回字符串和 返回 数值型 system.Math.IfThen(vehicle.MILE=0,0,StrToFloat(FormatFloat('0.00',RoundTo(vehicle.MILE,-2)))); system.StrUtils.IfThen(t.Mileage=0,'0',FormatFloat('... 阅读全文
posted @ 2016-11-18 19:36
海蓝7
阅读(4069)
评论(0)
推荐(0)
摘要：
八、使用结构体而不是结构体指针: 很重要 阅读全文
posted @ 2016-11-18 17:02
海蓝7
阅读(751)
评论(0)
推荐(0)
摘要：
原稿来源: http://mydelphi.5d6d.com/viewthread.php?tid=252&extra=&page=1 阅读全文
posted @ 2016-11-18 16:51
海蓝7
阅读(295)
评论(0)
推荐(0)
摘要：
在学习 资源文件 和 钩子函数 时, 经常用到当前模块句柄(HInstance)这个全局变量. 今天特别想知道, 它到底是在什么时候给赋值的.输入 HInstance; "Ctrl+鼠标" 找到它的声明之处: SysInit 单元的第 29 行(Delphi 2007) - HInstance: L 阅读全文
posted @ 2016-11-18 16:39
海蓝7
阅读(319)
评论(0)
推荐(0)
摘要：
absolute //指令(变量) abstract //指令(方法) and //运算符(布尔) array //类型 as //运算符(RTTI) asm //语句 assembler //向后兼容(汇编) at //语句(异常处理) automated //访问类别符(类) begin //块 阅读全文
posted @ 2016-11-18 16:26
海蓝7
阅读(201)
评论(0)
推荐(0)
摘要：
unit Unit1; interface {接口部分开始} uses {引用单元列表,这是可选的,如果包含必须紧跟interface关键字} {接口部分声明常量/类型/变量/过程和函数,这些声明对引用单元就像自己的声明一样} {在接口部分声明的过程和函数,就像使用了forward关键字} {接口部 阅读全文
posted @ 2016-11-18 16:23
海蓝7
阅读(103)
评论(0)
推荐(0)
摘要：
http://www.cnblogs.com/del/archive/2008/07/08/1237856.html 非常遗憾 Delphi 的 case 语句不支持字符串, 但我觉得这也可能是基于效率的考量;如果非要在 case 中使用字符串, 也不是不可以变通, 这里提供了五种方法. 本例效果图 阅读全文
posted @ 2016-11-18 16:19
海蓝7
阅读(233)
评论(0)
推荐(0)
摘要：
goto 语句 uses 子句的写法 //uses 子句一般这样写 uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs; //这样写更清晰，因为Delphi忽略换行 uses 阅读全文
posted @ 2016-11-18 16:11
海蓝7
阅读(169)
评论(0)
推荐(0)
摘要：
function InputQuery(const ACaption: string; const APrompts: array of string; var AValues: array of string; CloseQueryFunc: TInputCloseQueryFunc = nil): Boolean; overload; function InputQuery(const AC... 阅读全文
posted @ 2016-11-08 19:51
海蓝7
阅读(437)
评论(0)
推荐(0)
摘要：
Delphi 函数大全 - xiucaiyao的专栏 - 博客频道 - CSDN.NEThttp://blog.csdn.net/xiucaiyao/article/details/4544039 名称 类型 说明 abort 函数 引起放弃的意外处理 abs 函数 绝对值函数 addexitpro 阅读全文
posted @ 2016-11-07 16:11
海蓝7
阅读(250)
评论(0)
推荐(0)
摘要：
1、对只读属性误解 property AppSetting: ISuperobject read fAppSetting;当看到 AppInfo.AppSetting.D['lastLat'] := FLastLat; AppInfo.AppSetting.I['lastZoom'] := FLas 阅读全文
posted @ 2016-10-28 11:56
海蓝7
阅读(251)
评论(0)
推荐(0)
摘要：
json视图工具：http://www.bejson.com/jsonviewernew/ 一、Json格式化，（看到数组里面又有数组一下子疑问不是合格json）：尾门地址查询： =>=>=> { "Addresses": [ "广东省 中山市 火炬开发区 在伟盛路附近 距离顷九327米", "广东 阅读全文
posted @ 2016-10-27 10:27
海蓝7
阅读(1300)
评论(0)
推荐(0)
摘要：
网友说是 hack 手段，还没有时间深入了解，不明觉厉。 [沪]风舞轻扬(81924320) 2016-10-25 16:59:08 阅读全文
posted @ 2016-10-26 10:03
海蓝7
阅读(468)
评论(0)
推荐(0)
摘要：
既然已经做出了com程序用delphi来开发的决定，那当然就要对delphi进行一些深入的了解。有人说delphi是一个用控件堆砌起来的工具，和vb没什么两样；也有人说dephi实际上是面向过程的，他的面向对象并不彻底。实际生活中持这两种观点的人不在少数，就拿我认识的一个非常好的程序员来说吧，他很早 阅读全文
posted @ 2016-10-26 09:39
海蓝7
阅读(1152)
评论(0)
推荐(0)
摘要：
举例：ShowMessageFmt('n1:%x; n2:%x', [n1,n2]); 显示Params 为 array[integer] of TvarRec 进制表示 %o(8) printf("%d(10) %x(16) procedure ShowMessageFmt(const Msg: 阅读全文
posted @ 2016-10-25 09:04
海蓝7
阅读(512)
评论(0)
推荐(0)
摘要：
Cardinal 是 4 字节无符号的整型, 先看一个例数: 阅读全文
posted @ 2016-10-24 17:04
海蓝7
阅读(527)
评论(0)
推荐(0)
摘要：
fdword :DWORD; procedure TForm10.btn1Click(Sender: TObject); var temp:DWORD; begin fdword :=786627; //786627 11000000000011000011 temp := fdword shr (1*8); // ShowMessage(IntToStr(... 阅读全文
posted @ 2016-10-24 16:42
海蓝7
阅读(328)
评论(0)
推荐(0)
摘要：
\day01\avi\01.01_计算机基础(计算机概述).avi; \day01\avi\01.02_计算机基础(计算机硬件和软件概述).avi; \day01\avi\01.03_计算机基础(软件开发和计算机语言概述).avi; \day01\avi\01.04_计算机基础(人机交互).avi; \day01\avi\01.05_计算机基础(键盘功能键和快捷键).avi; \day01\... 阅读全文
posted @ 2016-10-20 18:45
海蓝7
阅读(1137)
评论(0)
推荐(0)
摘要：
新建--选择--确定 简单放几个控件在TIWForm1上面，运行，生成一个项目服务器： 复制 URL http://127.0.0.1:8888/$/start 打开网页。 阅读全文
posted @ 2016-10-20 14:57
海蓝7
阅读(150)
评论(0)
推荐(0)
摘要：
http://www.cnblogs.com/jxsoft/archive/2011/06/02/2067712.html //在任务栏显示 进度条 object Form9: TForm9 Left = 0 Top = 0 Caption = #20219#21153#26639#26174#31 阅读全文
posted @ 2016-10-20 12:27
海蓝7
阅读(794)
评论(0)
推荐(0)
浙公网安备 33010602011771号