随笔分类 - Delphi / Delphi应用开发完全手册 / Delphi常用语句
摘要：```pascal Create(nil); //需要自己释放 //这种方式创建的对象要自己手工进行FREE才会回收内存 //其他很多内存泄漏就是忘了手工释放内存 Create(Self); //当Self释放时自动触发释放 //由self对象负责释放创建的对象，只要self没有释放掉 //这个对象
阅读全文
摘要：函数、过程的区别： 什么时候使用函数，什么时候使用过程？ 一个函数应该只有一个返回值，就像数学函数一样，这意味着函数只能接受仅用于输入的参数，并只通过函数本身返回一项结果。函数永远应该以它所返回的值来命名，就像sin（）、CustomerID（）、ScreenHeight（）一样。在另一方面，过
阅读全文
摘要：在单元接口interface部分声明的过程或函数在整个单元内有效。当其他单元（客户单元）引用 该单元时，这些过程和函数可以被其他客户单元使用。 unit Unitl; //单元首部 interface //接口部分 function getstring(sl,s2:string):string;/∥
阅读全文
摘要：名称相同而参数的数据类型和数量不同的过程或函数，称为重载 ```pascal function getvalue(x:integer;s1:string):string;overload； begin result:=inttostr(x)+s1; end; function getvalue(x,
阅读全文
摘要：Break语句 Break语句用于跳出循环，当一个循环没有达到循环结束的条件并要结束循环时，使用Break语句。 function GetValue:integer; var i,j:integer; begin i:=0; for j:=0 to 20 do begin i:=i+j; if i>
阅读全文
摘要：#### for…do语句 ```pascal //循环变量为整数类型 function GetIntLoopNumber:integer; var iResult,iCount:integer; begin iResult:=0: for iCount:=0 to 10 do Inc(iResul
阅读全文
摘要：If then else begin if 条件 then 语句块 else 语句块; end; // 或 begin if 条件1 then begin 语句块1; end else if 条件2 then begin 语句块2; end else if 条件3 then begin 语句块3;
阅读全文
摘要：InputBox procedure TForm1.Button1Click(Sender: TObject); var str: string; begin str := InputBox('输入窗口标题', '输入提示', '默认输入内容'); Label4.Caption := str ; e
阅读全文
