開放式陣列引數,我學習

2022-09-07 22:30:30 字數 1440 閱讀 7565

keylife富翁筆記

作者:hongyuan

標題:開放式陣列引數,我學習

關鍵字:動態陣列,開放式陣列引數

分類:個人專區

密級:公開

(評分: , 回覆: 0, 閱讀: 603) »»

指定型別,但不確定元素個數的開放式陣列引數

type

arraychar = array char;

procedure test(const args:arraychar);

vari:integer

begin

for i:=low(args) to high(args) do //setlength(args,x)

......

end;

不確定引數型別,不確定元素個數的開放式陣列引數

function test(var args: array of const): string;

vari: integer;

begin

result := '';

for i := 0 to high(args) do

with args[i] do

case vtype of

vtinteger:    result := result + inttostr(vinteger);

vtboolean:    result := result + booltostr(vboolean);

vtchar:       result := result + vchar;

vtextended:   result := result + floattostr(vextended^);

vtstring:     result := result + vstring^;

vtpchar:      result := result + vpchar;

vtobject:     result := result + vobject.classname;

vtclass:      result := result + vclass.classname;

vtansistring: result := result + string(vansistring);

vtcurrency:   result := result + currtostr(vcurrency^);

vtvariant:    result := result + string(vvariant^);

vtint64:      result := result + inttostr(vint64^);

end;

end;

2005-9-15 15:02:08   

開放式式商業模式 開放式交流中的3課

開放式式商業模式 您可能認為您無法從我要說的東西中學到任何東西,因為您是乙個很好的溝通者,對嗎?我的意思是,您在linkedin上的個人資料甚至可能提到您的出色溝通能力。但是,如果那是您在無處不在的移動裝置和社交 之前寫的東西,那麼您可能想重新考慮一下,好的溝通者真正意味著什麼。我們都知道時代已經改...

開放式研究安全課題

專題一 安全協議理論與技術研究 01 01 身份認證和金鑰分配 01 02 不可否認協議 01 03 電子商務協議 01 04 協議的形式化分析與輔助設計技術 專題二 資訊對抗理論與技術研究 02 01 系統安全性評估與系統隱患檢測 02 02 檢測和響應技術 02 03 虛擬專用網 技術 02 0...

開放式Android聯盟成立

除了作業系統和一些開源的元件,android的預設的安裝程式包括一些google的專有的應用程式,像gmail,youtube和googlemap,這些都不是開源的,同樣的,不包括android開放 庫。只要定製的roms不包括閉源的應用程式,google歡迎開發者 定製的android 這個開放式...