例如以下**：
unit unit1;
inte***ce
uses
windows, messages, sysutils, variants, classes, graphics, controls, forms,dialogs;
type
tform1 = class(tform)
procedure one();
function two(x,y:integer):integer;
private
public
end;
varform1: tform1;
implementation
procedure tform1.one();
varp : pointer;
begin
p:=@two;
end;
function tform1.two(x,y:integer):integer;
begin
result:=x+y;
end;
end.
在delphi5中，沒有任何問題，到了delphi7、2007、2009中就會報錯：需要變數（delphi6沒試）
varform1: tform1;
function two(x,y:integer):integer;
function two(x,y:integer):integer;
foreach中使用取位址符的問題
1 colors array red blue green yellow 23 foreach colors as color 6 7foreach colors as key color 10 11print r colors 第乙個foreach迴圈中使用了取位址符，由於沒有釋放 color，所...
Delphi取整函式
floor 和 ceil 是 math unit 裡的函式，使用前要先 uses math。trunc 和 round 是 system unit 裡的函式，預設就可以用。floor 直接往小的取，比如 floor 123.55 124，floor 123.55 123 trunc 直接切下整數，比...
Delphi取整函式
function int x extended extended 取整 注意它返回的是extended型別它也是浮點型哦 function round x extended int64 四捨五入 function trunc x extended int64 將小數無條件捨去 floor 直接往小的...