掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
動的配列をグローバルに参照するには？ (ID：9064)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
こんな感じですか。微調整してください。 procedure TForm1.Button1Click(Sender: TObject); var fs:TFileStream; i: integer; begin fs := TFileStream.Create('c:\Test.dat',fmOpenRead or fmShareDenyWrite); try fs.Seek(18,soFromBeginning); fs.Read(ItemRec,SizeOf(TItemRec)); fs.Seek(70,soFromCurrent); SetLength(IconRec,ItemRec.n); for i := 0 to ItemRec.n-1 do begin fs.Read(IconRec[i],SizeOf(TIconRec)); fs.Seek(32*IconRec[i].m,soFromCurrent);// 32byte(?) x IconRec[i].m 分前進シーク end; finally fs.Free; end; end;
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.