用Delphi从数据库中取得资料,然后导出到Excel中做成报表是个不错的选择,因为Excel强大的报表功能那可是没话说前提Delphi中要 uses comobj;var Excel:Variant;一、Excel操作1.创建Excel对象Excel := CreateOleObject( Exc...
分类:
其他好文 时间:
2014-07-16 23:17:35
阅读次数:
216
Broland Delphi 3.0.有Serial + Name 验证和 Serial 验证.程序使用的是MessageBox, 所以 bp MessageBoxA. (ShowMessage不可以)Serial + Name 验证 随便输入: 标准的错误提示是: 程序停在MessageBoxA的...
分类:
其他好文 时间:
2014-07-09 23:57:18
阅读次数:
476
program Demo1;{ Create Date: 2014-06-29 Author: P.S.M 1.接口Demo1}{$APPTYPE CONSOLE}uses SysUtils;{定义接口}type ITestInterface = interface {GUID通过CTR...
分类:
其他好文 时间:
2014-07-07 14:02:00
阅读次数:
177
方法一:[delphi]usesComObj,DateUtils;functionGetInternetTime:string;varXmlHttp:OleVariant;datetxt:string;DateLst:TStringList;mon:string;timeGMT,GetNetTime...
分类:
其他好文 时间:
2014-07-01 21:49:22
阅读次数:
374
我们都知道现在的语音合成TTS是可以通过微软的SAPI实现的,好处我就不多说了,方便而已,因为在微软的操作系统里面就自带了这个玩意,主要的方式有两种: 1、使用COM组件技术,不管是C++,C#,Delphi都能玩的转,开发出来的东西在XP和WIN7都能跑。(要引入SpeechLib,好像在项目上点...
delphi fmx的字体等设置默认与皮肤有关,用代码直接修改字体颜色等是无效的,如何才能用代码修改呢?请按以下方法就可以:1.在Object inspector中取消StlyedSettings中的Fontcolor选项的勾。2. Label6.TextSettings.FontColor:=TA...
分类:
其他好文 时间:
2014-06-30 22:47:39
阅读次数:
265
一、 创建互斥对象 在工程project1.dpr中创建互斥对象Program project1UsesWindows,Form,FrmMain in 'FrmMain.pas' {MainForm}; {$R *.res} var hAppMutex: THandle; //声明互斥变量 begi...
分类:
其他好文 时间:
2014-06-30 13:51:47
阅读次数:
176
HP-Socket 是一套通用的高性能 TCP/UDP Socket 组件,包括服务端组件、client组件和 Agent 组件,广泛适用于各种不同应用场景的 TCP/UDP 通信系统,提供 C/C++、C#、Delphi、E、Java 等编程语言开发接口。HP-Socket 对通信层实现全然封.....
分类:
其他好文 时间:
2014-06-29 19:41:47
阅读次数:
355
一、前言图形的绘制可以使用glBegin()、glEnd()之间完成,绘制的框架代码可以使用Delphi下OpenGL2d绘图(01)-初始化中的代码。修改的部份为 Draw 函数的内容。二、画点使用glPointSize 函数指定栅格化点的直径。默认为1.0,只在GL_POINTS下起作用,关于消...
分类:
其他好文 时间:
2014-06-27 13:01:02
阅读次数:
170
一、前言画线与画点基本上代码是相同。区别在于glBegin()的参数。绘制的框架代码可以使用Delphi下OpenGL2d绘图(01)-初始化中的代码。修改的部份为 Draw 函数的内容。二、画线GL_LINES:把每一个顶点作为一个独立的线段,顶点2n-1和2n之间共定义了n条线段,总共绘制N/2...
分类:
其他好文 时间:
2014-06-27 12:01:06
阅读次数:
188