Tasten sperren

[flomei]

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]

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]

Hallo,

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

[flomei]

Genau das!
Mit Checkboxen.

Code:

If 
ESCsperren.Checked
then
//Taste sperren

Wie geht das?

Thx!

MfG Florian

[Sharky]

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]