Вверх ↑
Этот топик читают: Гость
Ответов: 138
Рейтинг: 2
#1: 2017-04-14 14:39:02 ЛС | профиль | цитата
Есть такая программа

Add(MainForm,2953706,371,63)
{
Width=252
Height=104
Visible=1
Caption="Контроль"
}
Add(ChildForm,13929895,245,63)
{
link(onEvent1,3206964:doEvent1,[(282,69)(282,146)])
}
BEGIN_SDK
Add(EditMulti,4871798,21,21)
{
EventCount=1
WorkCount=5
Width=489
Height=382
link(doWork1,15620267:doVisible,[(39,27)(39,97)])
link(doWork2,15620267:doMinimize,[(53,34)(53,83)])
link(doWork3,15620267:doRestore,[(53,41)(53,76)])
link(doWork4,15620267:doSetFocus,[(53,48)(53,104)])
}
Add(MainForm,15620267,84,63)
{
Top=105
Width=225
Height=96
Visible=1
Point(doVisible)
Point(doSetFocus)
link(onCreate,9466966:doEvent1,[(121,83)(121,129)(72,129)(72,160)])
}
Add(Edit,1063000,252,224)
{
Width=105
Text="Ведите пароль"
DataType=1
}
Add(Button,7521956,147,315)
{
Left=120
Width=75
Caption="Отмена"
link(onClick,13989998:doCompare,[])
}
Add(Label,6683204,315,133)
{
Top=25
Width=105
Height=25
}
Add(Random,11551410,182,133)
{
Min=1000
Max=9999
Quality=1
link(onRandom,10043478:doOperation,[])
}
Add(Math,10043478,238,133)
{
Op2=10
link(onResult,6683204:doText,[])
link(Op2,11265731:Random,[])
}
Add(If_else,13989998,231,315)
{
link(onTrue,4871798:onEvent1,[(387,321)(387,27)])
link(Op1,11551410:Random,[(237,240)(188,240)])
link(Op2,1063000:Text,[(244,285)(258,285)])
}
Add(Hub,9466966,84,154)
{
OutCount=3
link(onEvent1,11265731:doRandom,[(172,160)(172,76)])
link(onEvent2,11551410:doRandom,[(136,167)(136,139)])
}
Add(Label,11720567,329,49)
{
Left=120
Top=25
Width=75
Height=25
}
Add(Random,11265731,245,70)
{
Min=1
Max=10
Quality=1
link(onRandom,11720567:doText,[(303,76)(303,55)])
}
END_SDK
Add(ExitWindows,2268645,588,77)
{
Point(doPowerOff)
}
Add(Hub,3206964,287,140)
{
link(onEvent1,16749201:doStop,[(381,146)(381,111)])
link(onEvent2,2953706:doClose,[(336,153)(336,90)])
}
Add(Timer,16749201,462,98)
{
Interval=7200000
AutoStop=1
link(onTimer,2268645:doPowerOff,[])
}
Add(Timer,13107566,105,280)
{
Interval=6000000
AutoStop=1
link(onTimer,9963314:doMessage,[])
}
Add(Timer,9516710,35,140)
{
Interval=6600000
AutoStop=1
link(onTimer,10672183:doEvent1,[])
}
Add(Message,9963314,203,280)
{
Message="У тебя осталось 10 минут\r\nНажми на "Да" что-бы вести пароль"
Type=2
Point(onYES)
Point(onNO)
link(onYES,10672183:doEvent2,[(247,293)(247,223)(170,223)(170,153)])
}
Add(Hub,10672183,182,140)
{
InCount=2
link(onEvent1,13929895:doWork1,[(220,146)(220,69)])
link(onEvent2,11408333:doEvent1,[(208,153)(208,115)(149,115)(149,76)])
}
Add(Hub,11408333,161,70)
{
OutCount=3
link(onEvent1,13929895:doWork2,[])
link(onEvent2,13929895:doWork3,[])
link(onEvent3,13929895:doWork4,[])
}

Которая выключает комп через 2 часа если не вести "шифр" которая прога сама генерирует.
Однако эту программу можно просто закрыть через диспетчер задач
карма: 0
私はアニメが大好き
0
vip
#1.1контекстная реклама от партнеров
Ответов: 2193
Рейтинг: 673
#2: 2017-04-14 15:06:23 ЛС | профиль | цитата
А что на форуме уже открыли кружок юных вирусописателей?
dimosikILA, на этом форуме запрет на помощь в таких вопросах.

Модераторы, удаляйте тему.
карма: 10

0
Ответов: 138
Рейтинг: 2
#3: 2017-04-14 15:09:12 ЛС | профиль | цитата
sla8a писал(а):
А что на форуме уже открыли кружок юных вирусописателей?
dimosikILA, на этом форуме запрет на помощь в таких вопросах.

Модераторы, удаляйте тему.

Да нет же это не вирус
Это прогу я сделал для мелкого (4 класс), а то он наглый стал в последнее время!

--- Добавлено в 2017-04-14 15:22:29

dimosikILA писал(а):
sla8a писал(а):
А что на форуме уже открыли кружок юных вирусописателей?
dimosikILA, на этом форуме запрет на помощь в таких вопросах.

