Image soll über einen pointer jpeg anzeigen

[Hyperspacer]

Hallo,
Ich möchte in einem TImage ein jpg (TJpegImage) anzeigen lassen. Das fuinktioniert doch mit folgendem Code, oder?
NewImage.Picture.Assign(jpg); Das Problem ist jetzt, dass ich das jpeg nicht direkt vorliegen habe, sondern als pointer. Und egal wie ich es drehe, ich erhalte am Ende statt des Bildes meine Lieblingsfehlermeldung: Zugriffsverletzung.

Delphi-Quellcode:

Var
  pointer : pJPEG;  // pJPEG = ^TJpegImage; Wird als Funktionsparameter übergeben
  jpg : TJpegImage;
  NewImage : TImage;
begin
  // Image erstellen
  NewImage := TImage.Create(TabBilder);   // TabBilder ist ein TTabSheet in einem PageControl
  NewImage.Parent := TabBilder;

  NewImage.Top := 5;
  NewImage.Left := 5;
              
  NewImage.AutoSize := true;

  // Bild laden
  If pointer <> nil
    then jpg := pointer^;

  // Bild anzeigen  
  NewImage.Picture.Assign(jpg);
end;