+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : كيف استفيد من هذا الكود \تحويل الصورة من bmp إلى jpg (/showthread.php?tid=5101)
كيف استفيد من هذا الكود \تحويل الصورة من bmp إلى jpg - عبد الهادي - 02-04-2013
تحويل الصورة من BMP إلى JPG :
أضف الوحدة JPEG :
uses JPEG
ثم ضع هذا الكود في المكان المناسب
كود :
var jpg:TJPEGImage;
begin
jpg:=TJPEGImage.Create;
with jpg do begin
Assign(Image1.Picture.Bitmap);
SaveToFile('my jpeg.jpg');
end;
end;كيف استفيد من هذا الكود \تحويل الصورة من bmp إلى jpg - King SofT - 02-04-2013
السلام عليكم
عدل كما في الكود :
كود :
SaveToFile('c:\my jpeg.jpg');تستطيع تغيير المسار كما شئت