Einzelnen Beitrag anzeigen

cylor

Registriert seit: 9. Okt 2008
7 Beiträge
 
#7

Re: ActiveX.Image -> Buffer --> TBitmap

  Alt 9. Okt 2008, 16:14
Aha Cardinal() heisst das Zauberwort. Ich hatte es mit Integer() versucht. Danke!

Mein Code schaut nu so aus:

Delphi-Quellcode:
var pBuffer: Pointer;
begin
   GetMem(pBuffer, ueye_picture_buffer_size);
   uEyeCam1.CopyImage(Cardinal(pBuffer), ueye_picture_buffer_size);
   SetBitmapBits(Image1.Picture.Bitmap.Handle, ueye_picture_buffer_size, @pBuffer);
end;
Kann ich SetBitmapBits an der stelle benutzten? So anscheint nicht, weil das Image bleibt leer. Aber immerhin kommt schon mal keine Zugriffverletzung mehr.
  Mit Zitat antworten Zitat