Flyt en fil.

Brug denne WinAPI function ( Og kig selv i hjælpen inden du spørger, næste gang )

The MoveFileEx function renames an existing file or directory.

BOOL MoveFileEx(

    LPCTSTR lpExistingFileName,    // address of name of the existing file 
    LPCTSTR lpNewFileName,    // address of new name for the file
    DWORD dwFlags     // flag to determine how to move file
  );

I Delphi help siges der, at man ikke kan kopiere en file direkte, men at du skal benytte Windows API CopyFile eller MoveFile functionerne direkte.

det her virker hvis jeg kopier før jeg skriver til filen..
men der sker ikke noget efter jeg har skrevet til filen.

jeg har prøvet closefile men får bare en I/o fejl

var
  myFile : File;
  text  : string;
begin
  AssignFile(myFile, AppPath + 'data.db');
  CloseFile(myFile);
end;

if savedialog.Execute then
begin
  MoveFileEx(
  Pchar(AppPath + 'data.db'),
  Pchar(savedialog.FileName),
  MOVEFILE_COPY_ALLOWED);
end;

har du checket om den retunerer true og evt hvad fejl kode den giver ?

Det virker jo så du får dine point, det andet må jeg selv ligge og rode med