MS-Access: "Bilddaten" im Memo-Field?

[Meta777]

huhu,

hab folgendes, drängelndes Problem:
Ich will einen Stream oder ähnliches benutzen um Bilddaten die in einer DB als Memofelder gespeichert sind auszulesen.
die DB ist folgendermaßen organisiert:
ein feld mit fortlaufender ID, dann gibt es ein zweites Integer Feld Namens "CTId" und eben das Memo-Feld "Bilddaten".
Vermutlich wird das zweite Integer Feld zu kennung der zusammengehörigen Memofelder benutzt. Jedenfalls bin ich davon ausgegenagen, und habe auch immer alle MemoFelder wo dieses zweite Feld gleich war als eine datei gespeichert.
Und zwar so:

Delphi-Quellcode:

var
  LCurCTId: Integer;
  LCurFile: TMemoryStream;
  LRecCnt: Integer;
  LCurRecNr: Integer;
  LFileName: String;
  LADOStream: TADOBlobStream;
begin
  LFileName := '';
  LCurCTId := 0;
  LCurRecNr := 1;
  LCurFile := TMemoryStream.Create;
  LRecCnt := ADOQuery1.RecordCount;
//  LCurFile.??? Möglichkeit die "GrowRate" zu erhöhen? 32k Blöcke, orso?
  while not ADOQuery1.Eof do begin
    SetStatusText('Verarbeite '+IntToStr(LCurRecNr)+ ' von '+IntToStr(LRecCnt)+'Datensätzen..', 2);
    LCurCTId := ADOQuery1.FieldByName('CTID').AsInteger;
    LADOStream := ADOQuery1.CreateBlobStream(ADOQuery1.FieldByName('BildDaten'),
      bmRead) as TAdoBlobStream;
    LCurFile.CopyFrom(LADOStream, 0);
    LADOStream.Clear;
    Inc(LCurRecNr);
    ADOQuery1.Next;
    if (ADOQuery1.FieldByName('CTID').AsInteger <> LCurCTId) OR ADOQuery1.Eof then begin
      LFileName := eOutputDir.Text + konPicPraef + IntToStr(LCurCTId) +
        konPicSuff;
      SetStatusText('Speicher Bild unter "'+LFileName+'"', 2);
      LCurFile.SaveToFile(LFileName);
      LCurFile.Clear;
    end;
  end;
end;

Das was dabei raus kommt haut aber nicht hin. Ist nicht lesbar.
Auch ist es komisch das die DB 41,7MB groß ist, alle gespeicherten Dateien zusammen aber nur 305KB!?!

Ich hab auch mit dem ADP DB Explorer die DB geöffnet und dort steht auch "(MEMO)" auls Feldtyp für "Bilddaten".
Ich vermute das evtl. #0 beim auslesen den Stream abscheneidet weil er intern vielleicht als Memo behandelt wird?

Hat einer eine Idee wie ich wirklich alle Daten rausbekomme?

Shalom

[edit=SirThornberry]Titel korrigiert - Mfg, SirThornberry[/edit]