Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi Datei umbennen (https://www.delphipraxis.net/51588-datei-umbennen.html)

Gast 15. Aug 2005 17:41


Datei umbennen
 
Hallo,

es kann sein, dass einige mich jetzt als dumm abstempeln ;) Aber ungelogen suche ich seht knapp 40 Minuten nach einem Befehl den ich einfach nicht finde. Ich möchte eine Datei die z.B. djh.jpg heißt umbennen auf djz.jpg, aber ich habe keine Ahnung wie man Dateien umbenennt...

Danke im Vorraus für Eure Hilfe!

Pr0g 15. Aug 2005 17:42

Re: Datei umbennen
 
Wie wäre es mit rename(), in der Hilfe ist auch nen Beispiel.

dahead 15. Aug 2005 17:59

Re: Datei umbennen
 
renamefile wäre für deine o.g. zwecke besser.

du könntest um nicht die ganze sysutils.pas einzubinden auch direkt so vorgehen:

Delphi-Quellcode:
MoveFile(PChar(OldName), PChar(NewName));
das ruft die api funktion

Delphi-Quellcode:
function MoveFile; external kernel32 name 'MoveFileA';
auf.

ichbins 15. Aug 2005 18:29

Re: Datei umbennen
 
Wenn du die Datei gleich verschieben willst, kannst du auch
Delphi-Quellcode:
move('C:\from.jpg','C:\to.jpg');
nehmen. Geht auch Laufwerksübergreifend

Gast 15. Aug 2005 18:45

Re: Datei umbennen
 
Vielen Dank :-) Bin sehr geholfen

ichbins 15. Aug 2005 19:23

Re: Datei umbennen
 
du solltest deinen Thread als BEANTWORTET markieren, wenn er beantwortet ist. Sonst meinen alle, er wäre noch nicht beantwortet und schreiben noch zusätzliche Antworten, so wie ich jetzt :-D

Gast 16. Aug 2005 15:55

Re: Datei umbennen
 
Ich dachte, dass es funktionieren würde, aber irgendwie hackt es ein wenig ... mei Ziel ist es doch nur:

"C:\Steam\SteamApps\thisis4cs\counter-strike\cstrike\spritesm" umbenennen zu "C:\Steam\SteamApps\thisis4cs\counter-strike\cstrike\sprites"

Kann mir jemand dafür evtl. den Code dafür schreiben ?

dahead 16. Aug 2005 16:02

Re: Datei umbennen
 
was ist daran das problem?

die o.g. befehle (insbesondere "RenameFile") erledigen doch genau das.

Delphi-Quellcode:
if RenameFile('C:\Steam\SteamApps\thisis4cs\counter-strike\cstrike\spritesm', 'C:\Steam\SteamApps\thisis4cs\counter-strike\cstrike\sprites') = True then
 ShowMessage('Umbenannt!');
edit: Erster Parameter ist der alte Name, der zweite der neue Name der Datei.
edit2: Wenn du einen CS installer schreiben willst, kannst du das (meißte) doch auch mit batch dateien erledigen.


Alle Zeitangaben in WEZ +1. Es ist jetzt 22:47 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz