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;