![]() |
AW: TryStrToDate
Delphi-Quellcode:
:angel:
function VarStrToDate( Value : Variant; Default : TDate = 0 ) : TDate;
begin if not TryStrToDate( Value, TDateTime(Result) ) then Result := Default; end; Du kannst das ja gern mal an Emba melden, damit die den Result-Typ berichtigen. Aber eigentlich sollten sie dann besser eine neue Veraiante einbauen und die alt belassen, auch wenn sie syntaktisch nicht ganz richtig ist. - einmal würden sonst alle bestehenden Codes nicht mehr funktionieren, da dort ja bestimmt (gezwungenermaßen) mit TDateTime gearbeitet wurde - und ein TDate passt ja auch in einen TDateTime rein [add] Ach ja, wenn sich der Variant nicht in einen String umwandeln lässt, dann gibt es dennoch eine Exception. Also entweder du fängst auch noch die ungültigen Variant-Typen ab, oder du kannst ganz einfach ![]() |
AW: TryStrToDate
Zitat:
|
AW: TryStrToDate
Zitat:
Delphi-Quellcode:
Value TDateTime sein muss (in der Funktion von TE Result). Default kann auch TDate bleiben (ist letztendlich TDateTime mit 0:00 Uhr). Und da in der Funktion vom TE Result TDate war, statt TDateTime, kam auch die Meldung.
function TryStrToDate(const S: string; out Value: TDateTime): Boolean;
|
AW: TryStrToDate
Zitat:
Würden wir die Funktionen neu designen, da stimme ich dir zu, sollten Date Routinen auch mit TDate und Time Routinen mit TTime arbeiten und keinen Mischmasch. Da das aber nun schon seit fast 20 Jahren so ist, wirds auch so bleiben. |
AW: TryStrToDate
Zitat:
|
Alle Zeitangaben in WEZ +1. Es ist jetzt 02:21 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 by Thomas Breitkreuz