+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : دروس دلفي للمبتدئين (https://delphi4arab.net/forum/forumdisplay.php?fid=13)
+--- الموضوع : كود جعل الصورة من صغيرة الى كبيرة (/showthread.php?tid=1433)
كود جعل الصورة من صغيرة الى كبيرة - k.hossam - 24-12-2009
هذا الكود يجعل الصورة من حجمها الاصلي الى حجم اكبر
مثال :
-اصنع صورة بستخدام الرسام واحفضها باسم 1 ثم اجعلها كبيرة واحفضها مرة اخرى باسم 2 لتصبح لديك صورة عادي واخرى اكبر منه (1و2)
- افتح برنامج الدلفي وضع عنصر(image) ياخذ الاسم (image1) وضع الصورة 1 فيها واكتب في الحدث
ONMouseMove للـ(image1) التعليمة التالية
كود :
if image1.Visible then image2.Visible:=trueكود :
if image1.Visible then image2.Visible:=false;__________________________
------------------------------------
واي استفسار لاتترددو في ان تسالوني فيه