請教Delphi的參數傳遞及返回值的問題

Question

1)      
   function GetDateRange(var start_Date : DateTime):DateTime;2)    
   function GetImportDateRange(isImport:Boolean):array of integer;
   Type RangeArray = Array of Integer;
   function GetImportDateRange(isImport:Boolean):RangeArray; 关于第二个问题：
1、后面是不是因为少了一个“：”而编译不通!
2、动态数组能否当作函返回值!
3、数组能否当作函返回值!

Answer 1

如果数组不能作为函数的返回值，可以定义为一个可写变量：
procedure/function AA(var WriteVar: Array of ……）……
—————————————————————————————————
MaximStr := '宠辱不惊，看庭前花开花落，去留无意；
             毁誉由人，望天上云卷云舒，聚散任风。';
if Not Assigned(I) then
  I := TI.Create(Nil);
I.Maxim := MaximStr;
I.Explain := '假如上述代码中出现“OA”、“3D”等字样，改为“=”等';
I.Desire := '加不加分随你';
—————————————————————————————————
　　　　　　　

Answer 2

另外有個問題:在Delphi裡面有幾種傳遞參數的方式?除了
procedure/function AA(const a:typename):........
  這裡的a應該是不能在函數和過程裡面改變
procedure/function AA(var a:typename):..........
  這裡的a在過程和函數裡面可以改變,並且在函數裡面改變值的同時,外面如果優代碼用到a的話,也會受到影響,但是有一點,這裡是傳引用還是傳地址?
procedure/function AA(a:typename):..............
  這裡又是按甚麼傳遞參數?
............................
還有就是Delphi裡面是否還有其他的傳遞參數的方式?