XCOPY mit Delphi nachbauen

[Hansa]

Ja, Paramstr (0) enthält ja auch den Laufwerksbuchstaben. 8) Wie bin ich nur darauf gekommen, da wäre nur der Pfad drin ?

Delphi-Quellcode:

  QuellLW := ExtractFileDrive(ParamStr (0));
  if QuellLW = '' then begin
    showmessage ('Kein CD-Laufwerk bzw. kein Laufwerksbuchstabe gefunden !'#10#13#10#13+
                 'Sollten Sie die CD mit einem gemappten Laufwerk benutzen, oder'#10#13+
                 'wollen Sie von Festplatte installieren, so lesen Sie sich bitte die Datei'#10#13+
                 'INSTALL.TXT auf der CD durch.');
    Close;
  end;

Das wäre die Mabuse-Version. Der müßte dann eben nachlesen, wo was hin muß.