Delphi-PRAXiS - Delphi Tasten sperren

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)

- Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)

- - Delphi Tasten sperren (https://www.delphipraxis.net/2882-tasten-sperren.html)

flomei

11. Feb 2003 16:17

Tasten sperren

Wie kann man in meinem Programm bestimmte Tasten sperren? Zum Beispiel die Leertaste oder ESC? Ich hab hier schon im Forum gesucht aber nichts gefunden. Wäre dankbar für jede Hilfe!

Thx!

MfG Florian

lodda

11. Feb 2003 16:31

Hallo flomei

frage mal im OnKeyPress-Ereigniss ab ob ide Taste die du unterdrücken willst gedrückt wurde. Wenn ja dann ersetze sie durch ''.

Daniel B

11. Feb 2003 17:43

Hallo,

Zitat:

Zitat von lodda

frage mal im OnKeyPress-Ereigniss ab ob ide Taste die du unterdrücken willst gedrückt wurde. Wenn ja dann ersetze sie durch ''.

Du meinst eher: If Key sowieso then Key := #0; !

Grüsse, Daniel :hi:

flomei

12. Feb 2003 14:49

Genau das!
Mit Checkboxen.

Code:

			If 

ESCsperren.Checked

then

//Taste sperren

Wie geht das?

Thx!

MfG Florian

Sharky

12. Feb 2003 15:15

Hai,

ich habe es mal so gemacht:

Delphi-Quellcode:

			procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);

begin

 if (ESC_Sperren.Checked) AND (key = #27) then

  begin

   key := #0;

  end;

 if (SPACE_Sperren.Checked) AND (key = #32) then

  begin

   key := #0;

  end;

end;

Der Code steht im OnKeyPress des Formulares. KeyPreview des Formulares ist auf TRUE.

[edit=Daniel B]Tags korrigiert; MfG Daniel B.[/edit]

Alle Zeitangaben in WEZ +1. Es ist jetzt 13:01 Uhr.