Programm schützen

[Dragon27]

Hallo,

ehm hat jemand von euch eine Ahnung wie ich folgendes realisieren könnte:

Wir haben einen Jugendraum und benötigen dort eine Regisrierkasse (die ich mit Delphi ohne weiteres scho programmiert habe)!
Aber das Problem liegt darin, dass alle Teammitglieder zwar die Kasse bedienen können sollen aber nichts auf der Windowsoberfläche zu suchen haben sollten (Win XP).

Ich habe jetzt folgendes gemacht:

Borderstyle auf bsnone
Schließenbutton der Windows runterfährt


Aber jetzt kommt das Problem: Es sollte eigentlich nicht möglich sein das Programmm zu beenden ohne dass Windows beendet, weil sonst wieder etwas am Betriebssystem geändert wird bzw. es wird gespielt.

Ich weiß dass es für Win98 verschiedene Prozeduren gibt mit denen man den Taskmanager sperren kann und Alt+F4 und auch Alt+Umschalt aber diese Sachen funzen unter XP nicht!

Bitte könntet Ihr mir sagen wie ich das Problem lösen könnte?

Danke!!

P.s.: Wenn es jemanden interessiert: Jugendraum-Rott

[Christian Seehase]

Moin Dragon,

such' mal unter dem Stichwort Policies im MSDN (msdn.microsoft.com).
Das sind Werte in der Registry, mit denen man ein System richtig zu machen kann.
Wenn dies nun Userspezifisch geschieht, und nur ein spezieller Account für die Bedienung eingerichtet wird, der entsprechend eingeschränkt ist sollte das funktionieren.

[Dragon27]

hi,

danke für den Tipp nur kann ich leider da irgendwie nix Anfangen! Ich weiß net wie ich des in mein Delphiprogramm
integrieren soll, könnte ich da bitte ein Codebeispiel haben für das folgende Problem:

Keinen Taskmanager, Kein Alt+F4, Kein Alt+Umschalt

Danke für die Mühe

Gruß

Dragon27

[Stanlay Hanks]

Hi. Kein Alt + F4 heißt ja, das Programm unter bestimmten Bedingungen nicht schließen können.

Also: Eine Globale boolsche Variable (Ich nenn sie mal: "Close");

Diese Variable wird beim Programmstart auf True gesetzt.
Dann machst du beim OnMouseDown Ereignis deines Buttons rein

Close := true und dann schreibst du noch ins "OnCloseQuery" deines Forms:

Delphi-Quellcode:

IF not Close THEN CanClose := False
ELSE CanClose := true;

Dann müsste man das Prog schon mal nur noch über den schließen Button beenden können.
Zum Thema "Ich will nicht, dass es über den taskmanager geschlossen wird" könntest du dir mal "Services" anschauen. Da hatten wir hier schon einiges. Siehe Suche, oder direkt > Service

Man liest sich, Stanlay