Как выключить компьютер по IP-адресу

← →
AndreySoft © (2003-08-29 21:53) [0]

(по сети)

← →
Song © (2003-08-29 22:48) [1]

InitiateSystemShutDown()

← →
AndreySoft © (2003-08-29 23:12) [2]

Я так понял: вводим IP-адрес в Edit нажимаем кнопку BitBtn1
И ты так предлагаешь сделать:
...
procedure TForm1.BitBtn1Click(Sender: TObject); var s:string; begin s:=Edit1.Text; InitiateSystemShutDown(s); end;
...
Так не работает! Потому что у InitiateSystemShutDown в скобках должна находиться переменная, принадлежащая типу PChar

← →
Pat © (2003-08-30 00:23) [3]

Странная у тебя трава. Я в хелпе целых 5 параметров этой функции нашел.

← →
AndreySoft © (2003-08-30 00:29) [4]

>> Pat ©

Ну а пример, можешь дать?

← →
MW Programs (2003-08-30 14:18) [5]

Дурней вы маетесь, разве это возможно?

← →
MW Programs (2003-08-30 14:19) [6]

РЭСЭТ и все!

← →
AndreySoft © (2003-08-30 17:35) [7]

> MW Programs (30.08.03 14:19) [6]
> РЭСЭТ и все!

Как же ты интересно по сетевому кабелю до кнопки Reset дотянешься?

> Я так понял: вводим IP-адрес в Edit нажимаем кнопку BitBtn1
> И ты так предлагаешь сделать:

Я так понял, ты наугад пытаешься программу написать? А такой прикол слышал: когда не знаешь точно, нужно открывать справку и смотреть?

>Дурней вы маетесь, разве это возможно?

The InitiateSystemShutdown function initiates a shutdown and optional restart of the specified computer.

BOOL InitiateSystemShutdown(

LPTSTR lpMachineName, // address of name of computer to shut down
LPTSTR lpMessage, // address of message to display in dialog box
DWORD dwTimeout, // time to display dialog box
BOOL bForceAppsClosed, // force applications with unsaved changes flag
BOOL bRebootAfterShutdown // reboot flag
);

Осталось получить привилегии :)

Как выключить компьютер по IP-адресу Найти похожие ветки