UsesMemoryCpuUtils;//首先引用该单元//声明下列变量用来存储读取的数值VariTotalPhysics,iTotalVirtual,iTotalPageFile,iCurPhysics,iCurVirtual,iCurPageFile:DWord;//CPU数量Format('系统中共有%d个CPU...

Delphi操作XMLDelphi操作XMl，只要使用NativeXml。我是用的版本是4.02。NativeXML的使用方法比较简单，但是功能很强大。XE2的话，要在simdesign.inc后面加上：//DelphiXE2/16{$ifdefVER230}{$defineD7UP}{$defineD10UP}{$d...

本文的内容取自网络，并重新加以整理，在此留存仅仅是方便自己学习和查阅。所有代码均亲自测试delphi7下测试有效。图片均为自己制作。多线程应该是编程工作者的基础技能,但这个基础我从来没学过，所以仅仅是看上去会一些，明白了2+2的时候，其实我还不知道1+1。开始本应该是一篇洋洋洒洒的文字,不过我还是提倡先做起来,在尝试中...

首部functionSameText(constS1,S2:string):Boolean;$[SysUtils.pas功能返回两个字符串是否相等说明不区分大小写参考<NULL>例子CheckBox1.Checked:=SameText(Edit1.Text,Edit2.Text);━━━━━━━━━━━━...

;notallowedbeforeELSEElSE前不允许有“;”<clause>clausenotallowedinOLEautomationsection在OLE自动区段不允许“<clause>”子句<name>isnotatypeidentifier<name>不是...

   Delphi 语言的数据库编程中，DBGrid 是显示数据的主要手段之一。但是 DBGrid 缺省的外观未免显得单调和缺乏创意。其实，我们完全可以在我们的程序中通过编程来达到美化DBGrid 外观的目的。通过编程，我们可以改变&nbs...

procedureTForm1.Button1Click(Sender:TObject);vari:Integer;begini:=SendMessage(Richedit1.handle,EM_LINEFROMCHAR,Richedit1.selstart,0)+1;ShowMessage(IntToStr(i));...

//先来个例子:procedureTForm1.FormPaint(Sender:TObject);const S='万一的Delphi博客';var font:TFont;begin font:=TFont.Create; font.Name:='微软雅黑'; fon...

Delphi中字符串的操作很简单，但幕后情况却相当复杂。Pascal传统的字符串操作方法与Windows不同，Windows吸取了C语言的字符串操作方法。32位Delphi中增加了长字符串类型，该类型功能强大，是Delphi缺省的字符串类型。    字符串类型在Borland公司...

1.       提取字符串中指定子字符串前的字符串　　Function Before( Src:string ; S:string ): string ;　　Var　　 ...

一、流的概念流简单说是建立在面向对象基础上的一种抽象的处理数据的工具，它定义了一些处理数据的基本操作，如读取数据，写入数据等，程序员只需掌握对流进行操作，而不用关心流的另一头数据的真正流向。其实，流就是把整个对象转化为一个一个单字节数据，然后形成数据流，其形同把固体石块打碎成一颗颗细小的沙子一样，最后可以形成流沙。二、...

{ 在网上看到个这个例子感觉还不错，将它移到自己的博客里没事的时候看看； TRect   作用：保存一个矩形的左上角和右下角的坐标值；    声明：     typeTRect=p...

Delphi遍历文件夹及子文件夹{-------------------------------------------------------------------------------过程名:    MakeFileList遍历文件夹及子文件夹作者:  ...

OnActive焦点称到窗体或控件时发生 OnClick鼠标单击事件 OnDbClick鼠标双击事件 OnClose和OnCloseQuery当关闭一个窗体时就会响应OnClose和OnCloseQuery事件，OnCloseQuery事件比OnClose具有更高的优先级。 On...

Delphi中解析Xml的控件-SimDesignNativeXml 正在学习，感觉应用很方便。无源代码的版本还是免费的。SimDesign.NativeXml是一个delphi和bcb的XML控件，包含一个精巧的DelphiXML执行，使你能在程序中读写XML文档。 http://www.simd...