蓝天白云 – 第37页

Delphi操作xml文件的各种方法总结

分类：File No Responses »

10月 312012

本文介绍了如何在Delphi中使用IXMLDOMDocument接口或者TXmlDocument控件进行读取和写入xml文件的方法。The article demonstrates how to read and write xml files by IXmlDOMDocument interface or TXmlDocument component in delphi programming.

Delphi中使用TIdhttp模拟发送cookie

分类：Internet No Responses »

10月 292012

本文介绍如何使用TIdhttp控件向网站模拟发送cookie数据。The article introduces how to simulate sending cookie data to website.

PHP字符串函数

分类：PHP No Responses »

10月 272012

AddSlashes: 字符串加入斜线。 bin2hex: 二进位转成十六进位。 Chop: 去除连续空白。 […]

PHP中输出换行符的方法

分类：PHP No Responses »

10月 272012

在PHP中输出换行符的方法，是指生成的html代码里有换行符，不是生成<br>那种在window […]

Html特殊字符编码表

分类：Other No Responses »

10月 262012

当我们编写代码时，我们最好使用规范的html代码来编码，某些特殊字符的html代码很难记住，所以总结起来以方便记忆。When we coding, it is better to use normative code, this article is a summary of special characters html code, write here to review it later.

NSIS中根据用户选择的语言设置程序中的语言选项

分类：NSIS No Responses »

10月 242012

　　当用户在安装程序时选择了相应的语言后，我们希望我们的程序中的相应的语言选项也变相同的设置，这样避免用户在进 […]

Languages informations in Windows system

分类：Other 1 Response »

10月 242012

Locale ▾ Language code LCID string LCID Decimal LCID He […]

Delphi生成字符字典的代码

分类：Delphi No Responses »

10月 032012

unit Unit1; interface uses Windows, Messages, SysUtils, […]

IIS无法启动的解决办法

分类：Windows No Responses »

10月 032012

　　今天打开IIS发现IIS无法启动了，在控制面板-》管理工具-》计算机管理-》事件查看器-》系统中发现在，W […]

Delphi中Dbgrid实现全选和反选

分类：Database, Delphi No Responses »

10月 032012

//全选

procedure TFrameCustSelector.ToolButton1Click(Sender: TObject);
var
	OldCurrent: TBookmark;
begin
	OldCurrent := DBGrid1.DataSource.DataSet.Bookmark;
	DBGrid1.DataSource.DataSet.DisableControls;

	DBGrid1.DataSource.DataSet.First ;
	while not DBGrid1.DataSource.DataSet.Eof do begin
		DBGrid1.SelectedRows.CurrentRowSelected := true;
		DBGrid1.DataSource.DataSet.Next;
	end;

	DBGrid1.DataSource.DataSet.GotoBookmark(OldCurrent);
	DBGrid1.DataSource.DataSet.EnableControls;
end;

//全清

procedure TFrameCustSelector.ToolButton2Click(Sender: TObject);
var
	OldCurrent: TBookmark;
begin
	OldCurrent := DBGrid1.DataSource.DataSet.Bookmark;
	DBGrid1.DataSource.DataSet.DisableControls;

	DBGrid1.DataSource.DataSet.First ;
	while not DBGrid1.DataSource.DataSet.Eof do begin
		DBGrid1.SelectedRows.CurrentRowSelected := False;
		DBGrid1.DataSource.DataSet.Next;
	end;

	DBGrid1.DataSource.DataSet.GotoBookmark(OldCurrent);
	DBGrid1.DataSource.DataSet.EnableControls;
end;

//反选
procedure TFrameCustSelector.ToolButton3Click(Sender: TObject);
var
OldCurrent: TBookmark;
begin
	OldCurrent := DBGrid1.DataSource.DataSet.Bookmark;
	DBGrid1.DataSource.DataSet.DisableControls;

	DBGrid1.DataSource.DataSet.First ;
	while not DBGrid1.DataSource.DataSet.Eof do begin
		DBGrid1.SelectedRows.CurrentRowSelected := not DBGrid1.SelectedRows.CurrentRowSelected;
		DBGrid1.DataSource.DataSet.Next;
	end;

	DBGrid1.DataSource.DataSet.GotoBookmark(OldCurrent);
	DBGrid1.DataSource.DataSet.EnableControls;
end;

//全选

procedure TFrameCustSelector.ToolButton1Click(Sender: TObject);

var

OldCurrent: TBookmark;

begin

OldCurrent := DBGrid1.DataSource.DataSet.Bookmark;

DBGrid1.DataSource.DataSet.DisableControls;

DBGrid1.DataSource.DataSet.First ;

while not DBGrid1.DataSource.DataSet.Eof do begin

DBGrid1.SelectedRows.CurrentRowSelected := true;

DBGrid1.DataSource.DataSet.Next;

end;

DBGrid1.DataSource.DataSet.GotoBookmark(OldCurrent);

DBGrid1.DataSource.DataSet.EnableControls;

end;

//全清

procedure TFrameCustSelector.ToolButton2Click(Sender: TObject);

var

OldCurrent: TBookmark;

begin

OldCurrent := DBGrid1.DataSource.DataSet.Bookmark;

DBGrid1.DataSource.DataSet.DisableControls;

DBGrid1.DataSource.DataSet.First ;

while not DBGrid1.DataSource.DataSet.Eof do begin

DBGrid1.SelectedRows.CurrentRowSelected := False;

DBGrid1.DataSource.DataSet.Next;

end;

DBGrid1.DataSource.DataSet.GotoBookmark(OldCurrent);

DBGrid1.DataSource.DataSet.EnableControls;

end;

//反选

procedure TFrameCustSelector.ToolButton3Click(Sender: TObject);

var

OldCurrent: TBookmark;

begin

OldCurrent := DBGrid1.DataSource.DataSet.Bookmark;

DBGrid1.DataSource.DataSet.DisableControls;

DBGrid1.DataSource.DataSet.First ;

while not DBGrid1.DataSource.DataSet.Eof do begin

DBGrid1.SelectedRows.CurrentRowSelected := not DBGrid1.SelectedRows.CurrentRowSelected;

DBGrid1.DataSource.DataSet.Next;

end;

DBGrid1.DataSource.DataSet.GotoBookmark(OldCurrent);

DBGrid1.DataSource.DataSet.EnableControls;

end;

Page 37 of 40 Newer Entries 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 Older Entries