SetLength()用法 |
答題得分者是:wnhoo
|
P.D.
版主 發表:603 回覆:4038 積分:3874 註冊:2006-10-31 發送簡訊給我 |
請問各位:
TForm1.Myfunction(var myAry: array of string; Arycount: integer): boolean; begin .... .... SetLength(myAry,Arycount); 這列compiler出現 Incompatible type end; 如果是下列方式則沒有問題 TForm1.Myfunction(var myAry: array of string; Arycount: integer): boolean; var myAry1: array of String; begin .... .... SetLength(myAry1,Arycount); end;請問, 我要如何讓myAry可以在第一式中動態決定陣列長度? |
Justmade
版主 發表:94 回覆:1934 積分:2030 註冊:2003-03-12 發送簡訊給我 |
參看 Help File 的 "Array parameters" 及 "Open array parameters" 要先 Type 了 它
Type TMyAry = array of string; TForm1.Myfunction(var myAry: TMyAry; Arycount: integer): boolean; begin .... .... SetLength(myAry,Arycount); end;打了半不大肯定,又搜尋了一下,供參考 : http://delphi.ktop.com.tw/topic.php?TOPIC_ID=30503 |
wnhoo
高階會員 發表:75 回覆:443 積分:198 註冊:2003-04-22 發送簡訊給我 |
Justmade 兄的速度就是比我们快,但是已经POST了,就只好算了。 type str=array of string ; implementation {$R *.dfm}
function Myfunction(var myAry:str; Arycount: integer):boolean;
begin
SetLength(myAry,Arycount);
result:=true;
end; 风花雪月 e梦情缘
發表人 - wnhoo 於 2003/05/22 16:15:26 發表人 - wnhoo 於 2003/05/22 16:17:03
------
风花雪月 e梦情缘 |
P.D.
版主 發表:603 回覆:4038 積分:3874 註冊:2006-10-31 發送簡訊給我 |
|
Justmade
版主 發表:94 回覆:1934 積分:2030 註冊:2003-03-12 發送簡訊給我 |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |