Registriert seit: 6. Mär 2007
Ort: Osnabrück
599 Beiträge
Delphi XE6 Enterprise
|
AW: TryStrToFloat/TryStrToInt, leeren String nicht als 0 erhalten
2. Mai 2022, 09:38
Mach Dir nen eigenen Datentyp, ein record oder eine Klasse mit dem eigentlichen Wert und einem Flag "gesetzt" und die passenden Methoden dabei, u.a. ein Setter und ein "WriteToField(ds: TDataSet; const fn: string)", bei dem Du dann je nach "gesetzt" entweder den Wert übergibst oder das Feld unverändert lässt oder auch löschst.
Statt "TryStrToFloat" musst Du dann sowas wie "try StrToFloat... gesetzt := true; except .. end" nutzen. Vielleicht gleich als Methode mit in den eigenen Datentyp packen.
|