Вверх ↑
Этот топик читают: Гость
Ответов: 345
Рейтинг: 1
#1: 2016-03-28 21:38:13 ЛС | профиль | цитата
Сталкнулся с проблемой отрывания ребенка от пк, решил сделать стимулирование за выполненые задачи на пк, на данный момент это написание слов по заданию, но сталкнулся с тем что малой начал быстро осваивать алфавит на пк и сидит за ним дольше.
в планах
контроль времени игры или ютуба после выполнения задания
контроль времени перерыва
автоматическая смена заданий
На данный момент есть проблема как вырубить игру или приложение после некоторого времени.
раньше что то было типо таск килл
но в примерах чет найти не могу, помогите решить проблему с решением кила процесса.
------------ Дoбавленo в 21.38:
вот
Add(MainForm,2953706,21,105)
{
Width=988
Height=573
link(onCreate,3363135:doEvent1,[(139,125)(139,146)])
}
Add(ChildPanel,13315028,294,196)
{
link(onEvent1,4601564:doWork1,[(338,202)(338,248)(282,248)(282,293)])
link(onEvent2,2953706:doClose,[(338,209)(338,171)(9,171)(9,132)])
link(Data1,4601564:Var1,[(300,184)(288,184)(288,331)(300,331)])
}
BEGIN_SDK
Add(EditMulti,9018699,21,21)
{
EventCount=2
WorkCount=3
DataCount=1
Width=608
Height=508
link(doWork1,3697860:doBringToFront,[(28,27)(28,118)])
link(doWork2,9303696:doText,[(157,34)(157,181)])
}
Add(Panel,3697860,35,105)
{
Left=35
Top=105
Width=799
Height=426
Align=5
Point(doBringToFront)
}
Add(Label,9303696,294,175)
{
Left=290
Top=95
Width=199
Height=50
Font=[MS Sans Serif,30,0,0,1]
Caption="Папа Вася"
}
Add(Edit,5678345,385,175)
{
Left=285
Top=200
Width=200
Text=""
}
Add(BitBtn,13260491,217,399)
{
Left=285
Top=250
Width=200
Height=60
Caption="пуск"
link(onClick,11390602:doCompare,[(293,405)(293,293)])
}
Add(If_else,11390602,336,287)
{
link(onTrue,6047335:doEvent1,[(390,293)(390,279)])
link(Op1,9303696:Caption,[(342,247)(300,247)])
link(Op2,5678345:Text,[(349,247)(391,247)])
}
Add(WinExec,5894151,476,385)
{
link(FileName,9018699:Data1,[(482,203)(27,203)])
}
Add(BitBtn,15314623,525,469)
{
Left=1100
Top=625
Width=20
Caption="."
link(onClick,9018699:onEvent1,[(593,475)(593,27)])
}
Add(Hub,6047335,413,273)
{
link(onEvent1,12370298:doSleepMks,[(465,279)(465,307)])
link(onEvent2,5894151:doExec,[(451,286)(451,391)])
}
Add(Sleep,12370298,504,301)
{
Delay=100
link(onSleep,9018699:onEvent2,[(582,307)(582,34)])
}
END_SDK
Add(ChildPanel,4601564,294,287)
{
link(onEvent1,13315028:doWork2,[(338,293)(338,251)(282,251)(282,209)])
link(onEvent2,13315028:doWork3,[(338,300)(338,258)(282,258)(282,216)])
link(onEvent3,3363135:doEvent2,[(338,307)(338,230)(212,230)(212,153)])
}
BEGIN_SDK
Add(EditMulti,11874216,21,21)
{
EventCount=3
WorkCount=3
VarCount=1
link(doWork1,572768:doBringToFront,[(28,27)(28,118)])
link(doWork3,15105184:doEvent1,[(49,41)(49,139)])
link(Var1,9342274:Value,[(27,209)(171,209)(171,485)(244,485)])
}
Add(Panel,572768,35,105)
{
Left=35
Top=105
Width=832
Height=592
Align=5
Point(doBringToFront)
}
Add(Edit,2358324,196,63)
{
Left=50
Top=35
Width=260
link(onChange,13149928:doWrite,[(241,69)(241,102)])
}
Add(Button,3487665,196,133)
{
Left=410
Top=40
Caption="записать"
link(onClick,11537950:doEvent2,[(237,139)(237,118)])
}
Add(Edit,9000023,98,455)
{
Left=50
Top=105
Width=260
link(onChange,4952295:doWrite,[(157,461)(157,466)])
}
Add(Button,2782104,126,385)
{
Left=410
Top=105
Caption="записать"
link(onClick,10547187:doEvent2,[(201,391)(201,405)])
}
Add(Ini,4952295,184,453)
{
FileName="test1.ini"
Section="params"
Key="p2"
Type=1
link(onResult,9342274:doValue,[(227,459)(227,454)])
link(Key,266505:Text,[(204,435)(202,435)])
}
Add(Hub,10547187,175,392)
{
InCount=3
link(onEvent2,4952295:doRead,[(179,405)(179,459)])
}
Add(Hub,11537950,217,105)
{
InCount=2
link(onEvent2,13149928:doRead,[(243,118)(243,95)])
}
Add(Ini,13149928,254,89)
{
FileName="test1.ini"
Section="params"
Key="p1"
Type=1
link(onResult,14594852:doValue,[(325,95)(325,97)])
}
Add(Hub,15105184,77,133)
{
InCount=2
link(onEvent1,11537950:doEvent1,[(154,139)(154,111)])
link(onEvent2,10547187:doEvent1,[(168,146)(168,398)])
}
Add(Button,1243658,231,182)
{
Left=50
Top=180
Width=410
Height=80
Caption="на главную"
link(onClick,14748159:doEvent1,[(268,188)(268,160)])
}
Add(Hub,14748159,273,154)
{
InCount=2
OutCount=3
link(onEvent1,10547187:doEvent3,[(299,160)(299,223)(170,223)(170,412)])
link(onEvent2,15105184:doEvent2,[(299,167)(299,157)(65,157)(65,146)])
link(onEvent3,11874216:onEvent3,[(304,174)(304,41)])
}
Add(Memory,9342274,238,448)
{
link(onData,11874216:onEvent2,[(366,454)(366,177)(309,177)(309,34)])
}
Add(Memory,14594852,315,91)
{
link(onData,11874216:onEvent1,[(359,97)(359,62)(309,62)(309,27)])
}
Add(Label,4946291,98,420)
{
Left=55
Top=85
Width=97
Height=17
Caption="Путь к программе"
}
Add(Label,13982227,42,420)
{
Left=330
Top=85
Width=70
Height=17
Caption="номер ключа"
}
Add(Edit,266505,196,406)
{
Left=340
Top=105
Hint="пример ключа P1 соответствует колличеству копий программы"
Text=""
}
Add(Label,3774201,49,7)
{
Left=55
Top=15
Width=79
Height=17
Caption="кодовое слово"
}
Add(Label,4162654,331,24)
{
Left=325
Top=15
Width=70
Height=17
Caption="номер ключа"
}
Add(Edit,16352734,485,10)
{
Left=335
Top=35
Hint="пример ключа P1 соответствует колличеству копий программы"
Text=""
}
END_SDK
Add(Hub,3363135,224,140)
{
InCount=2
OutCount=3
link(onEvent2,13315028:doWork1,[(266,153)(266,202)])
link(onEvent3,4601564:doWork3,[(266,160)(266,307)])
}


карма: 0

0
vip
#1.1контекстная реклама от партнеров
Ответов: 39
Рейтинг: 2
#2: 2016-03-28 22:19:24 ЛС | профиль | цитата
DRON, плохо искали elements\delphi\Example\System\ProfMan.sha
карма: 1

1
Голосовали:DRON
Ответов: 345
Рейтинг: 1
#3: 2016-03-29 00:56:15 ЛС | профиль | цитата
RAWY писал(а):
elements\delphi\Example\System\ProfMan.sha

благодарю
карма: 0

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