Hallo!
Ich habe mal wieder eine Frage, undzwar habe ich ein kleines Programm das anzeigen soll wie groß ein Verzeichnis ist oder eine Datei.
Nun beim Compeliren bekommen ich ein Fehlermeldung an der Stelle wo FolderSize gestartet wird:
Delphi-Quellcode:
function FolderSize(FolderName: string): Int64;
var
fldr, fso: OleVariant;
begin
fso := CreateOleObject('Scripting.FileSystemObject');
fldr := fso.GetFolder(FolderName);
result := fldr.size;
end;
procedure TMainform.Button1Click(Sender: TObject);
var
exs : Int64;
ex : String;
begin
Button1.Visible := false;
ex := MetaIni.ReadString('Path', 'ExportPath', '');
exs := FolderSize(ex); // hier kommt die Fehlermeldung: Too many actual Parameters !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
Label16.Caption := Format('%d', [exs]);
end;
weiss jemand warum das passiert? auch wenn ich den ordner ohne die Registry angebe also gleich als String dann mekert der Compiler torztdem mit der selben Fehelrmeldung