primero creas un archivo en el block de notas 
copia lo mismo que pones en el evento open de la aplicacion en el block de notas
y lo guardas  ejm profile.ini
ejemplo:
[SQLCA]
dbms = "ODBC"
luego en el evento open de tu aplicacion declaras
string ls_ruta
ls_ruta = 'c:profile.ini'
sqlca.dbms = profilestring(ls_ruta, 'SQLCA', "dbms", " ")
(La ruta es la ubicacion del archivo ini, SQLCA es el nombre o titulo en el archivo ini [SQLCA],  dbms es el nombre de la variable que se encuentra del tro de sqlca, y los espacios en blanco es cuando en esa bariable no se encuentra ningun valor  )
Y ASI SUCESIVAMENTE PARA TODOS ...
si necesitas ayuda escribeme a
josepalomino24@hotmail.com