
Estoy desarrollando un sistema para un colegio que registre las inscripciones y su respectivo control de aportes para la materia de computación.
El programa que utilizo: Delphi 6
Manejador de BdD's: Microsoft Access
PROBLEMA(S):
- La Bd tiene una contraseña de apertura, desde el Programa no logro abrir esta base (bueno lo q quiero es q no me aparezca el cuadro login, en vez de esto q lo haga el prg), trato de hacer con el ADOConnection pero no me resulta, esta es el codigo que utilizo en el evento oncreate de la form:
var PathBDMaestro:String[255];
...
PathBDMaestro:=ExtractFilePath(Application.ExeName )+'BD_Cole.mdb';
DM.ADOConnection1.Connected :=false; DM.ADOConnection1.ConnectionString:='Provider=Micr osoft.Jet.OLEDB.4.0;'+
'User ID=Admin-RMA;'+
'Password=colegio;'+
'Data Source='+pathBDMaestro+
';Persist Security Info=False';
DM.ADOConnection1.Connected :=true;
Me muestra este msge: Access violation at address 004CBF92 in module 'SisCole.exe'. Read of address 00000060.¿Cuál es la forma de conectarse desde un PRG en ejecución a una BD con contraseña?. Por fa necesito resolver esto...!!!
Miren...!!! me di cuenta este ultimo, antes para q no aparezca el login de la BD sin contraseña, lo solucionaba con TDataBaseName con sus propiedades loginPrompt y KeepConnection poniendolos a False y ahora con o sin contraseña de la BD y anque cambien estas dos propiedades me sigue saliendo el Login QUE NO QUIEROOOOOOOO....... Ayudenme..... ¿será que se ha guardado en alguna parte esta configuración y que antes no había?
- Mi siguiente consulta es la pelea con un DBGrid (Rejilla de BD), deseo grabar en ancho de las columnas (en el Registro de Windows) y el codigo de grabacion al salir del programa es:
resourcestring Registro_d_Ap = '\Software\RMA_Soft_System\MiAplicacion';
...
with TRegIniFile.Create(Registro_d_Ap+'\Rejillas\'+
Self.Name+'.'+DBGrid1.Name) do
Try
for i:=0 to DBGrid1.Columns.Count-1 do
with DBGrid1.Columns.Items[i] do
WriteInteger('Width',FieldName,Width);
Finally
Free;
End;
y al ingresar al programa (que lea los valores guardados):
with TRegIniFile.Create(Registro_d_Ap+'\Rejillas\'+
Self.Name+'.'+DBGrid1.Name) do
Try
for i:=0 to DBGrid1.Columns.Count-1 do
with DBGrid1.Columns.Items[i] do
Width:=ReadInteger('Width',FieldName,Width);
Finally
ShowMessage('Error al cargar datos....');
Free;
End;El problema emerge al cargar los valores guardados, revisándolo el registro despues de ejecutar el programa guarda bien en la direccion específica, pero no me resulta al cargar estos valores.... creo que le da una pasada y en la proxima salta al mensaje.
Tal ves otra forma de guardar tamaños de campos??????


Yo se que ustedes hermanos me pueden dar una mano, estoy muy agradecido de antemano, mil gracias
