Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Datenbanken (https://www.delphipraxis.net/15-datenbanken/)
-   -   Delphi Währung in TEdit mit Tausendertrenner darstellen (https://www.delphipraxis.net/95865-waehrung-tedit-mit-tausendertrenner-darstellen.html)

LOMBI 14. Jul 2007 20:19

Datenbank: ABS-db • Version: 5.12 • Zugriff über: TQuery

Währung in TEdit mit Tausendertrenner darstellen
 
Guten Abend,

wie bitte kann ich bei der Eingabe in einem TEdit den Betrag mit Tausendertrenner darstellen?

Delphi-Quellcode:
QueryArt.FieldByName('VKNetto').AsFloat := StrToFloat(Format('%10n',[EdVKnet.Text]));
Vielen Dank für Antwort!

Gruß
Lombi

mkinzler 14. Jul 2007 20:24

Re: Währung in TEdit mit Tausendertrenner darstellen
 
Durch die Konvertierung des Strings in einen Float gehen alle Formatierungen verloren.

Nimm einen TMaskEdit, da kannst du eine Eingabemaske vorgeben

LOMBI 14. Jul 2007 20:26

Re: Währung in TEdit mit Tausendertrenner darstellen
 
Danke, TMaskEdit werde ich mir ansehen!

LOMBI 14. Jul 2007 20:43

Re: Währung in TEdit mit Tausendertrenner darstellen
 
Kann ein TMaskEdit auch blank sein wie ein TEdit?
Die schwarzen Linien sollen nicht sichtbar sein.

mkinzler 14. Jul 2007 20:45

Re: Währung in TEdit mit Tausendertrenner darstellen
 
Was meinst du mit schwarzen Linien?

LOMBI 14. Jul 2007 20:53

Re: Währung in TEdit mit Tausendertrenner darstellen
 
Beim Anlegen einer neuen Maske werden Linien als Tausendertrenner in der Testeingabe
als Text vorgegeben.

mkinzler 14. Jul 2007 21:01

Re: Währung in TEdit mit Tausendertrenner darstellen
 
Was für eine Maske verwendest du?

LOMBI 14. Jul 2007 21:22

Re: Währung in TEdit mit Tausendertrenner darstellen
 
Die Maske für die Tausendertrenner war nicht vorhanden und mußte angelegt werden.
Beim Ausführen der Anwendung bekomme ich im TMaskEdit
als Text vorgegeben: _.___.___,____

EDatabaseError 14. Jul 2007 22:22

Re: Währung in TEdit mit Tausendertrenner darstellen
 
Du kannst ein Leerfeld als "_" oder " " darstellen. Einfach mal die OH zu EditMask durchlesen.

Mfg


Alle Zeitangaben in WEZ +1. Es ist jetzt 06:31 Uhr.

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