Delphi的参数可以分为:默认参数(传值).var(传址).out(输出).const(常数)四类 可以对比C/C++的相关知识,类比学习. 1.默认参数是传值,不会被改变,例子 function MyFun(x : Integer) : Integer; begin Inc(x); Result := x; end; 2.var参数是传址,会被改变,例子 function MyFunVar(var x : Integer) : Integer; begin Inc(x); Result :=
今天看了多年前的一个帖子,发现回答不合理,有些还将其归为delphi的bug.其实主要是没有灵活应用参数. ADOQUERY查询时,这样不行,结果不正确. WITH ADOQUERY1 DO BEGIN CLOSE;SQL.CLEAR; SQL.ADD('SELECT * FROM TABLE1 WHERE TA001=:MONTH AND TA002=:MONTH'); PARAMETERS.ParamByName('MONTH').Value :=EDIT1.TEXT; OP
参数可以分为: 默认参数(传值).var(传址).out(输出).const(常数)四类 {默认参数是传值, 不会被改变} function MyF1(x: Integer): Integer; begin Inc(x); Result := x; end; {var参数是传址, 会被改变} function MyF2(var x: Integer): Integer; begin Inc(x); Result := x; end; {out参数是为支持Com的, 和 var 的结果是一样的,
ClientDataSet1.CommandText := sSQL; ClientDataSet1.Params.Clear; ClientDataSet1.CommandText :='SELECT * FROM test WHERE ID=:TID and Code=:Code '; //传参后面加一个空格 ClientDataSet1.Params.ParamByName(; ClientDataSet1.Params.ParamByName('; //每个":Code &quo
{ paper selections } {$EXTERNALSYM DMPAPER_LETTER} DMPAPER_LETTER = 1; { Letter 8 12 x 11 in } {$EXTERNALSYM DMPAPER_FIRST} DMPAPER_FIRST = DMPAPER_LETTER; {$EXTERNALSYM DMPAPER_LETTERSMALL} DMPAPER_LETTERSMALL = 2; { Letter Small 8 12 x 11 in } {$EX
发现Delphi中关于函数参数部分的内容还是比较多的,暂时说到这篇随笔为止吧,以后再继续讨论一下函数的参数部分的内容. 一 工程文件 program DefaultParameter; {$APPTYPE CONSOLE} uses SysUtils, Unit1 in 'unit1.pas'; var nVar:integer; strVar:string; i:integer; nVarArray:array of integer; begin { 1. 调用具有默认参数的方法 } //不提