Firebird u. IBDAC Daten rückschreiben

[hanspeter]

Hallo,

ich realisiere den Import/Export einzelner Datensätze (mit Blobs) über nachfolgendes Programm:
(Die Query ist eine TIBCQuery von IBDAC und ist intern ein Nachkomme von TMemoryDataset.

Delphi-Quellcode:

Query.SQL.Text := 'Select * FROM Daten Where ID=123';
Query.Prepare;
Query.Open;
(Query as TMemdataSet).SavetoXML('ExportDaten.XML');
Query.Close;

Die XML Datei kann ich mit (Query as TMemoryDataset).LoadFromXML wieder in den Speicher holen.
Um diese Daten in die Datenbank zurückzuschreiben, scanne ich TFields und generiere eine Insert oder
Updateanweisung auf einer 2. Query.

Ich überlege jetzt ob es eine Möglichkeit gibt, die Daten direkt aus der mit LoadfromXML gefüllten
Query wieder in die Datenbank zu bringen.
Hat wer da eine Idee?

Mit Gruß
Peter