Как организовать цикл ?

[Sibedir]

чтобы программа в цикле останавливалась, например, после открытия формы (окна), чтобы я мог в этом окне выполнять нужные мне действия

Если программа остановится, то вы в ней ни чего сделать уже не сможите.
А то, что описываете вы, больше похоже на Вызов диалога в цикле.zip.
Но я не совсем уверен, что это то, что вам нужно. Ибо вы не поняли смысл саги о X, Y и Z и упорно продолжаете настаивать на том, что вам нужно Y, а про X мы тут сами не догадаемся.

[ArtGrek]

вот попробуите
если я верно понял

Form1

var
  Form1: TForm1;
  A:array of array of real;
  i, j: integer;
  Nextor: Boolean = False;

implementation

uses Unit2;

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
var
  n, m: integer;
begin
  n := StrToInt(Edit1.Text);
  m := StrToInt(Edit2.Text);
  SetLength(a,n,m);
  for i := 1 to n do
    for j := 1 to m do
    begin
      if not((i=n) and (j=m)) then Hide;
      Nextor := False;
      Form2.Show;
      repeat
        Application.ProcessMessages;
      until Nextor
    end;
end;

end.

Form2

var
  Form2: TForm2;

implementation

uses Unit1;

{$R *.dfm}

procedure TForm2.Button1Click(Sender: TObject);
begin
  A[i - 1,j - 1] := StrToInt(Edit1.Text);
  Form2.Close;
  Nextor := True;
  Form1.Show;
end;

end.

Согласен с Sibedir ето все можно и с однои формои реализовать,
вместо формы можно зделат появление других компонент на етои же форме