Вверх ↑
Этот топик читают: Гость
Ответов: 6
Рейтинг: 0
#1: 2006-09-03 14:54:36 ЛС | профиль | цитата
Написал простенькую программу для корректного завершения работы в ОС Windows по нажатию горячих клавиш (по умолчанию Ctrl+Alt+X для завершения работы и Ctrl+Alt+S для перезагрузки; поменять сочетание клавиш можно правкой исходного кода). Как добавить код на форум?
карма: 0
Время верстки: %cr_time%Текущее время: %time%
0
Ответов: 3655
Рейтинг: 69
#2: 2006-09-03 15:28:18 ЛС | профиль | цитата
Старый чайник, Программы (исходники )добавляют в RAR- архиве
Раздел Файловый архив - Схемы не забудте дать описание что делает данная прога.
карма: 0

0
Ответов: 376
Рейтинг: 1
#3: 2006-09-04 07:33:46 ЛС | профиль | цитата
Ещё нужно пройти тест на повышение ранга
карма: 1

0
Ответов: 9906
Рейтинг: 351
#4: 2006-09-04 09:54:35 ЛС | профиль | цитата
Ну просто содержимое в тегах code добавляется у любого....
Вроде бы...
карма: 9

0
Ответов: 23
Рейтинг: 0
#5: 2006-09-05 03:32:21 ЛС | профиль | цитата
to Старый чайник: а скриптом не удобнее?

dim OpSysSet
dim Obj

rem 0 = 16 = RELOGIN FORCE
rem 8 = SHUTDOWN
rem 4 = RELOGIN
rem 2 = 6 = REBOOT
rem 1 = 5 = FORCE (hand shutdown)

Set OpSysSet = GetObject("winmgmts:{impersonationLevel=impersonate,(Shutdown)}//./root/cimv2").ExecQuery _
("SELECT * FROM Win32_OperatingSystem WHERE Primary=true")

For Each Obj In OpSysSet
Obj.Win32Shutdown(6)
Next
карма: 0

0
Ответов: 574
Рейтинг: 1
#6: 2006-09-05 15:58:11 ЛС | профиль | цитата
Gluzer, не удобнее. Я вообще языков не знаю, потому пользуюсь HiAsm. Какие тут могут быть скрипты?! Это раз. А два - что значит "так не удобнее"? Старый чайник Вам предоставил к вниманию свой вариант?
карма: 0

0
Гость
Ответов: 17029
Рейтинг: 0
#7: 2006-09-05 20:05:06 правка | ЛС | профиль | цитата


Редактировалось 2 раз(а), последний 2021-05-21 12:38:44
карма: 0

0
Ответов: 6
Рейтинг: 0
#8: 2006-09-05 20:15:43 ЛС | профиль | цитата
А что за тест на повышение уровня? Если по программированию, то, боюсь, я ещё не готов...
карма: 0
Время верстки: %cr_time%Текущее время: %time%
0
Ответов: 1305
Рейтинг: 29
#9: 2006-09-05 20:21:57 ЛС | профиль | цитата
Тест на знание HiAsm
http://hiasm.hexshock.com/test.php

Если вы ответите на 95% вопросов и более, то ваш ранг автоматически поднимется до советника

карма: 0

0
Ответов: 1305
Рейтинг: 29
#10: 2006-09-05 20:36:28 ЛС | профиль | цитата
Мой проект более чем годовалой давности, самой прогой, впрочем, пользуюсь постоянно. Старый чайник, посмотри, может чего пригодится :?

Нестандартные компоненты прилагаются, для работы со схемой нужно скопировать их в папки HiAsmElementsDelphicode и HiAsmElementsDelphiconf соответственно.

PS: компонент FormToCenter уже давно потерял актуальность, центровка формы на экране задается в ее свойствах
карма: 0

0
файлы: 1Tourn_OFF.zip [60.8KB] [418]
Ответов: 574
Рейтинг: 1
#11: 2006-09-05 20:41:57 ЛС | профиль | цитата
Старый чайник, да читайте же вы внимательно!

Galkov писал(а):
Ну просто содержимое в тегах code добавляется у любого....
Вроде бы...


То есть, в разделе схем создайте тему и в тегах "code" напишите схему своей программы!
карма: 0

0
Ответов: 1305
Рейтинг: 29
#12: 2006-09-05 21:07:48 ЛС | профиль | цитата
CASPER писал(а):
То есть, в разделе схем создайте тему и в тегах "code" напишите схему своей программы!

А это какой раздел, интересно, не Схемы ли
карма: 0

0
Гость
Ответов: 17029
Рейтинг: 0
#13: 2006-09-05 22:21:15 правка | ЛС | профиль | цитата


Редактировалось 2 раз(а), последний 2021-05-21 12:38:44
карма: 0

0
Ответов: 655
Рейтинг: 0
#14: 2006-09-05 22:25:23 ЛС | профиль | цитата
http://hiasm.hexshock.com/test.php

Если вы ответите на 95% вопросов и более, то ваш ранг автоматически поднимется до советника

раз 30 отвечал , не получилось.... это вобще работает??? или я отупел
карма: 0

0
Ответов: 9906
Рейтинг: 351
#15: 2006-09-05 22:31:42 ЛС | профиль | цитата
Работает.
Я специально проверял с "новичка"
Под своим логином не рискнул - вдруг ПОНИЗЯТ до Советника, доказывай потом, что ты не верблюд
карма: 9

0
Сообщение
...
Прикрепленные файлы
(файлы не залиты)