Fórum Restore e Backup Mysql Delphi #524650

Olá pessoal!
Estou com um problema aqui o qual não consigo resolver.

Estou executado uma rotina para realizar a Restauração de bases de dados do MySQL, com a seguinte rotina:


//Essa rotina e o modelo para Restore
aux := 'cmd.exe /c " '+MeuDiretorio+'mysql -u root ';
aux := aux + 'basededados < ' + arquivo + '"';


if not createProcessSimple(aux) then
ShowMessage('RESTAURAÇÃO NÃO FOI PROCESSADA!')
else
begin
ShowMessage('Restauração Realizada!');
ShowMessage('SAIA DO SISTEMA E ENTRE NOVAMENTE');
btnRestaurar.Caption := 'Restaurar';
end;


function TfrmConfBd.CreateProcessSimple(cmd: string):boolean;
var SUInfo: TStartupInfo;
ProcInfo: TProcessInformation;
begin
FillChar(SUInfo, SizeOf(SUInfo), #0);
SUInfo.cb := SizeOf(SUInfo);
SUInfo.dwFlags := STARTF_USESHOWWINDOW;
SUInfo.wShowWindow := SW_HIDE;
result := CreateProcess(nil, PChar(cmd), nil, nil, false, CREATE_NEW_CONSOLE or NORMAL_PRIORITY_CLASS, nil, nil, SUInfo, ProcInfo);
if result then
begin
WaitForSingleObject(ProcInfo.hProcess, INFINITE);
CloseHandle(ProcInfo.hProcess);
CloseHandle(ProcInfo.hThread);
end;
end;



Na variável meu diretório eu estava pegando o diretório padrão do sistema(executável), onde coloquei o Mysqldump e o Mysql.
Agora quero ao invés de executar o Mysqldump e o Mysql de dentro da raiz do meu executável, executar de dentro da pasta BIN do mysql, porem, não funciona. Pego o diretório certinho da pasta BIN, mas ao rodar a rotina os Restores não são feitos e os Backups ficam vazios.