Tastatureingabe in SynEdit abfangen

[hincapie]

Hallo,
ich möchte gern in einem SynEdit die Eingabe des $-Zeichens (also shift + 4) abfangen.
Folgender Code funktioniert aber nicht:

Delphi-Quellcode:

procedure TEditForm.SynEdit1KeyDown(Sender: TObject; var Key: Word;  
  Shift: TShiftState);  
begin  
  if (Key = 4) and (Shift = [ssShift]) then  
  begin  
    ShowMessage('taste $ gedrückt');  
    ...  
    Key := 0;  
  end;  
end;

Es wird aber noch nicht mal die Message angezeigt.
Hab es auch schon mit Ord(4) versucht.
Nun habe ich 2 Fragen:
Ist der Wert für key falsch, und wenn, welcher ist der Richtige?
In SynEdit gibt es sogenannte "keystrokes", dort ist die
Kombination shift + 4 bereits vorbelegt, kann es evtl. daran liegen?

[jim_raynor]

Ja der Wert 4 ist falsch, da du das ASCII Zeichen 4 nehmen musst das einen anderen Wert hat.

Also ganz einfach: Key = Ord('4')

[hincapie]

Danke, Problem gelöst! :wink: