掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
ブロックリードを変えるのに最適な方法を教えて下さい。 (ID：150794)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
下のように直してもよろしいでしょうか？？ ③ var I: Integer; FileStream: TFileStream; R: array[1..4] of TR; //6 - 9 //直しました begin FileStream := TFileStream.Create('A.TXT',fmOpenRead); FIleStream.Position := SizeOf(TR) *(6-1); //5;直しました FileStream.Read(R,SizeOf(TR*4)); //直しました FileStream.Free; for I:= Low(R) to High(R) do begin Memo1.Lines.Add(DateTimeToStr(R[I].D1)); Memo1.Lines.Add(IntToStr(R[I].B1)); Memo1.Lines.Add(IntToStr(R[I].I1)); Memo1.Lines.Add(R[I].S1); end;
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.