DBImage - Bitmap ist ungültig

[uwe12]

Ich habe jetzt bei dem Beispielprogramm mal eine Variable mit dem Namen ,,Bild" deklariert. Aber wenn ich nach dem Ausführen auf den Button drücke, dann kommt immer eine Fehlermeldung. Ich weis auch nicht, ob ich überhaupt eine Variable deklarieren muss. Ich komme einfach nicht weiter.

Delphi-Quellcode:

 
var
  bS : TADOBlobStream;
  Pic : TJpegImage;
  Bild:TBlobfield;

begin
  bS := TADOBlobStream.Create(Bild, bmRead);
  try
    bS.Seek(JpegStartsInBlob(Bild), soFromBeginning);