Application.CreateForm hängt

[Uwe Raabe]

FireDAC bietet da von Haus aus noch eine andere Möglichkeit: Bei dem ConnectedStoredUsage einfach das auRunTime rausnehmen, dann wird die Connection zur Laufzeit auch nicht aktiviert. (Man kann zusätzlich auch das auDesignTime rausnehmen, dann wird die Connection auch beim nächsten mal in der IDE nicht verbunden.)

Zur Laufzeit kann man das auch pauschal für alle Connections vorgeben, wenn man vor dem Laden des ersten Forms oder Datenmoduls ein FDManager.ActiveStoredUsage := [] einfügt (auDesignTime ist zur Laufzeit eh irrelevant).

Ergänzend müssen dann auch alle verbundenen DataSets (z.B. TFDQuery) das ActiveStoredUsage entsprechend gesetzt haben, da sonst beim Aktivieren des DataSets implizit auch die Connection geöffnet wird. Das lässt sich zur Designzeit relativ einfach über ein Multi-Select einstellen.