読み込みファイルがなければ終了するには？

解決

源 2004-06-06 11:05:33 No: 9320 IP: 192.*.*.*

初心者の源ともうします。
『xxx.txt』ファイルの４行目を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』ファイルの４行目をEdit1に表示しました。
IF文で書き込むと思うのですがどのようにしたらよいのかわかりません。
知恵をかしてください。

編集削除

通りすがり 2004-06-06 11:24:39 No: 9321 IP: 192.*.*.*

// ファイルが無いとき
if not FileExists(fn) then

編集削除

源 2004-06-06 12:17:37 No: 9322 IP: 192.*.*.*

通りすがりさん
有難う御座いました。
解決しました。

編集削除