Suche Software 1 Stunde Lernsoftware dann Uneingeschränkt

Hier kann alles mögliche diskutiert werden. Themen zu Purebasic sind hier erwünscht.
Flames und Spam kommen ungefragt in den Mülleimer.
Benutzeravatar
zigapeda
Beiträge: 1753
Registriert: 06.03.2005 17:22
Wohnort: Kaufbeuren
Kontaktdaten:

Suche Software 1 Stunde Lernsoftware dann Uneingeschränkt

Beitrag von zigapeda »

Moin,

ich suche eine Software, die den Computer sperrt, bis ein bestimmtes
Programm eine gewisse Zeit gelaufen ist.
Anwendung: Mein kleiner Bruder soll erst eine Stunde lang an seinem
PC mit einer Lernsoftware arbeiten bevor er für den restlichen Tag
uneingeschränkte Nutzung bekommt, sprich Internet, Spiele, etc.
Wollte fragen ob jemand eine Software kennt die genau das macht,
bevor ich Anfang so etwas selber zu coden, weil ich bin in letzter zeit
in PB doch ziemlich eingerostet -.-

MfG zigapeda
kluger Mann + kluge Frau = Romanze | dummer Mann + dumme Frau = Schwangerschaft
kluger Mann + dumme Frau = Affäre | dummer Mann + kluge Frau = Shopping <)
Benutzeravatar
X360 Andy
Beiträge: 1206
Registriert: 11.05.2008 00:22
Wohnort: Bodensee
Kontaktdaten:

Beitrag von X360 Andy »

Selber schreiben dürfte gar nicht so schwer sein.

http://forums.purebasic.com/english/vie ... ight=kiosk


Nach einer Stunde dann einfach beenden....
Rokur
Beiträge: 167
Registriert: 29.12.2005 09:58
Computerausstattung: Intel Core2 Quad (4x2,4 GHz), 4096 MB RAM, GForce 8800GTX 786 MB
Windows XP 32 Bit, PureBasic 4.40 (x86)

Beitrag von Rokur »

Hör auf deinen Bruder zu terrorisieren. :lol:

onTopic: Denk aber drann im Sperrprogramm auch regelmäßig Tastatur und Maus abzufragen, und bei Inaktivität den Timer zu stoppen, sonst könnte man die Zeit auch einfach absitzen, ohne was zu machen. :wink:
WinXP 32 Bit, PureBasic 4.40 (x86)
Benutzeravatar
rolaf
Beiträge: 3843
Registriert: 10.03.2005 14:01

Beitrag von rolaf »

Rokur hat geschrieben:Hör auf deinen Bruder zu terrorisieren. :lol:

onTopic: Denk aber drann im Sperrprogramm auch regelmäßig Tastatur und Maus abzufragen, und bei Inaktivität den Timer zu stoppen, sonst könnte man die Zeit auch einfach absitzen, ohne was zu machen. :wink:
Geht auch so, Gitter um die Tastatur und den Hamster drauf rumtippeln lassen. :mrgreen:

Die großen Brüder wieder, selber ham se früher gezockt bis die Möhre raucht
und die Kleinen sollen jetzt diszipliniert werden. :lol:
:::: WIN 10 :: PB 5.73 :: (x64) ::::
Benutzeravatar
Xaby
Beiträge: 2144
Registriert: 12.11.2005 11:29
Wohnort: Berlin + Zehdenick
Kontaktdaten:

Beitrag von Xaby »

HorstBox kannste den MAC-Filter auch über Kabelverbindung so
einstellen, dass Internet erst zu einer bestimmten Zeit geht.

Und auch nur wieder ne bestimmte Zeit.

Vielleicht kann das dein Router auch.

Wenn dem Kind langweilig ist, wird es automatisch ja die Lernsoftware
nutzen :)
Kinder an die Macht http://scratch.mit.edu/
Benutzeravatar
X360 Andy
Beiträge: 1206
Registriert: 11.05.2008 00:22
Wohnort: Bodensee
Kontaktdaten:

Beitrag von X360 Andy »

Xaby hat geschrieben: Wenn dem Kind langweilig ist, wird es automatisch ja die Lernsoftware
nutzen :)
Und morgen gibts ne Meldung das der Finanzminister + und - verwechselt hat. <)

Welches "normale" Kind möchte freiwillig 1Stunde lernen, wenn es neben sich 10 Super Coole Multimedia Geräte hat ?

Ich nicht!(kommt halt darauf an was es zu lernen gibt..)
Benutzeravatar
zigapeda
Beiträge: 1753
Registriert: 06.03.2005 17:22
Wohnort: Kaufbeuren
Kontaktdaten:

Beitrag von zigapeda »

Ich hab mir den Code mal angeschaut, der ist super, bloß ich komm
damit nicht viel weiter.

Code: Alles auswählen

[..........]
If OpenWindow(1, 216, 0, 255, 165, "Test",  #PB_Window_SystemMenu | #PB_Window_SizeGadget | #PB_Window_TitleBar )
  TextGadget(2, 20, 70, 210, 30, "Test", #PB_Text_Center)
  SetGadgetFont(2, FontID1)
EndIf

m_sDesktop = GetDesktopName()
SetGadgetText(2,m_sDesktop)

tSi.STARTUPINFO
tSi\lpTitle = @m_sDesktop
tSi\lpDesktop = @m_sDesktop

tPi.PROCESS_INFORMATION

ret=CreateProcess_(#NUL,@cmdline$,#NUL,#NUL,#False,0,#NUL,#NUL,@tSi,@tPi)

bla.l = Date() + 10

Repeat
  Event = WaitWindowEvent()
  WindowID = EventWindow()
  GadgetID = EventGadget()
  EventType = EventType()
  If Event = #PB_Event_Gadget
  EndIf
  If bla < Date()
    quit = 1
  EndIf
Until Event = #PB_Event_CloseWindow Or quit = 1
[.............]
hab den teil mal nen bischen abgeändert, das sich das programm
sozusagen nach 10 sekunden von selbst beendet, das tut es auch
nur irgendwie wechselt er nichtmehr auf den standard Desktop
zurück. Unten sind ja noch die 3 WinAPIs die das eigentlich machen
sollten oder?
Und zu dem Fenster mit dem Titel "Test", das liegt auf meinem
standard Desktop, das seh ich auf dem zweiten Desktop garnicht.
kluger Mann + kluge Frau = Romanze | dummer Mann + dumme Frau = Schwangerschaft
kluger Mann + dumme Frau = Affäre | dummer Mann + kluge Frau = Shopping <)
Antworten