Listo amigos ya consegui cual era mi problema
estaba haciendo
Código Delphi
[-]
r.OpenKey('SOFTWARE\ODBC\ODBC.INI\MyOdbc',true);
y la clave no existia
entonces antes de esto
hice un
Código Delphi
[-]
r.CreateKey('SOFTWARE\ODBC\ODBC.INI\MyOdbc');
y aparte de eso tambien me estaba faltando escribir
Código Delphi
[-]
r := TRegistry.create;
r.RootKey:= HKEY_LOCAL_MACHINE;
r.OpenKey('SOFTWARE\ODBC\ODBC.INI\ODBC Data Sources',true);
r.WriteString('MyOdbc','MySQL ODBC 5.1 Driver');
r.CloseKey;
r.Free;
Gracias por la ayuda y espero que este aporte le sea util a cualquier otra persona