昨晚查了好久总算找到了
 VtChart1.WritePictureToFile('F:\XP\程序及练习\评估\Images\DingShuiPing.jpg',2,0);
  DBChart2.SaveToBitmapFile('F:\XP\程序及练习\评估\Images\JingYu.jpg');