14-09-2015, 10:00 AM
السلام عليكم
uses
على فورم البرنامج(واجهة البرنامج) اضف الكود التالي
شاهد المرفق
uses
كود :
winInetعلى فورم البرنامج(واجهة البرنامج) اضف الكود التالي
كود :
if (InternetGetConnectedstate(nil,0))= true then
شغل البرنامج else
application.terminateشاهد المرفق
الفاشلون نوعان : الأول : فكر ولم يفعل .. والآخر: فعل ولم يفكر