サーバレス練習帳

着眼大局着手小局

【Delphi】ShowModalの後の処理

Main(Form1)からUnit2(Form2)をusesしています。

procedure TMainForm.Button1Click(Sender: TObject);
begin
  Form2.Left := Self.Left - 50;
  Form2.Top  := Self.Top  + 80;
  Form2.ShowModal;
  FMX.Dialogs.ShowMessage('ShowModalの後の処理!');
end;

この場合、Form2が閉じられるまでShoMessageは出てきません。
さらにいうと、Form2はForm1と一緒に起動時に生成されて、
例えForm2の「×」が押されたとしても、Form1がDestroyされるまで生き続けます。

つまり、Form2で取得したデータは、Form2に格納しておけるわけです。

Form2は、Form2内のボタンか何かから「Close;」だけで閉じる(=非表示にする)ことができます。
Closeにした時点では、まだForm2は生きています。