[NonVCL] Showmodal - Ersatz?

[EDatabaseError]

Also ich würd mal sagen basteln im Pseudocode geht so

Aufruf Showmodal(Form2) (sender ist form1)

Delphi-Quellcode:

 sender.enabled := false;
 form2.show;

 if form2 = wieder weg then sender.enabled := true;