Código Delphi [-] FileRun1.Parameters := '"' + ExtractFilePath(Application.ExeName) + 'Backupbd\' + Edit1.Text + '.zip" "' + ExtractFilePath(Application.ExeName) + 'bd\*.*"';
FileRun1.Parameters := '"' + ExtractFilePath(Application.ExeName) + 'Backupbd\' + Edit1.Text + '.zip" "' + ExtractFilePath(Application.ExeName) + 'bd\*.*"';