FileListBox Dateien speichern

[capo]

Hi,
ich bekomme in einer FileListBox die Dateien eines Ordners angezeigt, nun möchte ich die Dateien in einem anderen Ordner speichern.
Nicht alle sondern nur die Textdateien.
Jemand eine Idee?
CopyFile(Pchar(FileListBox.FileName) Damit klappt das nicht.

gruss vom capo

[Larsi]

hi ich hab das bei meinem musicplayer mal mit selected gemacht das er den makierten wert immer nimmt und dann den nächsten selektiert.
das kriegste bestimmt hin!

[Blackheart]

Zitat von capo:

Hi,
ich bekomme in einer FileListBox die Dateien eines Ordners angezeigt, nun möchte ich die Dateien in einem anderen Ordner speichern.
Nicht alle sondern nur die Textdateien.
Jemand eine Idee?
CopyFile(Pchar(FileListBox.FileName) Damit klappt das nicht.

gruss vom capo

Schau Dir mal an was die function CopyFile für Parameter erwartet dann weisst Du warum das nicht klappt.

[lbccaleb]

hy there,

ich hab dir da mal was vorbereitet, du musst das nur noch nen bissel für dich umschreiben, je nachdem wie du es genau brauchst, ich hoff mal es hilft dir.... das musst du in ein FileListBox1Change dafür belegen!!!

Delphi-Quellcode:

procedure TForm1.FileListBox1Change(Sender: TObject);
var
i: integer;
  begin;
    for i := 1 to filelistbox1.Count -1 do
      if lowercase(ExtractFileExt(filelistbox1.Items.ValueFromIndex[i])) = '.txt' then
        copyfile(PChar(filelistbox1.Items.ValueFromIndex[i]), 'meinedatei.txt', true); //true oder false musst in der win32api   hilfe nach lesen, jenachdem wie du es brauchst...
        // und das meinedatei.txt musst du noch so verändern, das er immer eine neue anlegt, und nicht immer nur in "meinedatei.txt" speichern will
end;

mfg

[capo]

Danke für die Hilfe.

gruss capo