掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
SetLengthの位置 (ID:37688)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
わかりにくい表現ですいません。 書き直します。 Var T1 : Array of Integer; T2 : Array of Integer; T3 : Array of Integer; T4 : Array of Integer; begin CountNo :=100; SetLength(T1,CountNo); SetLength(T2,CountNo); SetLength(T3,CountNo); SetLength(T4,○○);←ここに入れた場合は問題ありません。 ※○○はなんでもよい for i:= 0 to CountNo-1 do begin T1[i] := Hoge[i]; T2[i] := Hoge2[i]; T3[i] := Hoge3[i]; end; AllCount := T1Max * T2Max; //T1のMax値とT2のMax値をかけてT4の配列数 SetLength(T4,AllCount ); ←ここにいれるとだめです。 T4のSetLengthを上記のように場所を変えるとだめになります。 問題はそこだけです。 さきほどFor文の中はわかりづらい表現でした。 申し訳ありません。
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.