RSS订阅 | 匿名投稿
您的位置:网站首页 > 技巧

Delphi XE5 与其他版本共存

如果你想使用Delphi诸如XE4、XE3、XE2、XE之类的版本跟DelphiXE5共存的话,在cglm.ini中简单修改两行就行啦。找到DelphiXE5的安装根目录C:\ProgramFiles(x86)\Embarcadero\RADStudio\12.0\bin下的cglm.ini文件,打开…
类别:技巧 标签: 作者:admin 日期:2013-11-25 20.36.10

delphi XE5 JSON与Delphi Object的互换

unitUnit2;interfaceusesWinapi.Windows,Winapi.Messages,System.SysUtils,System.Variants,System.Classes,Vcl.Graphics,Vcl.Controls,Vcl.Forms,Vcl.Dialogs,Vcl.StdCtrls,DBXJSON,DBXJSONReflect;typeTPerson=cla…
类别:技巧 标签: 作者:admin 日期:2013-11-25 20.22.46

delphi xe5 JSON

unitUnit1;interfaceusesWinapi.Windows,Winapi.Messages,System.SysUtils,System.Variants,System.Classes,Vcl.Graphics,Vcl.Con****ols,Vcl.****s,Vcl.Dialogs,Vcl.S****C****ls,DBXJSON;typeT****1=class(T****)B…
类别:技巧 标签: 作者:admin 日期:2013-11-25 20.20.31

delphi 获取网卡物理地址之内存获取方式函数源码

{----------------------------------------------------------------------------\-作者:sushengmiyan2013.01.26参数:Alana:Integer=0返回:string功能:通过LANA号获取Mac物理地址(内存方式获取),整体步骤如下…
类别:技巧 标签: 作者:admin 日期:2013-11-12 13.09.38

delphi 计算IMEI的校验位

IMEI校验码算法:(1).将偶数位数字分别乘以2,分别计算个位数和十位数之和(2).将奇数位数字相加,再加上上一步算得的值(3).如果得出的数个位是0则校验位为0,否则为10减去个位数如:35890180697241偶数位乘以2得到5*…
类别:技巧 标签: 作者:admin 日期:2013-11-12 11.11.25

如何减小Delphi应用程序(EXE)的大小

一般来说,由Delphi生成的EXE文件,要比其由它编程语言生成的体积大一些。这主要是由于使用VCL的原因(当然,VCL是有许多优点的!)以下是减小EXE文件大小的几种途径:01)使用加壳工具(如UPX,ASPack等)02)使用KOL…
类别:技巧 标签: 作者:admin 日期:2013-10-24 22.48.44

delphi TOscilloscope 仿Windows任务管理器CPU使用记录组件

TOscilloscopev0.1示波器组件测试版本主要就是为了模仿Windows任务管理器里的CPU使用记录波形。还有很多问题,会慢慢完善。源码下载:http://pan.baidu.com/s/1DZJU3
类别:技巧 标签: 作者:admin 日期:2013-10-24 22.48.44

delphi获取DOS命令行输出函数

functionGetDosOutput(Command:string):string;varhReadPipe:THandle;hWritePipe:THandle;SI:TStartUpInfo;PI:TProcessInformation;SA:TSecurityAttributes;BytesRead:DWORD;Dest:array[0..32767]ofchar;CmdLine:arr…
类别:技巧 标签: 作者:admin 日期:2013-10-24 22.26.54

delphi 模拟Windows任务管理器CPU使用率的动态折线图

Delphi的TCanvas类可以实现各种复杂的图形输出功能,基于近期项目的需求,利用它实现了一个很炫的动态折线图(模拟了资源管理器中CPU使用率的折线图),可以直观地展现出数值的实时变化情况。这段代码里边有几个核心…
类别:技巧 标签: 作者:admin 日期:2013-10-21 22.33.28

delphi 覆盖模式处理透明

delphi覆盖模式处理透明1、创建一个Mark图层2、对覆盖区域进行行列扫描(使用背景色,设置透明)PRGB=^TRGB;TRGB=recordb,g,r,a:Byte;end;PRGBArray=^TRGBArray;TRGBArray=array[0..65565]ofTRGB;&nb...
类别:技巧 标签: 作者:admin 日期:2013-10-15 23.01.18

delphi延时4种方法

//////////////////挂起,不占CPUsleep//////////////////不挂起,占cpuprocedureDelay(msecs:integer);varFirstTickCount:longint;beginFirstTickCount:=GetTickCount;repeatApplication.ProcessMessages;until((Get…
类别:技巧 标签: 作者:admin 日期:2013-10-10 20.33.33

delphi DCC64.exe delphi64位命令行编译器揭秘

DCC32.exe肯定众多D迷都用过,Dcc64.exe功能也类似,是用来编译支持64位windows平台的应用程序的编译器,Dcc64可以在微软视窗32位平台上运行,所以Dcc64是应用程序实现跨平台的利器,当然64位的windows开发环境它也是…
类别:技巧 标签: 作者:admin 日期:2013-10-10 19.27.55

Delph做的百叶窗小程序

做了一个百叶窗小程序碰到了几个问题,比如说两个用到LoadFromFile函数的地方第一次可以识别相对路径而如果我更改了其中一个的路径使其变为硬盘上某个绝对路径那另外一个LoadFromFile就不能识别原先的相对路径了,很…
类别:技巧 标签: 作者:admin 日期:2013-10-10 16.31.18

delphi XE4 for ios 谨慎处理字符串

由于xe4forios里面的字符串处理有变化,具体可以参考官方文档,这两天帮一个朋友调试ios的应用,由于没有注意这一块,折腾了很长时间。特此记录下来,希望其他人不要走弯路。以下面代码为例:?functionmyDecodestr(c…
类别:技巧 标签: 作者:admin 日期:2013-10-10 16.11.13

delphi 一个完整身份证效验程序

根据〖中华人民共和国国家标准GB11643-1999〗中有关公民身份号码的规定,公民身份号码是特征组合码18位:由十七位数字本体码和一位数字校验码组成。排列顺序从左至右依次为:六位数字地址码,八位数字出生日期码,三…
类别:技巧 标签: 作者:admin 日期:2013-10-10 14.58.08

FloatToStr问题 保留小数位

如何使一个字符串'23.89023482'在使用FloatToStr变为23.90?有什么规则吗?是不是小数后第2位四舍五入?FormatFloat('0.0',f)+'0'--------------------------------------------------------------------------------…
类别:技巧 标签: 作者:admin 日期:2013-10-01 17.20.38

delphi 62 进制的简单实现

delphi62进制的简单实现62进制需要的字符及次序:0..9a..zA..Z;只实现了62进制字符串与正整数的互换.--------------------------------------------------------------------------------unitH62;interfaceusesSysUti…
类别:技巧 标签: 作者:admin 日期:2013-08-13 12.59.24

Delphi 的链式代码

Delphi的链式代码有了一系列的Helper,Delphi也可以使用链式代码了.--------------------------------------------------------------------------------//譬如要把3.1415926中的141提取为一个整数:varnum:Integer;be…
类别:技巧 标签: 作者:admin 日期:2013-08-13 12.58.36

Delphi 的链式代码

有了一系列的Helper,Delphi也可以使用链式代码了.--------------------------------------------------------------------------------//譬如要把3.1415926中的141提取为一个整数:varnum:Integer;beginnum:=Pi.ToStr…
类别:技巧 标签: 作者:admin 日期:2013-07-05 14.30.05

delphi 如何让ScrollBox的内容与滚动条一起实时滚动

delphi如何让ScrollBox的内容与滚动条一起实时滚动拖动滚动条后只有释放鼠标键,ScrollBox的内容才会滚动到实际位置,不爽。请问高人,怎样才能使拖动ScrollBox的滚动条的同时实时滚动内容?在OBjectInspector里将Sc…
类别:技巧 标签: 作者:admin 日期:2013-04-02 16.46.03