خاموش کردن ویندوز با دلفی

[Emdad2001]

سلام، اول از همه باید بگم من جیتجو کردم تو این تالار ولی چیزی خوبی پیدا نکردم برای این موضوع
من سیستم رو میخوام خاموش کنم و مجبور کنم که خاموش بشه یعنی Force کنم کدی که من استفاده میکنم نمیشه گفت تو دلفی اتفاق می افته چون دستور CMD هستش حالا مهم نیست که CMD هست مهم اینجاست که نمی تونم متغیر تعریف کنم که زمان را از کاربر سوال کنه ! و اما دستور ...


ShellExecute(Handle,'Open','Shutdown -t 0 -f -s',nil,nil,SW_HIDE);

[ayat255]

سوالت واضح نیست که دقیقا چی می خوای ؟؟؟؟؟

[ayat255]

َاید این بدردت بخوره

WinExec('shutdown.exe -i -s -f -t 10 -c "SHUTDOWN in 10 Seconds"', SW_SHOW);

[Emdad2001]

َاید این بدردت بخوره

WinExec('shutdown.exe -i -s -f -t 10 -c "SHUTDOWN in 10 Seconds"', SW_SHOW);


ممنون از اینکه جواب دادید، ولی چیزی که من میخوام این نیست که من زمان خاموش شدن رو مشخص کنم میخوام کاربر مشخص کنه که چند ساعت دیگه خاموش کنه،
خودم یجورایی دورش زدم مثلا یک تایمر گذاشتم ورودی کاربر را تبدیل میکنم به Timer Interval بعد تایمر رو اجرا میکنم من دنبال یک راه اصولی هستم میخواستم ببینم هست یا نه ؟!!

[بهروز عباسی]

درود به شما
به نظر من برای چنین کارهایی بهتره از API استفاده کنی ؛لینک زیرو ببین.

Shut down / reboot Windows 2000 / XP / NT (http://delphi.about.com/cs/adptips2003/a/bltip0503_5.htm)



موفق باشید.

[Emdad2001]

ممنون آقای عباسی چون بنده تازه کار هستم متوجه کد نشدم روش راحتری نیست یا یک مثال راحتر بیارید چون من فعلا با Timer کار میکنم :(