دلفي تعليم
هل تريد التفاعل مع هذه المساهمة؟ كل ما عليك هو إنشاء حساب جديد ببضع خطوات أو تسجيل الدخول للمتابعة.

اختفاء النافذة تدريجيا نحو الوسط

اذهب الى الأسفل

اختفاء النافذة تدريجيا نحو الوسط Empty اختفاء النافذة تدريجيا نحو الوسط

مُساهمة  ali 14/1/2017, 5:42 pm


اختفاء النافذة تدريجيا نحو الوسط

الكود:

// النافذة تختفي الى الوسط
procedure TForm1.Button1Click(Sender: TObject);
begin
  AnimateWindow(Handle,1300,AW_CENTER or AW_HIDE);
  close;
end;

ali
مبرمج مجتهد

عدد المساهمات : 913
تاريخ التسجيل : 29/07/2013

الرجوع الى أعلى الصفحة اذهب الى الأسفل

الرجوع الى أعلى الصفحة

- مواضيع مماثلة

 
صلاحيات هذا المنتدى:
لاتستطيع الرد على المواضيع في هذا المنتدى