Ordner mit Inhalt Kopieren?

[TT73GP7]

Hallo zusammen,

ich stehe mal wieder auf dem schlauch
ich würde gerne einen Ordner Kopieren (mit Inhalt).

Irgendwie funktioniert mein Gedankengang gar nicht

kann mir da jemand mal auf die Sprünge helfen?

Code: Alles auswählen

Var mem : TMemoryStream;

    cID : String;
    cQuelle : String;
    cZiel   : String;
    cTag    : String;

begin
  mem := TMemoryStream.Create;
  cQuelle := DSJOB.DataSet.FieldByName('QuellPfad').ASString;
  cZiel   := DSJOB.DataSet.FieldByName('ZielPfad').ASString;

  cTag  := FormatDateTime('yyyymmdd', now);
  cZiel := cZiel+'\'+cTag;
  cQuelle := cQuelle+'\';

  mem.LoadFromFile(cQuelle);
  mem.SaveToFile(cZiel);

  mem.Free;

[Ally]

Hallo TT73GP7,

schaue dir doch mal CopyDirTree an, das könnte sein wonach du suchst.

https://lazarus-ccr.sourceforge.io/docs ... rtree.html

Gruß Roland

[TT73GP7]

ja sehr schön

das hat mir echt weitergeholfen

komisch nur das ich das nicht selbst gefunden hab
zwei stunden umsonst gesucht

vielen dank

[Winni]

Hi!

Tipp für das Suchen in den Sourcen:

cd /Pfad/zu/Lazarus

grep -iIr copydir *

Spart oft das Suchen in der großen Müllhalde aka Google.

Winni