procedure TForm3.ImageEnMView1ImageSelect(Sender: TObject; idx: Integer);
var
  g: TGPGraphics;
  img:TGPBitmap;
  n:Single;
  w, h: UINT;
begin
  n:=0.50;
  bmp:=ImageEnMView1.GetBitmap(ImageEnMView1.SelectedImage);
  g:= TGPGraphics.Create(Image1.Canvas.Handle);
  img:=TGPBitmap.Create;
  img.FromHBITMAP(bmp.Handle,bmp.Palette);
  w  := img.GetWidth;
  h := img.GetHeight;
  g.SetInterpolationMode(InterpolationModeHighQualityBilinear);
  g.DrawImage(img, MakeRect(0, 0, 0.5*w, 0.5*h), 0, 0, w, h, UnitPixel);
  img.Free;
  g.Free;
我觉得是img.FromHBITMAP(bmp.Handle,bmp.Palette);这里有问题,
如果直接换成img:=TGPBitmap.Create('xxx.jpg')的话程序就能正常的显示 ;
请高手帮我看看,是那里错了