IBDac und Blob

[hanspeter]

Muss das Thema nochmal puschen.

Hat keiner eine Idee woher ein Error -303 internal Error bei IBDac im Zusammenhang mit Blobs kommen kann.
Das eigenartige.

Ich lese aus einer Paradoxdatenbank über BDE und speichere in Firebird.

Delphi-Quellcode:

if Query.Fields[i].isBlob then
begin
  (Query.Fields[i] as TBlobField).SaveToStream(m);
   m.Position := 0;
   if m.Size > 0 then QueryWork.ParamByName(f).LoadFromStream(m, ftBlob);
   m.Clear;
   Continue;
end;

Query ist in diesem Fall ein TDBQuery
dieser Codeteil funktioniert.

Danach will ich zwei IB Tabellen zusammenführen.
Query ist in diesem Fall eine Firebird(IBDac) Query.

Delphi-Quellcode:

if Query.Fields[i].isBlob then
begin
  (Query.Fields[i] as TBlobField).SaveToStream(m);
  m.Position := 0;
  if m.Size > 0 then QueryWork.ParamByName(f).LoadFromStream(m, ftBlob);

  m.Clear;
  Continue;
end;

In diesem Fall kommt Error -303 interner Fehler.
Der einzige Unterschied ist jetzt, das die Quelle IBDAC und nicht die BDE ist.
Wie im ersten Posting erwähnt, habe ich auch eine Reihe anderer Varianten zum
Blobtransfer ausprobiert.
Ohne Erfolg.

Gruß
Peter