• ¡Welcome to Square Theme!
  • This news are in header template.
  • Please ignore this message.
مهمان عزیز خوش‌آمدید. ورود عضــویت


امتیاز موضوع:
  • 8 رای - 3.38 میانگین
  • 1
  • 2
  • 3
  • 4
  • 5
Title: Convert the bitmap to Jpeg and
حالت خطی
#1
You can use the next code for conversion of bitmap into jpeg or jpeg into bitmap:
در سورس زیر میتونید تبدیل فرمت jpg به bmp و بر عکس رو مشاهده کنید.
کد پی‌اچ‌پی:
uses Jpeg;

procedure Bmp2Jpeg(const BmpFileNameJpgFileNamestring);
var
  
BmpTBitmap;
  
JpgTJPEGImage;
begin
  Bmp 
:= TBitmap.Create;
  
Jpg := TJPEGImage.Create;
  try
    
Bmp.LoadFromFile(BmpFileName);
    
Jpg.Assign(Bmp);
    
Jpg.SaveToFile(JpgFileName);
  finally
    
Jpg.Free;
    
Bmp.Free;
  
end;
end
کد پی‌اچ‌پی:
procedure Jpeg2Bmp(const BmpFileNameJpgFileNamestring);
var
  
BmpTBitmap;
  
JpgTJPEGImage;
begin
  Bmp 
:= TBitmap.Create;
  
Jpg := TJPEGImage.Create;
  try
    
Jpg.LoadFromFile(JpgFileName);
    
Bmp.Assign(Jpg);
    
Bmp.SaveToFile(BmpFileName);
  finally
    
Jpg.Free;
    
Bmp.Free;
  
end;
end

گروه دور همی پارسی کدرز
https://t.me/joinchat/GxVRww3ykLynHFsdCvb7eg
 
پاسخ
  


پیام‌های این موضوع
Convert the bitmap to Jpeg and - توسط Amin_Mansouri - 05-07-2011، 10:44 PM

موضوعات مشابه ...
موضوع نویسنده پاسخ بازدید آخرین ارسال
  Source Code Bitmap to mpeg Amin_Mansouri 0 3,177 04-25-2011، 12:30 PM
آخرین ارسال: Amin_Mansouri

پرش به انجمن:


Browsing: 1 مهمان