掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
バイナリとストリングについて (ID：13766)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
> ③ReadLnで読込んだテキストファイルの内容をバイナリ配列にセット TStringList で読み込めば自動的に CRLF で区切られますけど。 TStringList の項目 Strings[] は String 型ですから、String 型から byte の配列に読み込むのは、単に Move() するだけです。 procedure TForm1.Button1Click(Sender: TObject); var sl: TStringList; i: Integer; ba: array of byte; begin sl := TStringList.Create; try sl.LoadFromFile('c:\readme.htm'); for i := 0 to sl.Count-1 do begin if sl[i] = '' then continue; SetLength(ba,Length(sl[i])); Move(sl[i][1],ba[0],Length(sl[i])); // // ここで ba を使う // end; finally sl.Free; end; end;
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.