全國最多中醫師線上諮詢網站-台灣中醫網
發文 回覆 瀏覽次數:997
推到 Plurk!
推到 Facebook!

如何更改數組的定義

答題得分者是:g710912
zxy666666
中階會員


發表:108
回覆:150
積分:86
註冊:2005-01-14

發送簡訊給我
#1 引用回覆 回覆 發表時間:2008-04-11 10:27:36 IP:219.130.xxx.xxx 未訂閱
大家好!

我目前Form2


Const Num = 10 ;
Type
TB = array[0..Num] of Word;
...
為變數,的資料.那我改成
Var Num :Integer ;
Type
TB = array[0..Num] of Word;
...可是這樣編譯出錯,
另外說明.的單元裏,視窗設定Num.
編輯記錄
zxy666666 重新編輯於 2008-04-11 10:29:09, 註解 無‧
g710912
一般會員


發表:1
回覆:6
積分:21
註冊:2007-01-15

發送簡訊給我
#2 引用回覆 回覆 發表時間:2008-04-11 10:58:50 IP:220.135.xxx.xxx 未訂閱
你需要的是動態陣列?

[code delphi]


type
TA: array of signle;
TN: array of Word;
type
TForm1 = class(TForm)
private
FA: TA;
FB: TB;
public
procedure BuildArray(Num: integer);

procedure TForm1.BuildArray(Num: integr);
begin
setlength(FA, Num);
setlength(FB, Num);
end;
[/code]

===================引 用 zxy666666 文 章===================
大家好!

我目前Form2


Const Num = 10 ;
Type
TB = array[0..Num] of Word;
...
為變數,的資料.那我改成
Var Num :Integer ;
Type
TB = array[0..Num] of Word;
...可是這樣編譯出錯,
另外說明.的單元裏,視窗設定Num.
編輯記錄
g710912 重新編輯於 2008-04-11 10:59:50, 註解 無‧
g710912 重新編輯於 2008-04-11 10:59:52, 註解 無‧
g710912 重新編輯於 2008-04-11 11:01:27, 註解 無‧
zxy666666
中階會員


發表:108
回覆:150
積分:86
註冊:2005-01-14

發送簡訊給我
#3 引用回覆 回覆 發表時間:2008-04-11 11:56:57 IP:219.130.xxx.xxx 未訂閱
g710912,您好!非常感謝你的回覆!
是的,你所提供的答案正是我需要的,非常感謝!
系統時間:2024-05-06 14:30:16
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!