Ergebnis der Suchanfrage

• Forum: Object-Pascal / Delphi-Language

  AW: Größe einer Datei bestimmen

    Delphi
    by himitsu, 13. Okt 2012
  Nur zum Auslesen der Dateigröße besser nicht über das System.FileSize gehn, denn was mag wohl pasieren, wenn man Zugriffsrechte besitzt oder irgendwer die Datei gerade geöffnet hat?
  
  
  Was mich aber extrem verwundert:
  - Bei den Dateifunktionen in der SysUitls hat man tatsächlich die Dateigröße vergessen zu implementieren. :shock:
  - Und sogar bei den neuen Funktionen der IOUtils.TFile hat man...
• Forum: Object-Pascal / Delphi-Language

  AW: Re: Größe einer Datei bestimmen

    Delphi
    by himitsu, 13. Okt 2012
  Result := (Int64(wfd.nFileSizeHigh) shl 32) or wfd.nFileSizeLow;
  
  // oder
  
  Int64Rec(Result).Lo := wfd.nFileSizeLow;
  Int64Rec(Result).Hi := wfd.nFileSizeHigh;
  
  Und nein, das mit MAXDWORD funktioniert auch ... also wenn man es richtig macht. :angle2:
  Result := (Int64(wfd.nFileSizeHigh) * (Int64(MAXDWORD) + 1)) + Int64(wfd.nFileSizeLow);