datei von einem ordner in anderen ordner kopieren

[HofiderKill]

Hallo
ich bins schon wieder!
hab noch immer probleme mit meinem programm
ich habe 2 listboxen
in der ersten steht der komplette pfad der datei drinnen (es sind mehrere dateien)
in der zweiten listbox steht eine liste von interpreten , welche ich mir aus dem pfad ausgelesen habe!
ich möchte nun die erste datei aus der ersten ListBox in meinen ordner pfad+ListBox2.items[0](ist der erste interpret bei mir in der liste) kopieren
sprich ich habe als erste datei in der listbox1 stehen::

Code:

C:\Users\xyz\Desktop\test\Interpret1 - Titel1.mp3

und als erstes element in der listbox2:
Interpret1
stehen

nun möchte ich die Datei Interpret1 - Titel1.mp3 (wo mir der pfad bekannt ist) in den zuvor erstellten ordner Interpret1 der den Pfad hat

Code:

C:\Users\xyz\Desktop\testen\

kopieren
nebenbei habe ich die pfade mit inputboxen eingeben lassen, sprich sie sind als variable abgespeichert.
ich habe schon mit movefile herum experimentiert nur das funktioniert nicht!
ich hoffe ihr könnt mir helfen!!

mfg Florian

[DeddyH]

CopyFile

[HofiderKill]

also ich hab das jetzt mal mit meinem projekt versucht

Code:

von, nach: string;
begin

    von := LBmusiktitel.Items[0];


    nach := 'C:\Users\Florian\Desktop\testen\';

Copyfile(PChar(von),PChar(nach), true);

jetzt sollte er doch die datei die in da listbox an erster stelle steht in den ordner testen kopieren oder??
aber bei mir passiert nichts, keine meldung gar nichts

[shmia]

Für eine Fehlermeldung musst du selbst sorgen:

Delphi-Quellcode:

von, nach: string;
begin
  von := LBmusiktitel.Items[0];
  nach := 'C:\Users\Florian\Desktop\testen\';

  if not Copyfile(PChar(von),PChar(nach), true) then
  begin
    raise EWin32Error.Create(SysErrorMessage(GetLastError)+#13#10+von+' --> '+nach);
  end;

[HofiderKill]

ja ok danke aber ich versteh nicht warum er mir die datei nicht kopiert!! kann mir jemand dabei helfen??
das wär echt net!!

[shmia]

Zitat von HofiderKill:

ja ok danke aber ich versteh nicht warum er mir die datei nicht kopiert!!

Dann rate mal, wozu das SysErrorMessage(GetLastError) dasteht!
Vielleicht sagt Dir das Betriebssystem weshalb es nicht Kopieren mag....

[DeddyH]

Man sollte auch einen Dateinamen für die Zieldatei angeben.

[HofiderKill]

danke!! das war der fehler!!!
wuhuu ihr seits echt die besten! dankeschön

[p80286]

Wenn Du eine Datei kopieren willst,
dann solltest Du den voll qualifizierten Namen der Quelldatei
und
den vollqualifizierten Namen der Zieldatei angeben.

Dann gibt es auch keine Ausreden warum etwas nicht gemacht wurde.
(Es sei denn das Ziellaufwerk\Zielverzeichnis existiert nicht, die Rechte passen nicht ....)

Gruß
K-H

**** zu spät

[HofiderKill]

ok ja klar!
danke
habs eh noch gelesen! danke!