ฟังก์ชั่นหลัก:
1 สร้างภาพขนาดย่อสำหรับภาพที่ระบุ
รูปขนาดย่อของรูปภาพทั้งหมด 2 รุ่นในไดเรกทอรีที่แน่นอน
3 ให้โหมดนิยามขนาดขนาดย่อ 5 โหมด
4 ปัจจุบันรองรับรูปแบบ. jpg เท่านั้น
ดาวน์โหลดเวอร์ชันเบต้า: http://bjfile.focus.cn/file/15483/728_mjpg.rar
รหัสหลัก:
// บันทึกภาพขนาดย่อของ JPEG
ขั้นตอนการบันทึก (SourceFilename, descfilename: String);
const
MaxWidth = 200;
maxhigth = 200;
วาจา
JPG: tjpegimage;
BMP: TBITMAP;
SourceJPG: tjpegimage;
ความกว้าง, ความสูง, tmpint: จำนวนเต็ม;
เริ่ม
พยายาม
bmp: = tbitmap.create;
sourcejpg: = tjpegimage.create;
jpg: = tjpegimage.create;
// อ่านไฟล์ต้นฉบับ
sourcejpg.loadfromfile (SourceFilename);
// คำนวณอัตราส่วนการลดลง
ถ้า sourcejpg.width> = sourcejpg.height แล้ว
TMPINT: = Round (SourceJpg.Width Div MaxWidth)
อื่น
TMPINT: = Round (sourcejpg.height div maxhigth);
ความกว้าง: = sourcejpg.width div tmpint;
ความสูง: = sourcejpg.height div tmpint;
//หด
bmp.width: = ความกว้าง;
bmp.height: = ความสูง;
bmp.pixelformat: = pf24bit;
bmp.canvas.stretchDraw (rect (0,0, ความกว้าง, ความสูง), sourcejpg);
//บันทึก
JPG.ASSIGN (BMP);
jpg.savetofile (descfilename);
ในที่สุด
bmp.free;
jpg.free;
sourcejpg.free;
จบ;
จบ;