FireDac Callback

[Union]

Bei FireDac gibt es ja den ADGUIxAsyncExecDialog. Leider ist der nicht Callback-Fähig. Ich möchte aber dem Benutzer mitteilen wie weit die Query ist, z.b. über eine Progressbar. Die meisten Datenbanken haben ja so einen Callback-Mechanismus. Kann man den irgendwie sauber mit FD verknüpfen? Der genannte Dialog verwendet ja nur den Abort-Callback aber nicht den Progress-Callback. So ist nur ein Abbruch möglich aber keine Abschätzung bzw. Anzeige der Restdauer.