Uses Clipbrd,Jpeg;
-----------------
var Jpeg:TJpedImage;
-----------------  
if SavePictureDialog.Execute then
  Begin
    Jpeg:=TJpegImage.Create;
    Try
      ClipBoard.Clear;
      DbChart.CopyToClipboardBitmap;
      if Clipboard.HasFormat(CF_BITMAP) then
      Begin
       Jpeg.LoadFromClipboardFormat(CF_BITMAP,ClipBoard.GetAsHandle(CF_BITMAP),256);
       Jpeg.SaveToFile(SavePictureDialog.FileName);
      end;
    Finally
      Jpeg.Free;
    end;  end; 
------------------但是系统出错,好想是内存地址类的错误-----请问上面代码哪儿有错误?