+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : مصادر دلفي مفتوحة تعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=14)
+--- الموضوع : كيف تشغل صورة GIF بدون مكونات (/showthread.php?tid=8641)
كيف تشغل صورة GIF بدون مكونات - Delphi4Us - 24-04-2017
السلام عليكم
الطريقة الاولى تحتاج اولا الى فك الصورة الى اجزاء تم تشغيلها بالتوالي في مؤقت كما بالصورة
![[صورة: 87905cab3b757b1.jpg]](http://www.m5zn.com/newuploads/2017/04/24/jpg//87905cab3b757b1.jpg)
كود :
http://www.m5zn.com/d/?16635525الطريقة الثانية هي تحميل الصورة بشكل طبيعي في المكون Timage
تم كتابة الكود التالي في نموذج التحميل
كود :
( Image1.Picture.Graphic as TGIFImage ).Animate := True;// gets it goin'
( Image1.Picture.Graphic as TGIFImage ).AnimationSpeed:= 500;// adjust your speed
Form2.DoubleBuffered := True;// stops flickeringنسيت ان اخبرك ان عليك اضافة الوحدة
Vcl.Imaging.GIFImg
RE: كيف تشغل صورة GIF بدون مكونات - Delphi4Us - 25-04-2017
![[صورة: 38b23fc341551a0.gif]](http://www.m5zn.com/newuploads/2017/04/25/gif//38b23fc341551a0.gif)
RE: كيف تشغل صورة GIF بدون مكونات - awatef98 - 26-05-2017
جربت الطريقة الثانية لكن لم ينفذ البرنامج لدي رسالة
[dcc32 Error] Unit1.pas(31): E2233 Property 'Animate' inaccessible here
من يشرح لي الخطأكيف أحله؟
RE: كيف تشغل صورة GIF بدون مكونات - Delphi4Us - 26-05-2017
ماهي نسخة دلفي التي تستخدمها
وكيف حملت الصورة في المكون هل بطريقة الكود ام من الخاصية Picture
RE: كيف تشغل صورة GIF بدون مكونات - awatef98 - 12-08-2017
شكرا لرد الصورة حملتها من الخاصية picture .اما النسخة هي ٌRAD STudio XE8
RE: كيف تشغل صورة GIF بدون مكونات - Delphi4Us - 18-08-2017
ممكن ترفع المثال لارأه