Z zhoumaomao98 Unregistered / Unconfirmed GUEST, unregistred user! 2006-04-07 #1 此问题要求不能调用任何库函数(请高手出招)
B babibean Unregistered / Unconfirmed GUEST, unregistred user! 2006-04-07 #2 if (ExtName = '.JPG') or (ExtName = '.JPEG') then begin Jpg := TJPEGImage.Create; Bmp := TBitmap.Create; try Jpg.LoadFromFile(lOpenPicDlg.FileName); Bmp.Assign(Jpg); imgP.Picture.Bitmap.Assign(Bmp); finally Bmp.Free; Jpg.Free; end; end;
if (ExtName = '.JPG') or (ExtName = '.JPEG') then begin Jpg := TJPEGImage.Create; Bmp := TBitmap.Create; try Jpg.LoadFromFile(lOpenPicDlg.FileName); Bmp.Assign(Jpg); imgP.Picture.Bitmap.Assign(Bmp); finally Bmp.Free; Jpg.Free; end; end;
M milktang Unregistered / Unconfirmed GUEST, unregistred user! 2006-04-07 #4 procedure BMPToJPegDemo; var JPeg: TJPegImage; Bmp: TBitmap; begin Bmp := TBitmap.Create; Bmp.LoadFromFile('chemical.bmp'); JPeg := TJPegimage.Create; JPeg.Assign(Bmp); JPeg.SaveToFile('chemical.jpg'); JPeg.Free; Bmp.Free; end; 需要引用jpeg单元
procedure BMPToJPegDemo; var JPeg: TJPegImage; Bmp: TBitmap; begin Bmp := TBitmap.Create; Bmp.LoadFromFile('chemical.bmp'); JPeg := TJPegimage.Create; JPeg.Assign(Bmp); JPeg.SaveToFile('chemical.jpg'); JPeg.Free; Bmp.Free; end; 需要引用jpeg单元
Z zhoumaomao98 Unregistered / Unconfirmed GUEST, unregistred user! 2006-04-07 #5 此算法要嵌入到硬件中,从摄像头拍摄一幅照片(输入),然后是预处理,再进行压缩,输出
Z zhoumaomao98 Unregistered / Unconfirmed GUEST, unregistred user! 2006-04-10 #6 新手上路(如何将bmp格式图像转换为jpg格式图像)
Z zhoumaomao98 Unregistered / Unconfirmed GUEST, unregistred user! 2006-04-13 #7 还有没有高手呀,快快出主意呀!!!!!!!!!!!!
如 如风 Unregistered / Unconfirmed GUEST, unregistred user! 2006-04-28 #9 这个比较麻烦,需要了解,图像格式啊。 竟然有人用dephi来回答,晕,不是讨论VC++嘛?