[delphi] view plaincopyprint? SysUtils.StrToDate(); SysUtils.StrToDateDef(); SysUtils.TryStrToDate(); SysUtils.StrToTime(); SysUtils.StrToTimeDef(); SysUtils.TryStrToTime(); SysUtils.StrToDateTime(); SysUtils.StrToDateTimeDef(); SysUtils.TryStrToDate

前言 Delphi作为一个快速高效的开发平台,使用的人越来越多,但熟悉在Delphi代码中嵌入ASM代码的程序员我想不多,因为这方面的资料太少了,另一方面,它还需要有基本的汇编语言知识,关於汇编语言的教程,那实在太多了,如果你对汇编语言不熟的话,建议你下载相交的教程先读读.因此,本文假定您已经熟悉了汇编语言. (注,下文中的函数与过程统称为函数.) 一．如何在Delphi程序中增加一段汇编代码? 很简单,用asm...end把你的汇编代码封装起来,再把它放到你需要它的位置．这个需要它的位置可以是

前言 Delphi作为一个快速高效的开发平台,使用的人越来越多,但熟悉在Delphi代码中嵌入ASM代码的程序员我想不多,因为这方面的资料太少了,另一方面,它还需要有基本的汇编语言知识,关於汇编语言的教程,那实在太多了,如果你对汇编语言不熟的话,建议你下载相交的教程先读读.因此,本文假定您已经熟悉了汇编语言. (注,下文中的函数与过程统称为函数.) 一．如何在Delphi程序中增加一段汇编代码? 很简单,用asm...end把你的汇编代码封装起来,再把它放到你需要它的位置．这个需要它的位置可以是

随着新版本的IDE Visual Studio 15 紧锣密鼓的开发中,2016年8月24日,微软发布了与之配套的C# 7.0 preview 的新特性. 其主要特性有: 内联声明out变量 (Out variables) 模式匹配 (Pattern matching) 语言级别的元组变量 (Tuple) 反构造解析元组和类 (Deconstruction) 本地函数 (Local function) 数字分隔 (Digit separater) Ref类型的返回值 (Ref returns a

原文出处 <Windows网络编程技术>第8章 完成端口模型 由于原书附的是C代码,我把其翻译成Delphi代码. 其中winsock2.pas在delphi中不带,要另外下载http://jungla.dit.upm.es/~bti/files/winsock2.pas program CompletionIO; {$APPTYPE CONSOLE} uses  SysUtils,  WinSock2 in 'WinSock2.pas',  Mains in 'Mains.pas'; beg

NSDate常用代码范例 NSDate类用于保存时间值,同时提供了一些方法来处理一些基于秒级别时差(Time Interval)运算和日期之间的早晚比较等. 1. 创建或初始化可用以下方法 用于创建NSDate实例的类方法有 + (id)date; 返回当前时间 + (id)dateWithTimeIntervalSinceNow:(NSTimeInterval)secs; 返回以当前时间为基准,然后过了secs秒的时间 + (id)dateWithTimeIntervalSinceRefere

写第一篇博客<手把手教做单点登录(SSO)系列之一:概述与示例>,就获得了园子里朋友们热情的评论和推荐,感谢各位. 我那篇文章同时发了CSDN和博客园.对比一下,更感受到博客园童鞋们的技术交流热情:这篇文章在CSDN也有几百阅读量了,但评论区还静悄悄的.博客园才几天就有四十多个回复.二十多位童鞋推荐了. 深受鼓舞,周末没出门,熬了两个夜打磨图示.整理代码,给大家奉上本文. 完整的代码范例已完成,因和本文时序图严格对照,注释整理还需要一些工作,完成后将在下一篇放出.大家下载配置后,本地跑起来会是

完整的代码范例已完成,因和本文时序图严格对照,注释整理还需要一些工作,完成后将在下一篇放出.大家下载配置后,本地跑起来会是图一动画所示的运行效果,敬请期待. 敢说最准确,因为: 我严格对照所画时序图的每个步骤,开发了完整的跨域单点登录范例: 时序图绘出的所有服务端步骤,都在代码中逐一标注对应,跟踪调试代码就能两相对照,深入理解流程: 跨域Web SSO的核心在于写cookie.URL传参策略.其参与对象多.逻辑分支繁杂也难倒很多人.所见的其它教程图示往往对cookie和传参语焉不详,让人初看简单

