掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
どうしてエラーが出るのでしょうか? (ID:13494)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
初めてDelphiでプログラムを作っています。 下記のプログラム(一部)でエラーが出るのですがどうしてでしょうか? 代入できませんといったエラーです。 procedure TForm1.comb_data(); var Fname_out, Fname_backup: String; ii, jj: Integer; Fdata,Logdata: TStringList; data_line, Logdata_line: String; begin data := nil; Logdata := nil; try Fdata := TStringList.Create; Logdata:= TStringList.Create; Fdata.LoadFromFile('Fdata.csv'); Logdata.LoadFromFile('log-out.tmp'); while data.Text[ii] <> '' do begin data_line := Fdata.Text[ii]; while Logdata.Text[jj] <> '' do begin Logdata_line := Logdata.Text[jj]; if Logdata_line[5] = Fdata_line[5] then Fdata.Text[ii] := Logdata.Text[jj]; //<-----ここでエラー jj := jj +1; end; ii := ii + 1; end; finally Fdata.Free; Logdata.Free; end; end;
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.