Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Multimedia (https://www.delphipraxis.net/16-multimedia/)
-   -   Delphi Kann man ein TEdit "überreden" ein Punkt als Komma zurück zu (https://www.delphipraxis.net/53306-kann-man-ein-tedit-ueberreden-ein-punkt-als-komma-zurueck-zu.html)

juergen 13. Sep 2005 22:23


Kann man ein TEdit "überreden" ein Punkt als Komma
 
Hallo zusammen,
Eingabefelder = TEdit;
ich suche eine Möglichkeit, dass die vom Anwender eingegebenen Zeichen wie ein Punkt und/oder ein Doppelpunkt dann zurückgegeben werden als ein Komma ???...

Hintergrund:
ich muß mit den eingegebenen Werten Berechnungen durchführen. z.B. so --> strtofloat(InputA.text)
Das der Anwender nur Zahlen eingeben kann, habe ich schon über ein OnKeyPress-Ereignis geregelt.
Nur ist es halt so, der eine Anwender nutzt als Dezimaltrenner dann gern ein Komma, der ander ein Punkt und der dritte ggf. ein Doppelpunkt....

Wenn man ein Komma eingibt kann ja alles berechnet werden...

Hat hierzu jemand eine Idee?

Grüße
Jürgen

flomei 13. Sep 2005 22:26

Re: Kann man ein TEdit "überreden" ein Punkt als K
 
Holla, die Waldfee.
Einmal mehr kann die Code Library uns beglücken...
Klick

MfG Florian :hi:

Jelly 13. Sep 2005 22:30

Re: Kann man ein TEdit "überreden" ein Punkt als K
 
Ich hav zwar noch nie gehört dass jemand ein Doppelpunkt als Dezimaltrennzeichen nutzt, aber schau dir mal unbedingt die Konstante DecimalSeparator an. Es ist Schwachsinn, auf jedem System aus einem Punkt ein Komma zu machen, denn StrToFloat berücksichtigt die Einstellungen deines Windows, was schlussendlich als Dezimaltrennzeichen interpretiert wird. Und genau das Zeichen steht in Decimalseparator... Im OnKeyPress Event kannst du dann entsrechend reagieren:
Delphi-Quellcode:
if key in [',','.'] then key := DecimalSeparator ;

juergen 13. Sep 2005 22:37

Re: Kann man ein TEdit "überreden" ein Punkt als K
 
Hallo Flomei,
leider ist das nicht mein Prob.
Das OnKeyPress-Ereeignis habe ich schon und auch Überwachung von Eingabefehlern (2 Kommas usw.)

Ich möchte den verschiendenen Anwendern (u.a. auch der berühmten Frau Müller Lieschen :zwinker: ) nach ihren individuellen Vorlieben "erlauben", anstelle eines Kommma's auch einen Punkt einzugeben, oder einen Doppelpunkt.

Nur damit kann ich dann nicht mehr rechnen. :?

Gruß
Jürgen

Luckie 13. Sep 2005 22:41

Re: Kann man ein TEdit "überreden" ein Punkt als K
 
Jelly hat doch die Lösung gepostet.

juergen 13. Sep 2005 22:52

Re: Kann man ein TEdit "überreden" ein Punkt als K
 
@Jelly,
Vielen Dank!
Genau das war es was ich benötigte. :mrgreen:

Eine schöne Nacht noch!

Gruß Jürgen


Alle Zeitangaben in WEZ +1. Es ist jetzt 14:04 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz