جرب تغيير قيمة المتحول EWX_SHUTDOWN
كود :
procedure TForm1.Button1Click(Sender: TObject);
begin
ExitWindowsEx(EWX_SHUTDOWN,0);
end;
:bye1:
وكمان هذه التعليمة .... إذا سمح صاحب الموضوع
winexec('Shutdown -s -t 00',SW_Hide);
بالتوفيق للجميع
شكراً أخي الحويطي وأنا أشكر لك مشاركتك في موضوعي أنت والأخ kachwahed
وأنا وأعوذ بالله من كلمة أنا لا أمتلك العلم الكامل في عالم البرمجة فمنذ 7 سنين وأنا أمارسها ولكني كل يوم أشاهد شيئ جديد ... وما أتمناه هو أن نشاهد مبرمجين محترفين عرب تضاهي برامجهم البرامج الغربية ... وإن كان في علمي
أي مساهمة ولو بسيطة في هذه الناحية فأنا أحمد الله على ذلك ...
والشكر لكم مجدداً وأيضاً لإدارة المنتدى ...
والله الموفق
خي العزيز شكراً للتنبيه على المواضيع ولكني لم أطلع على كل المواضيع الموجودة في المنتدى ... وعلى جيميع الأحوال شكراً للتنبيه...