Вопрос по Delphi

[LodSB]

Еще одно дополнение по поводу горячих клавиш, кому интересно - RegisterHotKey/UnregisterHotKey

[UZER]

Можно ли отключить клавиатуру во всей системе?
Нашел вего один пример:program antiklava;
uses Windows; { подключение необходимых модулей }
var
klava:boolean; { объявление логической переменной}
begin
klava:=true; { устанавливаем значение переменной }
while true do { начинаем бесконечный цикл }
begin
Yield; { делаем так, чтобы всё не подвисло :)}
Sleep(2*60*1000); { ничего не делаем 2 минуты }
klava:=not klava; { присваиваем переменной противоположное значение }
EnableHardwareInput(klava); { и в зависимости от переменной,
отключаем или включаем клаву с мышкой}
end;
end. Но на ЕnableHardwareInput Delphi ругается, что такого не существует.
Заранее спасибо за помоСЧь

Исправлено: UZER, 6:29 31-03-2004

[Prisoner]

А так?

procedure BlockInput; external 'user32.dll';

procedure Block;
asm
 push 1;
 call BlockInput;
end;

procedure UnBlock;
asm
 push 0;
 call BlockInput;
end;

[UZER]

Забыл сказать - это должно работать на WinXP.
Prisoner
Пасиб. Сейчас попробую...


Добавлено:

Все работает. Спасибо.

[UZER]

Скажите, является ли TServerSocket и TClientSocket компонентами дельфи, идущими с ней в коплекте? Или их надо скачивать дополнительно...?

[Prisoner]

К сожалению не могу проверить входит ли оные в поставку (седьмая) ибо не стоит... кхм... среда не стоит. В ближайшие пару дней возможно появится...
А поисковики дают такое решение (http://www.delphikingdom.ru/asp/answer.asp?IDAnswer=15493).

[UZER]

Prisoner
Спасибо большое! :oszone:

[AndrejChec]

Как установить выравнивание "по правому краю"?

[JCooper]

AndrejChec выравнивание чего?

[UZER]

Помогите осуществить задачу:
Есть сеть из нескольких компьютеров. Как можно узнать, включен ли (подключен ли к сети) в данный момент нужный компьютер, прежде чем послать ему сообщение?
Заранее спасибо ;)

[Prisoner]

Тут (http://forum.codenet.ru/printthread.php?s=05e72f782d13429af77e8f24aac0529c&threadid=6541) есть совет. Или если хочется разнообразия, то тут (http://www.yandex.ru/yandsearch?text=Delphi+%E2+%F1%E5%F2%E8+%EB%E8+%EA%EE%EC%EF%FC%FE%F2%E5%F0&stype=www) :). Во втором случае придется отсеивать способы определения статуса online локальной машины и удаленной.

[UZER]

Prisoner
:up: сШпасиба!

[UZER]

[color=white]

Исправлено: UZER, 7:26 1-05-2004

[UZER]

При разработке прилооржения возникла проблема:
Программа мешает выключению, т.е. при нажатии пуск-выключить завершаются все процессы кроме моей проги, которая гордо остается на рабочем столе....
Может быть кто-нить сталкивался, помогите решить

Добавлено:

Система - WinXP