Ergebnis der Suchanfrage

• Forum: Object-Pascal / Delphi-Language

  AW: Maske für FormatMaskText

    Delphi
    by Bjoerk, 14. Feb 2015
  FormatMaskText ist ja mega kompliziert? Man kann sich ja zum Beispiel eine eigene function erstellen (uses DateUtils):
  
  function ExtractDate(const Value: string; const Default: TDateTime): TDateTime;
  var
  AYear, AMonth, ADay, AHour, AMinute, ASecond: word;
  begin
  AYear := StrToIntDef(Copy(Value, 1, 4), 0);
  AMonth := StrToIntDef(Copy(Value, 6, 2), 0);
  ADay := StrToIntDef(Copy(Value,...