backup prog

Prøv det her, du skal huske at tilføje FileCtrl i uses:

procedure TForm1.Button1Click(Sender: TObject);
var
  Bibliotek: String;
begin
  if SelectDirectory(\'Hvor skal filen gemmes?\' {Bliver brugt som en overskrift}
                    ,\'\' {Roden hvis du skriver C:\\Dokumenter vil det biblitek være øverst i listen}
                    , Bibliotek {Her gemmes det valgte bibliotek}) then
  begin
    //Koden til at gemme filen her
  end;
end;

Hvorfor bruger du ikke WinExec og så copy eller Xcopy
Fx.
WinExec(\'command.com /c copy <fra katalog> <til katalog>,SW_SHOWNORMAL);
eller
WinExec(\'command.com xcopy.exe <fra katalog> <til katalog> /s,SW_SHOWNORMAL);
/s hvis du skal ha\' underkataloger med.

det er jo det der <til katalog> jeg skal bruge koden til at finde

hey.... det virker jo som det skal.
tak xs2k

sorry nca det var ikke det jeg søgte

Kan du ikke selv bestemme hvor du vil ha\' dine backup\'s liggende?

den skal spørge hvor jeg vil have backupen liggene
og det gør den med selectdirectory

OK, jeg har forstået :-)