توجد امثلة كثيرة في الوندوز xp تنزاح الفورم رويداً رويداً, كيف طريقة برمجتها
كيف نجعل الفورم تظهر وتتلاشى ببطء
جرب الكود
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction); var i:integer; begin AlphaBlend:=true; for i:=255 downto 0 do AlphaBlendValue:=i; end;
أضاعوني وأي فتى أضاعـوا * * * ليـوم كــريهـة وســـداد ثغــــر
وخـــــلونـي ومعتـرك المنايـا * * * وقد شـــرعوا أسنــتهم لنحـري
كأني لم أكــــــن فيهـم وسيطـا * * * ولم تك نســبتي في آل عمــرو
أجرر في الجـــوامع كـل يـوم * * * ألا لله مظــــلمتـي وهـصـــري
عسى الملك المجيب لمن دعاه * * * سينجيني فيعلم كيــف شكـري
فأجـــزي بالكرامـة أهـل ودي * * * وأجزي بالضـغينة أهل ضري
Form1.Hide; AnimateWindow (Form1.Handle,3000, AW_BLEND); // you can also use AW_HOR_POSITIVE, AW_HOR_NEGATIVE, // AW_VER_POSITIVE, or AW_VER_NEGATIVE Form1.Show; Form1.Repaint;
شكرا أخي عروة :rolleyes:
أضاعوني وأي فتى أضاعـوا * * * ليـوم كــريهـة وســـداد ثغــــر
وخـــــلونـي ومعتـرك المنايـا * * * وقد شـــرعوا أسنــتهم لنحـري
كأني لم أكــــــن فيهـم وسيطـا * * * ولم تك نســبتي في آل عمــرو
أجرر في الجـــوامع كـل يـوم * * * ألا لله مظــــلمتـي وهـصـــري
عسى الملك المجيب لمن دعاه * * * سينجيني فيعلم كيــف شكـري
فأجـــزي بالكرامـة أهـل ودي * * * وأجزي بالضـغينة أهل ضري
شكرا جزيلا يا شباب ولكن هل ممكن شرح قليلا
ثم هل يوجد ocx او مشبه ما لاستيراد مخرجات ال3dmax او برناج يدعى quest3d
هذا الموضوع مغلق.