why you dont try
Delphi-Quellcode:
i:=0;
repeat
inputbox('Enter Number', ''Enter field values '+IntToStr(i)', '') // here i changed
P[i]:=%MyInput%; //Edit1.text;
i:=i+1;
until i=10;
?
The code waits while the Inputbox is diplayed.
Or don`t I understand the question?