Создание дампа MySQL

[Dozent]

ну я в cmd запустил, ошибок не было)

C:\HairSalon\Win32\Debug>mysqldump -uroot -hlocalhost -p$erver hairsalon < C:\Ha
irSalon\Win32\Debug\Data\BackUp\hairsalon.sql

и в конце

-- Dump completed on 2013-11-09 23:50:30

[Dozent]

всё нащёл ошибку

procedure TfrmBase.Button1Click(Sender: TObject);
var
  C: Cardinal;
  SDir, S, FName: AnsiString;
  ParamString: string;
begin
  if odRestore.Execute then
  begin
    FName := odRestore.FileName;
    SDir := ExtractFilePath(Application.exename);
    S := adConnection.Params.Values['Database'];
    ParamString := Format('/c mysql -uroot -hlocalhost -p$erver %s < %s',
      [S, FName]) + #0;
    C := ShellExecute(0, nil, 'cmd.exe', pwidechar(ParamString), nil, SW_HIDE);
    adConnection.Connected := False;
    adConnection.Connected := True;
  end;
end;