Модераторы, удаляйте тему.

Да нет же это не вирус
Это прогу я сделал для мелкого (4 класс), а то он наглый стал в последнее время! (Ему свой комп купили)


Редактировалось 1 раз(а), последний 2017-04-14 15:22:29
карма: 0
私はアニメが大好き
0
Ответов: 2193
Рейтинг: 673
#4: 2017-04-14 15:33:50 ЛС | профиль | цитата
Есть хорошая программа для таких задач, старая версия конечно, но стабильная: KozhannyjRemen v1.0.
карма: 10

0
Ответов: 138
Рейтинг: 2
#5: 2017-04-14 15:59:27 ЛС | профиль | цитата
sla8a писал(а):
Есть хорошая программа для таких задач, старая версия конечно, но стабильная: KozhannyjRemen v1.0.

Мне маман сама это программу пропишет!
карма: 0
私はアニメが大好き
0
Разработчик
Ответов: 26061
Рейтинг: 2120
#6: 2017-04-14 16:09:55 ЛС | профиль | цитата
А че, штатные режимы винды по ограничению доступа не помогают? "Родительский контроль" вроде называется, ЕМНИП.
карма: 22

0
Ответов: 138
Рейтинг: 2
#7: 2017-04-14 16:34:29 ЛС | профиль | цитата
nesco писал(а):
А че, штатные режимы винды по ограничению доступа не помогают? "Родительский контроль" вроде называется, ЕМНИП.

У него windows XP
карма: 0
私はアニメが大好き
0
Разработчик
Ответов: 26061
Рейтинг: 2120
#8: 2017-04-14 16:43:46 ЛС | профиль | цитата
Можно же попытаться использовать планировщик. Вот тут про это хорошо написано.
https://www.bestfree.ru/article/computer/parental-control.php
карма: 22

0
Ответов: 138
Рейтинг: 2
#9: 2017-04-14 16:49:09 ЛС | профиль | цитата
nesco писал(а):
Можно же попытаться использовать планировщик. Вот тут про это хорошо написано.
https://www.bestfree.ru/article/computer/parental-control.php

В если я захочу отменить выключение компа?
карма: 0
私はアニメが大好き
0
Разработчик
Ответов: 26061
Рейтинг: 2120
#10: 2017-04-14 19:14:22 ЛС | профиль | цитата
dimosikILA писал(а):
В если я захочу отменить выключение компа?

А кто мешает запретить вызов диспетчера задач?
карма: 22

0
Ответов: 2193
Рейтинг: 673
#11: 2017-04-14 20:20:02 ЛС | профиль | цитата
nesco писал(а):
А кто мешает запретить вызов диспетчера задач?
Есть вещь попроще. На личном опыте могу сказать, очень помогает от неопытных пользователей.
Сделать так:

1. Запустить Диспетчер задач.
2. Выбрать вкладку [Быстродействие].
3. В пустой области после вкладок [Приложения, Процессы, Быстродействие, Сеть, Пользователи] сделать двойной клик мышью.
4. Должно получиться так:

5. Сказать что Диспетчер задач урезанный и восстановлению не подлежит.
карма: 10

0
Ответов: 537
Рейтинг: 14
#12: 2017-04-14 21:30:49 ЛС | профиль | цитата
Прото нужно две проги, которые следят друг за другом, а проги называеш как системне процессы с описанием. Если вдруг закрылась одна, то она запускает вторую. Для супер маскеровки можно переименовать прогу и закинуть в другое место. и т.д.

Если это секрет, пускай модераторы удалят это сообщение.

Редактировалось 1 раз(а), последний 2017-04-14 21:31:51
карма: 4

0
Голосовали:sla8a, Vadimluk1
Ответов: 321
Рейтинг: 10
#13: 2017-04-14 22:44:00 ЛС | профиль | цитата
Ага, можно заменить explore.exe на свое творение, при ctrl alt del выключать комп, и главное не забыть указать куда переводить деньги для снятия блокировки компьютера)
карма: 1

0
Ответов: 655
Рейтинг: 18
#14: 2017-04-14 23:10:24 ЛС | профиль | цитата
MS давно утилиту сделал, https://www.microsoft.com/en-us/download/details.aspx?id=23510. С помощью нее права на процесс можно задавать
карма: 0

0
Ответов: 138
Рейтинг: 2
#15: 2017-04-15 09:14:09 ЛС | профиль | цитата
sla8a писал(а):
nesco писал(а):
А кто мешает запретить вызов диспетчера задач?
Есть вещь попроще. На личном опыте могу сказать, очень помогает от неопытных пользователей.
Сделать так:

1. Запустить Диспетчер задач.
2. Выбрать вкладку [Быстродействие].
3. В пустой области после вкладок [Приложения, Процессы, Быстродействие, Сеть, Пользователи] сделать двойной клик мышью.
4. Должно получиться так:

5. Сказать что Диспетчер задач урезанный и восстановлению не подлежит.

Вот то что нужно
Спасибо
карма: 0
私はアニメが大好き
0
Сообщение
...
Прикрепленные файлы
(файлы не залиты)