[ '(' erwartet, aber ';' gefunden ] nach CopyFile

[mkinzler]

Dein Einrücken verwirrt mich

Delphi-Quellcode:

procedure start;
begin
  MsgDlg1:= MessageDlg('Backup Anlegen ?', mtConfirmation, [mbYes, mbNo], 0);
  if MsgDlg1= mrYes then
  begin
    namen;
    if not DirectoryExists('bak') then mkdir('bak');
    upd;
  end
  else
  begin
    upd;
  end;
end;