潇湘博客

1. 去掉cxgrid中抬头的box,在tableview1的ptionsview的groupbybox=false;2. 在GRID footer 中加入sum(列),tableview1的optionsview的footer=ture然后在cxGRid1的customize中的summary 的footer.add需要合计的列kind= skSum3. 去掉cxgrid中的过滤下拉箭头选择ta...

delphi 编写的com 对象 用php调用的实例 delphi: function Tmyxml.Get_xml: WideString;begin      Get_xml:=wo shi a lei!;end;function Tmyxml.Get_xmldata: WideString;varxmlStr:string;

Procedure TForm1.Button1Click(Sender: TObject);Var xmlstr,FileName: String; f: Textfile;Begin xmlStr := ; xmlstr := xmlstr + 张三男; showmessage(xmlstr); FileName:=a.xml;

delphi 编写的com 对象 用delphi 的调用实例COM 对象与 前一篇文章的 PHP调用的COM为同一个对象，故不例出COM. procedure TForm1.Button4Click(Sender: TObject);var  myCounter, mReturn: variant;begin  myCounter := CreateOleObject(

; *** Inno Setup version 5.1.11+ Chinese messages  中文消息提示文件***;; To download user-contributed translations of this file, go to:;   http://www.jrsoftware.org/files/istrans/;; Note: When tra

Showmodal是个函数，Show是个过程  1.     Showmodal:  概念:      当你调用一个窗口用SHOWMODAL时,当这个窗口显示出来后,程序不会继续自己执行,而是根据你对这个窗口的操作来执行,只有关闭了这个

　  程序静默安装的参数总结      软件的安装采取全自动或半自动的方式进行。　　一、Microsoft Windows Installer　　如果某个软件是用 Windows Installer 打包的，那你就应该能在文件夹中看到 *.msi 文件。这是最典型的特征，这些文件通常可以使用 /QB 和 /QN 参数进行自动安装。　　/qb 会在窗口中显示一个基

inno setup 附加数据库方法[Code]{--- SQLDMO ---}const SQLServerName = (local); SQLDMOGrowth_MB = 0;procedure InstallDb();var SQLServer, Database, DBFile, LogFile: Variant; IDCo

Inno Setup + ISTool黄金搭档 Inno Setup: 是一款免费的安装制作工具。简洁而强大，支持 pascal 脚本，既有适合新手的脚本向导，也有适合高手的的脚本编辑器。是一个不可多得的安装制作软件！ ISTool: 是帮助你创建由 Jordan Russell 制作的 Inno Setup 编译器脚本的工具。Inno Setup 是一个出色的编译器，即使

DELPHI 画报表 画表头 stringgrid控件procedure   TForm1.StringGrid1DrawCell(Sender:   TObject;   ACol,   ARow:       Integer;         Rect:   TRect;   State:   TGridDrawState);     var      

DELPHI 排课系统课表DELPHI 排课系统课表DELPHI 排课系统课表下载地址： http://download.youkuaiyun.com/source/1453461

msde 附加数据  mssqluse master  declare @databasename varchar(255)  set @databasename=需要修复的数据库实体的名称  exec sp_dboption @databasename, Nsingle, Ntrue --将目标数据库置为单用户状态  dbcc checkdb(@databasen

delphi 注册 com 对象的方法 procedure TForm1.Button3Click(Sender: TObject);var Sd: TSecurityDescriptor; begin   InitializeSecurityDescriptor(@Sd, SECURITY_DESCRIPTOR_REVISION);    SetSecurityDes

delphi dll 实例 与 dll窗体实例本动态链接库方法有Min,Max,SynAPP,ShowForm,showmyform dll工程文件 Library Project1;uses  dllUnit1 in dllUnit1.pas {Form1};function Min(X, Y: Integer): Integer; export;

cxSpreadBook 或 cxSpreadSheet 设置成文本格式 TcxSSDataType = (dtText, dtFunction, dtDateTime, dtControl);cxSpreadSheet1.Sheet.GetCellObject(col, row).Style.Format:=1; //1代表字符串类型cxSpreadSheet1.Sheet.GetCellObj...

Delphi7，DelphiXE，实测DevExpress手动安装顺序：1、ExpressCore Library2、XP Theme Manager3、ExpressGDI+ Library4、ExpressLibrary5、ExpressCommon Library6、ExpressDataController7、ExpressEditors Library 58、ExpressExport ...

Firemonkey是一个基于CPU/GPU混合架构的业务应用平台，能够帮助开发人员设计出Windows、Android、Mac和iOS设备上的视觉绚丽的本地应用程序。外文名firemonkey开发公司Embarcadero（英巴卡迪诺）特征Firemonkey允许开发人员创建具有快速的本地性能、动画和图像效果、企业级的数据连接以及交互式数据可视化的富HD和3D的图形应用程序，并且可以使用亚马逊和...

据小道消息，70%的软件从业者都认为自己怀才不遇。也许你不同意，但是我承认，我也是其中一员，呵呵。韩寒说，怀才就像怀孕,时间久了才能让人看出来。但也有人说，怀得太长就生了，谁还知道你有才？看来在生之前就被看出来是件很重要的事。然而千里马常有，伯乐不常有。“我的梦中

delphi adodataset1 调用存储过程的方法 adodataset1 的特殊用法存储过程CREATE PROCEDURE adddata@name nvarchar(20) ,@mm nvarchar(20) ,@ddd

Delphi书籍 教程下载百例课堂 Delphi7 编程入门篇.pdfDelphi精要.pdfDelphi串口通信技术与工程实践.pdfDelphi7程序设计与开发技术大全.pdfDelphi7编程技巧与实例精解.pdf

dll 调用方法有 静态调用和动态调用两种方法用到的dll为上篇文章所编写的dll.总结如下： Unit Unit1;InterfaceUses  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,  Dialogs, StdCtrls;Type 

VisualSVN Server+SVN超简单配置指南 介绍一个简单的工具:VisualSVN Server 这东西不花钱:VisualSVN Server is completely free!只需要简单的2步就OK了~1.安装VisualSVN Server,设置仓库地址和安装路径.有security选项,并且设置一下端口~很easy

由于 TREE从源表复制到目标表的ID号与PARENT会变化，故不能单纯的复制数据，还要将ID与PARENT的结构关系复制到目标表。因此我们用递归操作。 由于 myquery 的数据会变动，我们要实时创建myquery 。 下面是 delphi tree 从一个表复制到另一个表 的递归源码：Procedure Tfrm_SysDepasManager.CopyTree(so

Unit Unit1;InterfaceUses  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,  Dialogs, Grids, DBGrids, DB, ADODB;Type  TForm1 = Class(TForm)    DataSource1: TDataSource; 

数据显示页面： unit Unit1;interfaceuses  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,  Dialogs, Grids, DBGrids, DB, ADODB, StdCtrls, DBCtrls, ExtCtrls;type  TForm1 = class(T

最近在和老公研究他們公司的產品(其實是老公想做接口,必須研究.).因為他delphi的基礎比較薄弱,所以,在他的”哀求”下,我又開始研究起delphi了—關于COM接口編程.在較早的時候,我的博客里已經有關于COM編程的有關知識(http://hi.baidu.com/yueyun889/blog/item/53ad2c1208b6f950f919b8ee.html),不過相信對于大部分入

DLL代码： library project2;uses  SysUtils,  Classes,  Unit1 in Unit1.pas {Form1};function TestDll(i:string):string;stdcall;beginResult:=i;end;exportsTestDll;beginend.   窗体文件代码：  uni

delphi MessageBox 用法 1.最简单用法,不带图形MessageBox(0,不同意,提示,MB_OK);MessageBox(0,不同意,提示,MB_OKCANCEL );2.警告对话框:MessageBox(0,密码不能为空,请务必输入密码,警告,MB_ICONEXCLAMATION);3.提示信息对话框:MessageBo

delphi 显示数据   标准动态 显示数据 procedure TForm1.Button2Click(Sender: TObject);    var   databasename:string;   ip:string;begin  adoconnection1.Close;  databasename:=ComboBox2.Text;//数据库  ip:=ComboB

GetDriveType(路径) 判断一个磁盘驱动器的类型 返回一个整数0 驱动器类型不确定1 系统目录不存在2 DRIVE_REMOVABLE 是可移动驱动器 3 DRIVE_FIXED 是固定驱动器 4 DRIVE_REMOTE 是网络驱动器 5 DRIVE_CDROM 是CD-ROM驱动器 6 DRIVE_RAMDISK 是虚拟驱动器  

先看一段程序, 代码文件:unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TForm1 = class(TForm) ListBox1: TListBox; Button1:

delphi 类与继承提倡采用面向对象的方法开发DELPHI应用程序。 定义人类：  unit Person_Cls;  interface  type    Person=class       //基类    private      name:string;       //私有变量（姓名，性别，身高，体重）      sex:string;      year:inte

多线程应该是编程工作者的基础技能, 但这个基础对我来讲的确有点难(起码昨天以前是这样).开始本应该是一篇洋洋洒洒的文字, 不过我还是提倡先做起来, 在尝试中去理解.先试试这个:procedure TForm1.Button1Click(Sender: TObject);var i: Integer;begin for i := 0 to 500000 do beg

 Delphi3开始有了TWebBrowser构件，不过那时是以ActiveX控件的形式出现的，而且需要自己引入，在其后的4.0和5.0中，它就在封装好shdocvw.dll之后作为Internet构件组之一出现在构件面板上了。常常听到有人骂Delphi的帮助做得极差，这次的TWebBrowser又是Microsoft的东东，自然　　这里有平时我自己用TWebBrowser做程序的一些

delphi 用户登录 代码 用到的ADO控件是 ADOConnection、ADOquery  procedure TForm1.Button1Click(Sender: TObject);var  databasename:string;  ip:string;begin  databasename:=jswlibs;//数据库  ip:=192.168.1.12

delphi tcp/ip IdTCPClient1实例一unit Unit1;interfaceuses  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,  Dialogs, StdCtrls, IdBaseComponent, IdComponent, IdTCPConnection, 

unit Unit1;interfaceuses  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,  Dialogs, IdBaseComponent, IdComponent, IdTCPServer, StdCtrls;type  TForm1 = class(TForm)    IdTCPS

delphi cxgrid 使用方法1.绑定数据方法cxGrid1DBTableView1.DataController.DataSource:=DataSource12.去掉"Drag   a   column   header   here   to   group   by   that   column"方法cxGrid1DBTableView1.OptionsVi

procedure TForm1.Button1Click(Sender: TObject);varMyTreeNode1, MyTreeNode2: TTreeNode;beginwith TreeView1.Items dobeginClear; { remove any existing nodes }MyTreeNode1 := Add(nil, RootTreeNode1); { A

Procedure TfrmUserManagerForm.SeSkinButton3Click(Sender: TObject);Var  count, scount: integer;  mynode: TTreeNode;  mysubItem: TdxBarSubItem;Begin  Inherited;  For count := 0 To frmMainForm.MenuBar.