2016年12月12日
C#区分多态和重载-delphi也类似
摘要： Delphi也是基于继承和接口的多态性。 阅读全文
posted @ 2016-12-12 15:33 海蓝7 阅读(136) 评论(0) 推荐(0)
Delphi之静态方法,虚方法virtual,动态dynamic,抽象abstract,消息
摘要： 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 阅读(2002) 评论(0) 推荐(0)
2016年12月1日
课程4：黑马程序员_spring2.5视频教程--视频列表
摘要： 【观看须知:】 本套视频教程为传智播客Spring2.5视频教程，教程采用的AVI方式发布，所以看起来很流畅，大家可以通过包中附带的CamPlay.exe（拖入即可）观看和学习。 【视频介绍：】 Spring2.5相比Spring 2.0和更低版本来说，虽然核心思想和原理一脉相承，但在使用和功能上都 阅读全文
posted @ 2016-12-01 00:32 海蓝7 阅读(306) 评论(0) 推荐(0)
2016年11月30日
在 Delphi 中判断一个字符是中文的方法
摘要： http://blog.163.com/l1_jun/blog/static/143863882011741124581/ 由于 Delphi2005 支持中文标识符，在编写 PASCAL 词法分析器的过程中遇到了这个问题，经过多次试验找到了解决方案，至今未发现问题。 代码如下： //判断字符是否是 阅读全文
posted @ 2016-11-30 17:05 海蓝7 阅读(2684) 评论(0) 推荐(1)
2016年11月25日
转：简单窗体振动-WaitForSingleObject，消息，winapi
摘要： 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 阅读(179) 评论(0) 推荐(0)
转：WaitForSingleObject()函数、WaitForMultipleObject()函数
摘要： http://blog.csdn.net/xiaobai1593/article/details/6672193 在多线程下面，有时候我们会希望等待某一线程完成了再继续做其他事情，要实现这个目的，可以使用Windows API函数WaitForSingleObject，或者WaitForMultip 阅读全文
posted @ 2016-11-25 12:08 海蓝7 阅读(691) 评论(0) 推荐(0)
2016年11月18日
Delphi的三目运算 ifthen 和iif
摘要： 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 阅读(4044) 评论(0) 推荐(0)
Delphi 中的自动释放策略-转
摘要： 八、使用结构体而不是结构体指针: 很重要 阅读全文
posted @ 2016-11-18 17:02 海蓝7 阅读(742) 评论(0) 推荐(0)
Delphi 关键字详解[整理于 "橙子" 的帖子]
摘要： 原稿来源: http://mydelphi.5d6d.com/viewthread.php?tid=252&extra=&page=1 阅读全文
posted @ 2016-11-18 16:51 海蓝7 阅读(289) 评论(0) 推荐(0)
全局变量 HInstance 到底是在什么时候赋值的?
摘要： 在学习 资源文件 和 钩子函数 时, 经常用到当前模块句柄(HInstance)这个全局变量. 今天特别想知道, 它到底是在什么时候给赋值的.输入 HInstance; "Ctrl+鼠标" 找到它的声明之处: SysInit 单元的第 29 行(Delphi 2007) - HInstance: L 阅读全文
posted @ 2016-11-18 16:39 海蓝7 阅读(317) 评论(0) 推荐(0)
Pascal 语言中的关键字及保留字
摘要： absolute //指令(变量) abstract //指令(方法) and //运算符(布尔) array //类型 as //运算符(RTTI) asm //语句 assembler //向后兼容(汇编) at //语句(异常处理) automated //访问类别符(类) begin //块 阅读全文
posted @ 2016-11-18 16:26 海蓝7 阅读(194) 评论(0) 推荐(0)
单元文件结构
摘要： unit Unit1; interface {接口部分开始} uses {引用单元列表,这是可选的,如果包含必须紧跟interface关键字} {接口部分声明常量/类型/变量/过程和函数,这些声明对引用单元就像自己的声明一样} {在接口部分声明的过程和函数,就像使用了forward关键字} {接口部 阅读全文
posted @ 2016-11-18 16:23 海蓝7 阅读(102) 评论(0) 推荐(0)
在 case 语句中使用字符串-转
摘要： http://www.cnblogs.com/del/archive/2008/07/08/1237856.html 非常遗憾 Delphi 的 case 语句不支持字符串, 但我觉得这也可能是基于效率的考量;如果非要在 case 中使用字符串, 也不是不可以变通, 这里提供了五种方法. 本例效果图 阅读全文
posted @ 2016-11-18 16:19 海蓝7 阅读(231) 评论(0) 推荐(0)
程序流程的辅助控制-转
摘要： goto 语句 uses 子句的写法 //uses 子句一般这样写 uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs; //这样写更清晰，因为Delphi忽略换行 uses 阅读全文
posted @ 2016-11-18 16:11 海蓝7 阅读(167) 评论(0) 推荐(0)
2016年11月8日
XE版本 InputQuery 可以同时填多个输入值
摘要： 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 阅读(434) 评论(0) 推荐(0)
2016年11月7日
转：Delphi 函数大全
摘要： Delphi 函数大全 - xiucaiyao的专栏 - 博客频道 - CSDN.NEThttp://blog.csdn.net/xiucaiyao/article/details/4544039 名称 类型 说明 abort 函数 引起放弃的意外处理 abs 函数 绝对值函数 addexitpro 阅读全文
posted @ 2016-11-07 16:11 海蓝7 阅读(247) 评论(0) 推荐(0)
2016年10月28日
d 属性： 赋予字段执行动作的能力
摘要： 1、对只读属性误解 property AppSetting: ISuperobject read fAppSetting;当看到 AppInfo.AppSetting.D['lastLat'] := FLastLat; AppInfo.AppSetting.I['lastZoom'] := FLas 阅读全文
posted @ 2016-10-28 11:56 海蓝7 阅读(243) 评论(0) 推荐(0)
2016年10月27日
Json格式示意图
摘要： json视图工具：http://www.bejson.com/jsonviewernew/ 一、Json格式化，（看到数组里面又有数组一下子疑问不是合格json）：尾门地址查询： =>=>=> { "Addresses": [ "广东省 中山市 火炬开发区 在伟盛路附近 距离顷九327米", "广东 阅读全文
posted @ 2016-10-27 10:27 海蓝7 阅读(1298) 评论(0) 推荐(0)
2016年10月26日
转：虚拟方法跳过父类继承调用祖父类的代码 --值得试一试
摘要： 网友说是 hack 手段，还没有时间深入了解，不明觉厉。 [沪]风舞轻扬(81924320) 2016-10-25 16:59:08 阅读全文
posted @ 2016-10-26 10:03 海蓝7 阅读(465) 评论(0) 推荐(0)
转：Delphi的类与继承（VB与delphi比较）
摘要： 既然已经做出了com程序用delphi来开发的决定，那当然就要对delphi进行一些深入的了解。有人说delphi是一个用控件堆砌起来的工具，和vb没什么两样；也有人说dephi实际上是面向过程的，他的面向对象并不彻底。实际生活中持这两种观点的人不在少数，就拿我认识的一个非常好的程序员来说吧，他很早 阅读全文
posted @ 2016-10-26 09:39 海蓝7 阅读(1142) 评论(0) 推荐(0)
2016年10月25日
ShowMessageFmt 用法
摘要： 举例：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 阅读(508) 评论(0) 推荐(0)
2016年10月24日
关于 Lo、Hi、LoWord、HiWord
摘要： Cardinal 是 4 字节无符号的整型, 先看一个例数: 阅读全文
posted @ 2016-10-24 17:04 海蓝7 阅读(520) 评论(0) 推荐(0)
shr 右移测试
摘要： 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 阅读(323) 评论(0) 推荐(0)
2016年10月20日
课程2：《黑马程序员_Java基础视频-深入浅出精华版》-视频列表-
摘要： \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 阅读(1134) 评论(0) 推荐(0)
XE2 IntraWeb尝试
摘要： 新建--选择--确定 简单放几个控件在TIWForm1上面，运行，生成一个项目服务器： 复制 URL http://127.0.0.1:8888/$/start 打开网页。 阅读全文
posted @ 2016-10-20 14:57 海蓝7 阅读(149) 评论(0) 推荐(0)