Neues Fenster öffnen per Button klick?? iOS

[himitsu]

ShowModal funktioniert im iOS nicht?
Wenn ja, dann würde ich das als schwerwiegenden Bug einstufen.

Im Prinzip kommt das ShowModal auf Folgendes hinaus.

Delphi-Quellcode:

Fenster := TMeinEingabeFenster.Create(Self);
try
  // hier könnte man eventuell noch was an das Fenster übergeben - z.B. Fenster.PortEdit.Text := IntToStr(StandardPort);

  // alle anderen Fenster disablen (was hier ja scheinbar nicht nötig wäre, aber es dürfte auch nicht stören)
  Fenster.Show;
  repeat
    Application.ProcessMessages;
  until ApplicationTerminated or (Fenster.ModalResult <> mrNode) or not Fenster.Visible;
  Fenster.Hide;
  // alle anderen Fenster wieder enablen

  if Fenster.ModalResult = mrOK then begin
    x := Fenster.IPEdit.Text;
    y := StrToInt(Fenster.PortEdit.Text);
  end;
finally
  Fenster.Free;
end;