8
8wy155310
Unregistered / Unconfirmed
GUEST, unregistred user!
请看以下代码:
var
Bmp: TBitmap;
Jpg: TJpegImage;
Rect:TRect;
begin
Bmp:=TBitmap.Create;
Jpg:=TJpegImage.Create;
Bmp.Width:=Width;
Bmp.Height:=Height;
Bmp.Canvas.CopyRect(Bmp.Canvas.ClipRect, self.Canvas, self.ClientRect);
Jpg.Assign(Bmp);
Jpg.SaveToFile('c:/1.jpg');
我成功保存为格式图片,但是分辨率只有72,但是我需求保存为400应该怎么做啊
var
Bmp: TBitmap;
Jpg: TJpegImage;
Rect:TRect;
begin
Bmp:=TBitmap.Create;
Jpg:=TJpegImage.Create;
Bmp.Width:=Width;
Bmp.Height:=Height;
Bmp.Canvas.CopyRect(Bmp.Canvas.ClipRect, self.Canvas, self.ClientRect);
Jpg.Assign(Bmp);
Jpg.SaveToFile('c:/1.jpg');
我成功保存为格式图片,但是分辨率只有72,但是我需求保存为400应该怎么做啊