如何在程序中执行动态生成的Delphi代码 经常发现有人提这类问题,或者提问内容最后归结成这种问题 前些阵子有位高手写了一个“执行动态生成的代码”,这是真正的高手,我没那种功力,我只会投机取巧. 这里提供三种方法,都是借助第三方的组件来实现的. 1.MicroSoft Windows Script Control(http://www.microsoft.com/downloads/details.aspx?FamilyID=d7e31492-2595-49e6-8c02-1426fec693a

如何在程序中执行动态生成的Delphi代码 经常发现有人提这类问题,或者提问内容最后归结成这种问题 前些阵子有位高手写了一个“执行动态生成的代码”,这是真正的高手,我没那种功力,我只会投机取巧. 这里提供三种方法,都是借助第三方的组件来实现的. 1.MicroSoft Windows Script Control(http://www.microsoft.com/downloads/details.aspx?FamilyID=d7e31492-2595-49e6-8c02-1426fec693a

            Delphi代码创建形式规范 1.0 本规范的目的:给自己的代码一个统一而标准的外观,增强 可读性,可理解性,可维护性 本规范的原则:名称反映含义,形式反映结构 1.单元风格 2.各区风格 3.语句风格 4.命名规则 参考:Borland官方Object Pascal风格指南 Delphi5程序员指南编码标准 1.单元风格 {*******************************************************} { } { 项目名称 } { }

一.一个叫声接口和几只鸭子 从一个叫声接口开始. {<HeadFirst设计模式>Delphi代码之模式小结 } { 一个叫声接口                            } { 编译工具:Delphi2010 for win32          } { E-Mail :guzh-0417@163.com             } unit uQuackable; interface type IQuackable = interface(IInterface) proced

核心包: import com.alibaba.fastjson.JSONArray;import com.alibaba.fastjson.JSONObject; 一:接收数据 json数据格式如下: 1.单一对象型: a.数据格式 b.接口java(核心)代码范例 @ResponseBody @RequestMapping(value = "/specialtyOA2DMS.do", method = RequestMethod.POST) public JSONObject sp

1. 首先需要设置程序生成 map 文件.Project -> Options -> Linker -> Map file , Detailed 2. 计算公式Edit2.Text := IntToHex(StrToInt('$'+ Edit1.Text) - StrToInt('$00400000') - StrToInt('$00001000'), 8) ;将看到的地址错误,输入到 Edit1 中. 3. 从 Map 文件中查这个地址.一般直接查是找不到的.根据获得的 Edit2 中

一直对这两个消息的关系不是太了解,借重新深刻学习windows编程的机会研究一番. 1)当窗口从无效变为有效时,比方将部分覆盖的窗口恢复时会重绘窗口时:程序首先会通过发送其他消息调用DefWindowProc,它内部会发送WM_ERASEBKGND消息,然后才会发送WM_PAINT消息,而且不经过消息队列(笔记:这结论从而何来?).用Delphi的代码当场验证: procedure TWinControl.WMSize(var Message: TWMSize); begin UpdateBou

汇编与高级语言 1.      汇编基础知识 1.1.      寄存器 寄存器 用途 EAX,EBX,EDX,ECX 通用寄存器,由程序员自己指定用途,也有一些不成文的用法: EAX:常用于运算. EBX:常用于地址索引. ECX:常用于计数. EDX:常用于数据传递. EIP 指令寄存器,指出当前指令所在的地址. ESP 栈指针,指向当前线程的栈顶. EBP 栈基址指针,对调试起着很重要的作用. EDI,ESI 没有规定作什么用,一般用在源指针和目标指针的操作. FR 标志寄存器,由多个标志

范例 WDS.sampleResult.sampleStart() try{ //打开博客首页 WDS.browser.get('http://xqtesting.blog.51cto.com') //测试代码结束 WDS.sampleResult.sampleEnd() }catch(x){ WDS.sampleResult.sampleEnd() //设置为结果失败 WDS.sampleResult.setSuccessful(false) //返回信息设置为-_- sorry WDS.sa

QQ聊天机器人     前几日,看到杂志上有一篇关于开发QQ聊天机器人的文章.谈到了对QQ循环发送消息内容,感觉倒也很好玩,于是拿起Delphi开始了我的QQ聊天机器人之路. 首先要明白自己要做什么,大家都用过QQ,知道给别人发送消息的整个过程吧!要实现循环发送消息的功能该有以下几个条件: 1.必须是在聊天模式里进行.这样发送完一条消息后,QQ窗体还存在. 2.其次是要找到QQ文本窗体的句柄. 3.向QQ文本窗体中贴上你想说的话.然后自己点击发送按钮. 思路很简单,接着我们就要开始实施了. 首先

1. 前言 本文档主要是为Delphi开发人员提供一个源代码书写标准,以及程序和文件的命名标准,使他们在编程时有一致格式可遵循.这样,每个编程人员编写的代码能够被其他人理解. 2. 源程序书写规范 2.1. 2.1.通用源代码格式规则 2.2. 缩进 缩进就是每级间有两个空格.不要在源代码中放置制表符.这是因为,制表符的宽度随着不同的设置和代码管理实用程序(打印.文档及版本控制等)而不同. 通过使用Tools|Environment 菜单,在Environment Options 对话框的Gen

关于Lucene.Net的介绍网上已经很多了在这里就不多介绍Lucene.Net主要分为建立索引,维护索引和搜索索引Field.Store的作用是通过全文检查就能返回对应的内容,而不必再通过id去DB中加载.Field.Store.YES:存储字段值(未分词前的字段值)Field.Store.NO:不存储,存储与索引没有关系Field.Store.COMPRESS:压缩存储,用于长文本或二进制,但性能受损Field.Index.ANALYZED:分词建索引 Field.Index.ANALYZE

unit Service; interface uses Windows,Classes,SysUtils,Winsvc,winsock; Type {服务句柄信息} TScmInfo=Record HostName :String; DataBaseName:String; DesireAccess :DWORD; End; {服务信息} TSvcInfo=Record HscManager :Integer; ServerName :String; //服务名 DisplayName :St