[4erep_88]

Сообщение от НичеНепониаю

Про управление компьютером там нет. (по дисководы, перезагрузку и т.п.)

А я говорю, что все это есть.

Dimanus, не обязательно писать сложную процедуру. За нас уже многое Microsoft написала. Главное - правильно запустить

Код:

var windir:array[0..255]of char;
begin
GetWindowsDirectory(windir,255);
ShellExecute(Application.Handle,PChar('open'),PChar(windir+'\system32\shutdown.exe'),PChar('-r -t 0 -f'),nil,sw_hide);