while の条件はどうすればいいんでしょうか

解決

またABCから 2007-07-09 08:02:14 No: 26964

2年ぶりにプログラムを組んでいるのですが、ほとんど忘れてしまって困っています（もともと、初心者レベルですけれど）。
1行ごとに処理をしたいのですが、whileの条件をどうすればいいのでしょうか？下のnillでは、エラーになりますし...

LoadText.LoadFromFile(OpenDialog1.FileName);
i := 0; Count := 0;

while ( LoadText.Strings[i] <> nil ) do
begin

(TT) 戸田プロダクション 2007-07-09 09:38:27 No: 26965

LoadText が StringList なら Count プロパティが使えます。
While で回さずとも For 〜 To 文で行けますよ。

For TX := 0 to LoadText.Count - 1 do begin
HogeHoge := LoadText[TX];
end;

どうしても While で回したいなら

While TX <= LoadText.Count - 1 do begin
HogeHoge := LoadText[TX];
Add(TX);
end;

てな感じですかね？

またABCから 2007-07-09 15:30:33 No: 26966

(TT) 戸田プロダクションさん、ありがとうございます。
>LoadText が StringList なら Count プロパティが使えます。
>While で回さずとも For 〜 To 文で行けますよ。
Forを使ってうまくいきました。
一歩前進しました。
これからもよろしくお願いしますm(._.)m。

またABCから 2007-07-09 15:33:43 No: 26967

「解決」のチェック忘れてました。
ごめんなさい。