Wenn ich mich richtig entsinne, kann man der cmd.exe den Befehl "mkdir" genauso wie z. B. "dir" als Parameter übergeben, etwa runexe('c:\windows\system32\cmd.exe', '/c mkdir ' + DirName).
z. B.:
Delphi-Quelltext
1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11: 12: 13: 14: 15: 16: 17: 18:
| ...
var DirName: String;
procedure runexe(exefile: string; Parameter: String); begin
end;
procedure Opencmd; begin DirName := 'c:\test'; runexe('c:\windows\system32\cmd.exe', '/c mkdir' + DirName); end;
... |
PS: Man kann auch "md" benutzen, spart drei Zeichen und wird mindestens seit MS-DOS 5.0 und höher unterstützt, auch unter NT, 2000 und XP...
Moderiert von
raziel: Delphi-Tags hinzugefügt.