Pascal之（ 引數傳遞）

unit

first;
inte***ce
uses
windows, messages, sysutils, variants, classes, graphics, controls, forms,
dialogs, stdctrls;
type
tform1 = class
(tform)
btn1: tbutton;
edt1: tedit;
edt2: tedit;
procedure
btn1click(sender: tobject);
private
function
formalparameter(x, y: integer): integer;
public
end;
varform1: tform1;
implementation
procedure
tform1.btn1click(sender: tobject);
varx, y: integer;
r: integer;
begin
x := 1
; y := 100
; r:=formalparameter(x, y);
edt1.text:='
x='+inttostr(x);
edt2.text:='
y='+inttostr(y);
messagebox(
0, pchar(inttostr(r)), '
r的值為：
', mb_ok);
end;
function
tform1.formalparameter(x, y: integer): integer;
begin
x := x + 1
; y := y + 2
; result := x +y;
end;
end.

unit unit1;

inte***ce
uses
windows, messages, sysutils, variants, classes, graphics, controls, forms,
dialogs, stdctrls;
type
tform1 = class
(tform)
btn1: tbutton;
edt1: tedit;
edt2: tedit;
procedure btn1click(sender: tobject);
procedure variableparameter(
varx, y: integer);
private
public
end;
varform1: tform1;
implementation
procedure tform1.btn1click(sender: tobject);
varx,y:integer;
begin
x:=100
; y:=100
; variableparameter(x,y);
edt1.text:='
x值為：
'+inttostr(x);
edt2.text:='
y值為：
'+inttostr(y);
end;
procedure tform1.variableparameter(
varx, y: integer);
begin
x:=x+1
; y:=y+1
;end;
end.

function myfunction(const

x, y: integer): integer;
begin
// x := x + 1
; 錯誤語法：不能改變引數的值
//y := y + 1
; result := x *y;
end;

procedure sort(a: array[1..10] of integer);    //不正確 

type tdigits = array[1..10] of
integer;
procedure sort(a: tdigits); //正確
可以使用動態陣列作為函式和過程的引數。
例：procedure clear(var a: array
ofreal);
vari: integer;
begin
for i := 0
to high(a) do a[i] := 0
; 
end;

c 之引數傳遞

通常使用的 按指傳遞 函式內的操作的實際上是輸入引數的乙個副本 即函式建立了乙個臨時變數，其值與輸入引數完全相同 對該副本的操作不會影響輸入引數的值。而 按引用傳遞 可以理解為副本是乙個引用變數，該副本與輸入引數共享儲存區。因此函式內對副本的修改相當於對輸入引數進行修改。當輸入引數是抽象資料型別時，...

Shell之傳遞引數

注 此部落格使用的是bash shell 在執行 shell 指令碼時，可以向指令碼傳遞引數。bin bash echo this is a test code echo input parameter echo file name is 0表示本檔案名字 echo my name is 1 4表示...

c 引數傳遞之引用引數

每乙個想要做到模組化程式設計的碼農都不可避免的乙個問題是引數傳遞 如果您在這裡覺得有疑問，誒，我不想做模組化呢，以筆者經驗這個你大可不必揪心，因為你的老師或者老闆會讓你做到的 以c語言為例，主調函式傳參給被調函式的情況中，87 的情況都是要改變引數的值。這時候有兩種方法做到這個，第一傳指標，一般情況...