delphi 怎样将一个PByte类型 拷贝到内存，再将它们分配给bitmap 然后保存成bmp图像?解决方法

delphi 怎样将一个PByte类型 拷贝到内存，再将它们分配给bitmap 然后保存成bmp图像?
delphi 怎样将一个PByte类型 拷贝到内存，再将它们分配给bitmap 然后保存成bmp图像?
const　　　 
　　　 Width = 752;
　　　 Height = 480;

 var ABitmap: TBitmap;
  myBuffer: PByte;

begin
  ABitmap := TBitmap.Create;
  ABitmap.PixelFormat := pf24bit;
  ABitmap.Width := Width;
  ABitmap.Height := Height;

  GetMem(myBuffer, SizeOf(pbyte));
  CopyMemory(myBuffer,ABitmap.ScanLine[Height - 1], Width * Height * 3);//这一句出错 请问该怎样拷贝内存？

  ABitmap.SaveToFile(dlgSave1.FileName);
  ABitmap.Free;

[解决办法]