文件名称:liangku
介绍说明－－下载内容均来自于网络，请自行研究使用
数据库编程的简单举例.原创.使用了一些小技巧.不是最简单的控件使用.
如:
function GetDsXml(sql:string):string
begin
with FrmDb do
begin
qry.Close
qry.SQL.Clear
qry.SQL.Add(sql)
try
qry.Open
cds1.Open
if not qry.Eof then
begin
Result:=cds1.XMLData
end
except
on e:Exception do Result:=e.Message
end
qry.Close
cds1.Close
end
end -simple database program, for example. Originality. Use some small skills. It is not the most simple to use controls. Such as : function GetDsXml (sql : string) : string begin with FrmDb do begin qry.Close qry.SQL.Clear qry.SQL.Add (sql ) try qry.Open cds1.Open if not qry.Eof then begin Result : = cds1.XMLData end except on e : Exception do Result : = qry.Close cds1.Close e.Message end end end
如:
function GetDsXml(sql:string):string
begin
with FrmDb do
begin
qry.Close
qry.SQL.Clear
qry.SQL.Add(sql)
try
qry.Open
cds1.Open
if not qry.Eof then
begin
Result:=cds1.XMLData
end
except
on e:Exception do Result:=e.Message
end
qry.Close
cds1.Close
end
end -simple database program, for example. Originality. Use some small skills. It is not the most simple to use controls. Such as : function GetDsXml (sql : string) : string begin with FrmDb do begin qry.Close qry.SQL.Clear qry.SQL.Add (sql ) try qry.Open cds1.Open if not qry.Eof then begin Result : = cds1.XMLData end except on e : Exception do Result : = qry.Close cds1.Close e.Message end end end
(系统自动生成,下载前可以参看下载内容)
下载文件列表
压缩包 : 91331990liangku.rar 列表 liangku\uList.pas liangku\Stock.ini liangku\uList.~dfm liangku\uFunction.pas liangku\uLogin.~pas liangku\uLogin.~dfm liangku\uMain.dcu liangku\uDb.~dfm liangku\uMain.dfm liangku\uList.ddp liangku\uFunction.~pas liangku\uLogin.~ddp liangku\uFunction.dcu liangku\uAbout.pas liangku\uDb.~ddp liangku\uMain.ddp liangku\uMain.~dfm liangku\uPw1.ddp liangku\uList.dcu liangku\uAbout.dfm liangku\LiangKu liangku\uPw1.~ddp liangku\uAbout.ddp liangku\uDb.pas liangku\uAbout.~pas liangku\uAbout.~dfm liangku\uAbout.~ddp liangku\uList.dfm liangku\uMain.~ddp liangku\uDb.dcu liangku\uPw1.~dfm liangku\uDb.~pas liangku\uPw1.dcu liangku\Stock.~dpr liangku\uPw1.dfm liangku\uList.~pas liangku\uDb.dfm liangku\uAbout.dcu liangku\Stock.res liangku\Stock.exe liangku\uLogin.dcu liangku\uDb.ddp liangku\uMain.~pas liangku\uPw1.~pas liangku\uPw1.pas liangku\uMain.pas liangku\test.mdb liangku\uLogin.pas liangku\uLogin.dfm liangku\uLogin.ddp liangku\Stock.dpr liangku\Stock.dof liangku\Stock.cfg liangku\vclskin\Compilers.inc liangku\vclskin\ImgUtil.dcu liangku\vclskin\SkinRead.dcu liangku\vclskin\WinConvert.dcu liangku\vclskin\WinSkinD7.dcu liangku\vclskin\WinSkinD7.dpk liangku\vclskin\WinSkinD7.res liangku\vclskin\WinSkinData.dcu liangku\vclskin\WinSkinDlg.dcu liangku\vclskin\WinSkinForm.dcu liangku\vclskin\WinSkinMenu.dcu liangku\vclskin\WinSkinReg.dcr liangku\vclskin\WinSkinReg.dcu liangku\vclskin\WinSkinReg.pas liangku\vclskin\WinSkinStore.dcu liangku\vclskin\WinSubClass.dcu liangku\vclskin\WinSkinD7.dof liangku\vclskin\WinSkinD7.cfg liangku\vclskin liangku\skins\skin0010.skn liangku\skins\skin0011.skn liangku\skins\skin0004.skn liangku\skins\skin0000.skn liangku\skins liangku