こんにちは。
> 無限ループをESCキーで強制的に抜けるんじゃなくて、
> キー入力をスクリプトで検出して抜けたいんですが、
> 何か良い方法はないでしょうか。
GetPos()を呼ぶと、GetPos()の内部で待機状態(無限ループ)に入ります。
と言う事は、GetPos()の仕様(ESCキーでの終了)変更をしない限り不可能なんです。
やるとすれば、MsgBox()にて毎回問い合わせをするかです。
Message('取得する座標を入力して下さい。');
While GetPos(X, Y) = True Do
Begin
Writeln(FloatToStr(X)+','+FloatToStr(Y));
if MsgBox('続けますか?')<>true then Exit; // 追加
End;