Entwickler-Ecke

Sonstiges (Delphi) - Formatfunktion Vornullen mit Komma


norics - Di 09.01.07 11:18
Titel: Formatfunktion Vornullen mit Komma
Hallo Liebe Leut,

Mein Problem ist folgendes:

Ich übergebe aus einer Maske verschiedene Zahlen in eine Datei.
In dieser Datei müssen bestimmte Zahlenformate eingehalten werden.

Das Edit8 Feld hat z.B. die Zahl 0,4

diese Zahl muß in der Datei als 00,40 dargestellt werden.

mit
format('%5.2f',[StrToFloat(edit8.Text)])+  // 5 Stellen (Dicke)
bekomme ich einen Leerschritt anstelle der Vornull.

Wenn ich auffüllen will mit Vornullen, mit dem Parameter %5.2d , akzeptiert das Programm keine Kommazahl.

Weiß jemand eine Lösung ?

Moderiert von user profile iconChristian S.: Delphi-Tags hinzugefügt


Lannes - Di 09.01.07 13:00

Hallo,

etwa so:

Delphi-Quelltext
1:
2:
3:
4:
var s : String;
//...
s := Format('%.2f',[0.4]);
s := StringOfChar('0',5-Length(s))+s;


>> daraus eine Funktion coden.


norics - Di 09.01.07 15:03

Hallo Lannes,

so funktioniert es. Vielen Dank.