Forum: Programmieren allgemein
by jaenicke,
30. Apr 2009
Ein ü ist kein Umlaut, interessant (bezogen auf meine letzte Antwort). ;-)
Und bei den reinen Delphilösungen weiter oben ist das vollkommen egal, Probleme ergeben sich ja nur in den Batchdateien.
Forum: Programmieren allgemein
by jaenicke,
29. Apr 2009
Also bei mir funktionieren diese beiden Methoden problemlos:procedure TForm1.Button1Click(Sender: TObject);
var
dir, album, FileName: String;
begin
dir := 'N:\';
album := 'Attero Dominatus';
FileName := 'Sabaton - Metal Crüe.mp3';
if not DirectoryExists (dir + album) then
CreateDir (dir + album);
RenameFile (dir + FileName, dir + album + '\' + filename);
Forum: Programmieren allgemein
by jaenicke,
29. Apr 2009
Was steht denn z.B. exakt in den Variablen drin? Versuch es mal mit fixen Werten wie ich und poste das. Abgesehen von Rechteproblemen oder dass das von einem Laufwerk aufs andere nicht geht (ist ja nicht der Fall) wüsste ich da keine Probleme.
Mit Delphi 7 klappt das wunderbar, ich habs darunter gerade kurz getestet.
Forum: Programmieren allgemein
by jaenicke,
29. Apr 2009
Der Code funktionuiert bei mir 1:1. :stupid: var
dir, album, FileName: String;
begin
dir := 'b:\';
album := 'zzz';
FileName := 'test.txt';
if not DirectoryExists (dir + album) then CreateDir (dir + album); // hab den code grade ausm gedächtniss geschrieben, weiß nimmer obs createdir hieß oder net, das erstellen von verzeichnissen jedenfalls klappt
RenameFile (dir + FileName, dir +...
Forum: Programmieren allgemein
by jaenicke,
29. Apr 2009
Dafür gibts AnsiToOEM und OemToAnsi. ;-)
Aber sinnvoller wäre es ja wohl eher zu schauen warum es mit Delphi nicht klappt. Wie sieht denn der nicht funktionierende Code dazu aus?