Avatar billede stussy_1000 Nybegynder
10. oktober 2000 - 12:26 Der er 7 kommentarer og
1 løsning

hvordan laver jeg et password program

Hvordan gør jeg sådan at man ikke kan bruge Ctrl+alt+delete funktionen til at stoppe mit program

Hvordan gør jeg sådan at man ikke kan bruge Alt+f4 til at stoppe mit program

Hvordan gør jeg sådan at man ikke kan bruge Alt+Tab til at gå uden om mit program

Tak.
Avatar billede borrisholt Novice
10. oktober 2000 - 12:30 #1
Ctrl+alt+delete kan du ikke blokere i Windows NT og 2000 sådan er det!

Det andet gør du ved atsætte keypreview på din form til true også i din form onkey down event tester på om de på gældende taste tryk har fundet sted.


Jens B
Avatar billede sjensen Nybegynder
10. oktober 2000 - 12:36 #2
For at håndtere disse tastekombinationer er det nødvendigt at oprette en \"windows Message\" snuser. D.v.s. en rutine/procedure der kaldes for hver Windows Message dit program ser, og som så tester på dens indhold. I det tilfælde den finder det den leder efter, skal den fjerne meddelelsen fra windows køen. Det er eneste måde at gøre det på.

I delphi er der et eks. på brugen af \"KeyBoard Hook\".
Avatar billede snowball Novice
10. oktober 2000 - 12:39 #3
Disable CTRL+ALT+DEL

procedure TForm1.Button1Click(Sender: TObject);
var
  dummy: Integer;
begin
  SystemParametersInfo(SPI_SCREENSAVERRUNNING, 1, @dummy, 0); //Disable CTRL+ALT+DEL
  Label1.Caption := \'CTRL+ALT+DEL is disabled !\';
  Button1.Enabled := False;
  Button2.Enabled := True;
end;

procedure TForm1.Button2Click(Sender: TObject);
var
  dummy: Integer;
begin
  SystemParametersInfo(SPI_SCREENSAVERRUNNING, 0, @dummy, 0); //Enable CTRL+ALT+DEL
  Label1.Caption := \'CTRL+ALT+DEL is enabled !\';
  Button1.Enabled := True;
  Button2.Enabled := False;
end;

Kan ikke lige huske hvordan man disabler ALT + F4 men prøv og søg på det her på Eksperten !

Snowball
Avatar billede sjensen Nybegynder
10. oktober 2000 - 12:46 #4
snowball, fuskerløsningen med at snyde delphi til at tro der er en screensaver kørende er ikke dum.

Hvor har du den fra ?

Det er mange af sådanne små tip der kan gøre tingene lettere i hverdagen.
Avatar billede borrisholt Novice
10. oktober 2000 - 12:49 #5
bortset fra det ikke virker i NT .....

jens B
Avatar billede sjensen Nybegynder
10. oktober 2000 - 12:50 #6
Vedr. Alt+F4: Den kan løses med en kombination af OnKeyDown (Check efter Alt+F4 og sæt en boolean til true der fortæller at alt+f4 er trykker) og formens OnCloseQuery. I OnCloseQuery sætter du CanClose til det modsatte af den boolean du har i OnKeyDown:

ImPlemantation
var AltF4 : boolean;

FormCreate:
AlfF4 := False;

OnKeyDown:
If (Shift = [Alt]) and Key = VK_F4 then AltF4 = true;

OnCloseQuery:
CanClose := not AltF4;

Så er den på plads.
Avatar billede zerohero Nybegynder
10. oktober 2000 - 15:47 #7
Hejsa stussy_1000

Jeg har lige netop hvad du søger. En komponent der kan blokere ctrl+alt+delete funktion og alt+f4 funktionen og med hensyn til alt+tab så gør som borrisholt anbefaler...

Min Email: soeren@freestyle-media.dk

ZeroHero
Avatar billede snowball Novice
10. oktober 2000 - 23:42 #8
sjensen: 1) Har det med screensaveren herfra: http://www.eksperten.dk/spm.phtml?id=2281 ! Det virker helt fint på Win9x ! Bare lidt træls at den ikke også virker i NT/2000 ;(

2) Så vidt jeg husker, så virker den ikke altid så skide godt den løsning du skriver mht. ALT + F4 ! Hvis man ikke trykker tasterne ned på næsten samme tid (man skal jo ta\' hensyn til de langsomme og \"EDB-mongolerne\" når man laver offentlige programmer!) så registrerer den ikke at begge taster er trykket ned og den vil derfor ikke sætte AltF4 = true; !

Snowball
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester