Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Система";
Текущий архив: 2003.11.13;
Скачать: [xml.tar.bz2];

Вниз

Как выключить компьютер по 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 дотянешься?


 
DrPass   (2003-08-30 18:52) [8]


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

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


 
Pat   (2003-08-30 22:06) [9]

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

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
);


 
Pat   (2003-08-30 22:07) [10]

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



Страницы: 1 вся ветка

Форум: "Система";
Текущий архив: 2003.11.13;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.46 MB
Время: 0.11 c
6-41789
D.Rider
2003-09-13 23:16
2003.11.13
Как узнать включен, ли удалнный компьютер, не пингуя


1-41554
Ev1972
2003-10-27 16:39
2003.11.13
Как распарсить html страничку в Delphi?


14-41949
qwerty2
2003-10-20 13:48
2003.11.13
Штрих-коды


14-41973
Юрий Зотов
2003-10-13 13:35
2003.11.13
По поручению Красной Майки (закрытие сезона).


14-41974
Ёжик
2003-10-17 22:26
2003.11.13
Кто сколько может выпить пива?





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский