Grösse von Verzeichnissen bestimmen

[Steve]

Zitat von Ajin:

...In diesem Sinne möchte ich die Grösse der zu kopierenden Verzeichnisse (inkl. unterordner) bestimmen. ...

Hi,

eine (weitere) Möglichkeit wäre:

Delphi-Quellcode:

uses
  ComObj;

Function FolderSize(FolderName: STRING) : DWORD;
var
  fldr, fso : OleVariant;
begin
  fso    := CreateOleObject('Scripting.FileSystemObject');
  fldr   := fso.GetFolder(FolderName);
  result := fldr.size; // In Bytes
end;

Gruß
Stephan