OnKeyDown Zeichen abfangen

Hallo,

ich hab ein kleines Problem:
Ich will das Dollar-Zeichen - $ - in einem Memo nicht zur Eingabe freigeben. Hab daszu folgenden Code, im OnKeyDown Ereignis, aber irgendwie will der nicht funktionieren. Was ist daran falsch?

markieren

Delphi-Quellcode:

			If (Shift = [ssShift]) and (Key = 52) then

    Key := 0;

Könnt ihr mir helfen?

Danke im Vorraus.

**Filou**

Problem: Der Buchstabe wird eingefügt, ohne das du diesen Vorgang abfangen kannst.

Lösung: Gehe Edit1.Text mit einer for schleife durch, und lösche dabei alle $-Zeichen

[EDIT]edit1.text:=StringReplace(edit1.text,'$','', [rfReplaceAll]);[/EDIT]

Gerade diese Lösung wollte ich umgehen, aber wenn's wirklich nicht anders geht, werd ich es wohl so machen müssen.

Danke!

**jim_raynor**

Schau dir doch mal die Werte für Key und Shift im Debugger an, wenn du das entsprechende Zeichen drückst. Vom Ansatzher funktioniert den Weg schon. Eventuell musst du es im OnKeyPress machen.

OnKeyDown Zeichen abfangen

OnKeyDown Zeichen abfangen

Re: OnKeyDown

Re: OnKeyDown

Re: OnKeyDown Zeichen abfangen

Forumregeln

Filou Registriert seit: 31. Mai 2004 39 Beiträge Delphi 7 Personal	#2 Re: OnKeyDown 14. Apr 2005, 14:54 Problem: Der Buchstabe wird eingefügt, ohne das du diesen Vorgang abfangen kannst. Lösung: Gehe Edit1.Text mit einer for schleife durch, und lösche dabei alle $-Zeichen [EDIT]edit1.text:=StringReplace(edit1.text,'$','', [rfReplaceAll]);[/EDIT]
	Zitat

daniel8520 (Gast) n/a Beiträge	#3 Re: OnKeyDown 14. Apr 2005, 15:05 Gerade diese Lösung wollte ich umgehen, aber wenn's wirklich nicht anders geht, werd ich es wohl so machen müssen. Danke!
	Zitat

jim_raynor Registriert seit: 17. Okt 2004 Ort: Berlin 1.251 Beiträge Delphi 5 Standard	#4 Re: OnKeyDown Zeichen abfangen 14. Apr 2005, 15:10 Schau dir doch mal die Werte für Key und Shift im Debugger an, wenn du das entsprechende Zeichen drückst. Vom Ansatzher funktioniert den Weg schon. Eventuell musst du es im OnKeyPress machen. Christian Reich Schaut euch mein X-COM Remake X-Force: Fight For Destiny ( http://www.xforce-online.de ) an.
	Zitat