摘要：
OnActive 焦点称到窗体或控件时发生OnClick 鼠标单击事件OnDbClick 鼠标双击事件OnClose和OnCloseQuery 当关闭一个窗体时就会响应OnClose和OnCloseQuery事件 ，OnCloseQuery事件比OnClose具有更高的优先级。OnContextPopup 在窗体上单击鼠标右键时触发OnCreate 建立事件，窗件或控件第一次建立时发生。OnCreate事件只发生一次，用来执行初始化任务OnDeactivate 从当前程序切换到另一个应用程序时发生OnDestroy 卸载窗体或控件时被触发，用来清除窗体或控件所占的内存，或者其他的收尾工作nDr 阅读全文
摘要：
Delphi中解析Xml的控件-SimDesign NativeXml正在学习，感觉应用很方便。无源代码的版本还是免费的。SimDesign.NativeXml是一个delphi和bcb的XML控件，包含一个精巧的Delphi XML执行，使你能在程序中读写XML文档。http://www.simdesign.nl/xml.html网上有一个利用SimDesign.NativeXml生成XML的例子。一个更加强大易用的XML库-- NativeXML原来一直使用Delphi自带的TXMLDocument类来进行XML文件的读写，虽然麻烦了一点，但功能上来说还不错。只是有一个地方让我实在不舒服- 阅读全文
摘要：
function IsWin64: Boolean;var Kernel32Handle: THandle; IsWow64Process: function(Handle: Windows.THandle; var Res: Windows.BOOL): Windows.BOOL;stdcall;GetNativeSystemInfo : procedure(var lpSystemInfo: TSystemInfo); stdcall; isWoW64 :BOOL;SystemInfo : TSystemInfo; const PROCESSOR_ARCHITECTURE_AMD64 = 阅读全文
摘要：
1、获取windows版本信息可以通过Windows API函数GetVersionEx来获得。具体程序如下：Procedure Tform1.Button1Click(sender:TObject); Var OSVI:OSVERSIONINFO; begin OSVI.dwOSversioninfoSize:=Sizeof(OSVERSIONINFO)； GetVersionEx(OSVI); label1.Caption:=IntToStr(OSVI.dwMinorVersion)+',' +IntToStr(OSVI.dwMinorVersion)+',' 阅读全文
摘要：
Delphi的高效不多说... 俗话说；真正的程序员用C语言，聪明的程序员用Delphi，一点都不假，和C++比它比C++更简单，更容易上手,功能丝毫不逊色C++，比起VB，毫无疑问比VB好多了，重要的是快，高效！ 高效的Pascal编译器，强大的数据库支持==.... Delphi在进行计算量相当大的时候会出现程序假死，在线程编程的时候会出现线程堵塞，更重要的是在线程编程时可以大大加快程序的效率。。我们可以用这个函数：Application.ProcessMessages; //防止线程堵塞，程序假死 如在进行一个0到10000的运算时可能会出现假死的现象[delphi]view p... 阅读全文
摘要：
[delphi]view plaincopyprint?{将数据集操作方面的东西全部封装成一个单独的类TcustomAdoDataSet是TadoQuery、TadoTable、TadoDataSet、TadoCommand的公共祖先类应尽量使用TadoDataSet和TadoCommand类}unituntOpeDataSet;interfaceusesSysUtils,db,adodb,commonFunction,msg;typeTopeDataSet=classpublic{修改已发生，但还没有得到应用的记录，在关闭窗口前应给予提示}functionadoUpdatesPending( 阅读全文
摘要：
[delphi]view plaincopyprint?SysUtils.StrToDate();SysUtils.StrToDateDef();SysUtils.TryStrToDate();SysUtils.StrToTime();SysUtils.StrToTimeDef();SysUtils.TryStrToTime();SysUtils.StrToDateTime();SysUtils.StrToDateTimeDef();SysUtils.TryStrToDateTime();SysUtils.DateToStr();SysUtils.TimeToStr();SysUtils.Da 阅读全文
摘要：
[delphi]view plaincopyprint?先把要讨论的几个属性列出来：1、CommaText2、Delimiter&DelimitedText3、Names&Values&ValueFromIndex先看第一个：CommaText。怎么用呢？用代码说话：constconstr:String='aaa,bbb,ccc,ddd';varstrs:TStrings;i:Integer;beginstrs:=TStringList.Create;strs.CommaText:=constr;fori:=0toStrs.Count-1doShowMe 阅读全文
摘要：
2013-12-30 12:2712人阅读评论(0)收藏举报[delphi]view plaincopyprint?//TStringList常用方法与属性:varList:TStringList;i:Integer;beginList:=TStringList.Create;List.Add('Strings1');{添加}List.Add('Strings2');List.Exchange(0,1);{置换}List.Insert(0,'Strings3');{插入}i:=List.IndexOf('Strings1');{第 阅读全文
摘要：
ShellExecute的功能是运行一个外部程序（或者是打开一个已注册的文件、打开一个目录、打印一个文件等等），并对外部程序有一定的控制。有几个API函数都可以实现这些功能，但是在大多数情况下ShellExecute是更多的被使用的，同时它并不是太复杂。下面举例说明它的用法。开始一个新的应用程序ShellExecute(Handle, 'open', PChar('c:\test\app.exe'), nil, nil, SW_SHOW);打开记事本，并打开一个文件(系统能识别记事本应用程序的路径，因此我们不必使用绝对路径）ShellExecute(Handle 阅读全文