Spinedit & Kein Komma

**Hallo_Thomas**

Hallo,

Spin edit gibt Doch Integer Werte wieder, trotzdem kann man Komma eigeben,wie kann ich dies abstellen!
So das nur noch Zahlen eingegeben werden können?

**Nikolas**

Du könntest z.B. in das KeyPress das hier schreiben:

if key=',' then key:=#0;

**Hallo_Thomas**

@Danke Toxman, das klappt.

Gibts da auch einen umgedrehten Befehl, ich kenn mich überhaupt nicht aus.

if not (key in [#0..#9]) then key:=#0; Doch da reagiert Spinedit gar ni mehr.

**scp**

Fast:
if not (key in ['0'..'9']) then key:=#0;

**Hallo_Thomas**

Dankeschön

,(he langsam wirds meine Fehler nähern sich der Lösung an.

)

Spinedit & Kein Komma

Spinedit & Kein Komma

Re: Spinedit & Kein Komma

Re: Spinedit & Kein Komma

Re: Spinedit & Kein Komma

Re: Spinedit & Kein Komma

Forumregeln

Hallo_Thomas Registriert seit: 18. Apr 2005 Ort: Dresden 405 Beiträge Delphi 2005 Professional	#1 Spinedit & Kein Komma 26. Mär 2006, 21:03 Hallo, Spin edit gibt Doch Integer Werte wieder, trotzdem kann man Komma eigeben,wie kann ich dies abstellen! So das nur noch Zahlen eingegeben werden können?
	Zitat

Nikolas Registriert seit: 28. Jul 2003 1.528 Beiträge Delphi 2005 Personal	#2 Re: Spinedit & Kein Komma 26. Mär 2006, 21:39 Du könntest z.B. in das KeyPress das hier schreiben: if key=',' then key:=#0; Erwarte das Beste und bereite dich auf das Schlimmste vor.
	Zitat

Hallo_Thomas Registriert seit: 18. Apr 2005 Ort: Dresden 405 Beiträge Delphi 2005 Professional	#3 Re: Spinedit & Kein Komma 26. Mär 2006, 22:05 @Danke Toxman, das klappt. Gibts da auch einen umgedrehten Befehl, ich kenn mich überhaupt nicht aus. if not (key in [#0..#9]) then key:=#0; Doch da reagiert Spinedit gar ni mehr.
	Zitat

scp Registriert seit: 31. Okt 2003 1.120 Beiträge Delphi 7 Personal	#4 Re: Spinedit & Kein Komma 26. Mär 2006, 22:07 Fast: if not (key in ['0'..'9']) then key:=#0;
	Zitat

Hallo_Thomas Registriert seit: 18. Apr 2005 Ort: Dresden 405 Beiträge Delphi 2005 Professional	#5 Re: Spinedit & Kein Komma 26. Mär 2006, 22:12 Dankeschön ,(he langsam wirds meine Fehler nähern sich der Lösung an. )
	Zitat