In einen Memo nur Zahlen zulassen - Wie?

Hi,
wie ermögliche ich das in einen Memo nur Zahlen eingegeben werden können? Also keine Buchstaben, keine Zeichen (. , / + etc.).

Greetz

**Die Muhkuh**

Einfach ins OnKexPress:

markieren

Delphi-Quellcode:

			if not Key in ['1'..'9','0'] then

  Key := '';

**fkerber**

Hi!

Im OnKeyDown oder OnKeyPress (bin leider nicht sicher, eins von beidem) folgendes schreiben:

if not key in [#48..#57] then key:=#0; Ich hoffe es sind keine Fehler drin.

Ciao fkerber

#48-#57 sind die Zahlen 0-9.

**Leuselator**

lies

das hier,

und das hier - das sollte helfen.
Gruß

Zitat von Spider:

Einfach ins OnKexPress:

markieren

Delphi-Quellcode:

			if not Key in ['1'..'9','0'] then

  Key := '';

markieren

Code:

Operator ist auf diesen Operatorentyp nicht anwendbar!

<-- Der Compiler setzt dne Curser vor "in".

Mein Code:

markieren

Code:

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

begin

if not key in ['1','2','3','4','5','6','7','8','9','0'] then

Showmessage('Bitte nur Zahlen von 0-9 eingeben!');

end;

Was ist mein Fehler?

**Matze**

if not (key in [#48..#57, #8]) then key := #0 //#8 ist Backspace, was man auch meistens braucht

Zitat von Matze:

if not (key in [#48..#57, #8]) then key := #0 //#8 ist Backspace, was man auch meistens braucht

Und was ist dann #0???

**Die Muhkuh**

#0 ist einfach nix

**Matze**

genau, dann soll er nix hinschreiben, keine Leerstelle, keinen Punkt, kein Semikolon, kein Buchstabe, ...

Ok, jetzt gehts. Danke für eure Hilfe.

In einen Memo nur Zahlen zulassen - Wie?

In einen Memo nur Zahlen zulassen - Wie?

Re: In einen Memo nur Zahlen zulassen - Wie?

Re: In einen Memo nur Zahlen zulassen - Wie?

Re: In einen Memo nur Zahlen zulassen - Wie?

Re: In einen Memo nur Zahlen zulassen - Wie?

Re: In einen Memo nur Zahlen zulassen - Wie?

Re: In einen Memo nur Zahlen zulassen - Wie?

Re: In einen Memo nur Zahlen zulassen - Wie?

Re: In einen Memo nur Zahlen zulassen - Wie?

Re: In einen Memo nur Zahlen zulassen - Wie?

Forumregeln

Andreas L. (Gast) n/a Beiträge	#1 In einen Memo nur Zahlen zulassen - Wie? 26. Jan 2004, 17:49 Hi, wie ermögliche ich das in einen Memo nur Zahlen eingegeben werden können? Also keine Buchstaben, keine Zeichen (. , / + etc.). Greetz
	Zitat

Die Muhkuh Registriert seit: 21. Aug 2003 7.332 Beiträge Delphi 2009 Professional	#2 Re: In einen Memo nur Zahlen zulassen - Wie? 26. Jan 2004, 17:51 Einfach ins OnKexPress: markieren Delphi-Quellcode: if not Key in ['1'..'9','0'] then Key := ''; Manuel Blog reactivated
	Zitat

fkerber (CodeLib-Manager) Registriert seit: 9. Jul 2003 Ort: Ensdorf 6.723 Beiträge Delphi XE Professional	#3 Re: In einen Memo nur Zahlen zulassen - Wie? 26. Jan 2004, 17:52 Hi! Im OnKeyDown oder OnKeyPress (bin leider nicht sicher, eins von beidem) folgendes schreiben: if not key in [#48..#57] then key:=#0; Ich hoffe es sind keine Fehler drin. Ciao fkerber #48-#57 sind die Zahlen 0-9. Frederic Kerber
	Zitat

Leuselator Registriert seit: 18. Mär 2003 Ort: Berlin 589 Beiträge Delphi 8 Architect	#4 Re: In einen Memo nur Zahlen zulassen - Wie? 26. Jan 2004, 17:53 lies das hier,und das hier - das sollte helfen. Gruß Tim Leuschner Programmierer = moderner Sysiphos: stets wenn er meint, den Stein seiner Dummheit auf den Berg des Wissens gewuchtet zu haben, erblickt er einen völlig neuen Aspekt und der Dummfels poltert mit Getöse zurück ins Tal der Unwissenheit...
	Zitat

Matze (Co-Admin) Registriert seit: 7. Jul 2003 Ort: Schwabenländle 14.929 Beiträge Turbo Delphi für Win32	#6 Re: In einen Memo nur Zahlen zulassen - Wie? 26. Jan 2004, 18:15 if not (key in [#48..#57, #8]) then key := #0 //#8 ist Backspace, was man auch meistens braucht
	Zitat

Andreas L. (Gast) n/a Beiträge	#7 Re: In einen Memo nur Zahlen zulassen - Wie? 26. Jan 2004, 18:20 Zitat von Matze: if not (key in [#48..#57, #8]) then key := #0 //#8 ist Backspace, was man auch meistens braucht Und was ist dann #0???
	Zitat

Die Muhkuh Registriert seit: 21. Aug 2003 7.332 Beiträge Delphi 2009 Professional	#8 Re: In einen Memo nur Zahlen zulassen - Wie? 26. Jan 2004, 18:22 #0 ist einfach nix Manuel Blog reactivated
	Zitat

Matze (Co-Admin) Registriert seit: 7. Jul 2003 Ort: Schwabenländle 14.929 Beiträge Turbo Delphi für Win32	#9 Re: In einen Memo nur Zahlen zulassen - Wie? 26. Jan 2004, 18:26 genau, dann soll er nix hinschreiben, keine Leerstelle, keinen Punkt, kein Semikolon, kein Buchstabe, ...
	Zitat

Andreas L. (Gast) n/a Beiträge	#10 Re: In einen Memo nur Zahlen zulassen - Wie? 26. Jan 2004, 18:27 Ok, jetzt gehts. Danke für eure Hilfe.
	Zitat