Komplette Partition C:

[I.A.]

Ja der funktioniert bei mir fast aber da hast du das gemacht :

Delphi-Quellcode:

procedure ....................;
procedure ....................;
procedure ....................;

die ersten 2 proceduren hab ich schon nämlich :

Delphi-Quellcode:

procedure  BitBtn2Click(Sender: TObject);
procedure  GetFiles(const Path: string;
procedure  ;

aber die dritte procedure find ich nicht.