掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
読み込みファイルがなければ終了するには? (ID:9320)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
初心者の源ともうします。 『xxx.txt』ファイルの4行目をEdit1に表示したいのですが、 もし『xxx.txt』がなければ、終了したいのですが var fn:string; FileList:TStringList; begin FileList := TStringList.Create; try fn:='c:\windows\xxx.txt'; FileList.LoadFromFile(fn); Edit1.Text:=FileList[3]; finally FileList.Free; end; end; 『xxx.txt』ファイルの4行目をEdit1に表示しました。 IF文で書き込むと思うのですがどのようにしたらよいのかわかりません。 知恵をかしてください。
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.