Forum: Programmieren allgemein
by Ykcim,
23. Mai 2014
Doch, das bereitet auch ein bißchen Probleme...
Forum: Programmieren allgemein
by Ykcim,
23. Mai 2014
Genau das war es...
Kaum macht man es richtig, schon klappt's.
function VarStrToDate( Value : Variant; Default : TDateTime = 0 ) : TDateTime;
begin
if not TryStrToDate( Value, Result ) then
Result := Default;
end;
Forum: Programmieren allgemein
by Ykcim,
23. Mai 2014
Ich kann den Fehler nicht nachvollziehen und hoffe, dass mir hier jemand auf die Sprünge hilft.
Die Funktion ist im Prinzip die gleiche wie nachfolgende:
function VarStrtToInt( Value : Variant; Default : Integer = 0 ) : Integer;
begin
if not TryStrToInt( Value, Result ) then
Result := Default;
end;
Forum: Programmieren allgemein
by Ykcim,
23. Mai 2014
Die Funktion wird so auf der Embarcadero-Seite angegeben:
function TryStrToDate(const S: string; out Value: TDateTime): Boolean;
Gruß
Patrick
Forum: Programmieren allgemein
by Ykcim,
23. Mai 2014
Hallo,
kann mir irgend jemand sagen, warum ich hier einen Fehler bekomme?
function VarStrtToDate( Value : Variant; Default : TDate = 0 ) : TDate;
begin
if not TryStrToDate( Value, Result ) then
Result := Default;
end;