Ver Mensaje Individual
  #1  
Antiguo 12-08-2017
Djsilver5 Djsilver5 is offline
Miembro
NULL
 
Registrado: ago 2017
Posts: 22
Reputación: 0
Djsilver5 Va por buen camino
Question Crear login en delphi7 + Interbase

Buenas Tardes ojala me puedan ayudar soy nuevo en esto (principiante) pero estoy intentado hacer un login, la idea es que los DBLOOKUPCOMBOBOX (edtEmpresa, edtAgencia, edtUsuario) estén enlazados con el DBEDIT (edtPassword) todo enlazado con la base de datos de ibexpert que tengo es decir que cuando escribo el password del usuario seleccionado en (edtPassword) busca en la base de datos el mismo password del usuario y entra correctamente al FORM2 que tiene como nombre de (SistemaPrincipal) y cuando no es el password me salga un mensaje de incorrecto, en mi caso en ibexpert tengo las tablas que son EMPRESA, PUNTOS_DE_VENTAS, SIS_USUARIOS.
En la Tabla EMPRESA en la opcion datos se encuentra el DES_EMP (EL NOMBRE DE LA EMPRESA)
En la Tabla PUNTOS_DE_VENTAS en la opción datos se encuentra el DES_PTO.(EL NOMBRE DE LA OFICINA)
En la Tabla SIS_USUARIOS en la opción datos se encuentra el DES_USUARIO(EL NOMBRE DE USUARIO) y PWD_USUARIO.(LA CONTRASEÑA DEL USUARIO)


NOTA: YA TENGO CONECTADO EL INTERBASE CON DELPHI7 USANDO EL DATAMODULE1:

TENGO (IBDatabase1, IBTransaction1, IBSToredProc1) conectados.

y para el DBLOOKUPCOMBOBOX DE EMPRESA tengo IBTable con el nombre (IBTEmpresas), TDataSource con el nombre (DSEmpresas)
TIBQuery con el nombre(IBQEmpresas1) y TDataSource con el nombre(DSEmpresas1).


para el DBLOOKUPCOMBOBOX DE AGENCIA tengo IBTable con el nombre (IBTAgencia), TDataSource con el nombre (DSAgencia)
TIBQuery con el nombre(IBQAgencia1) y TDataSource con el nombre(DSAgencia1)


para el DBLOOKUPCOMBOBOX DE USUARIO tengo IBTable con el nombre (IBTUsuarios), TDataSource con el nombre (DSUsuarios)
TIBQuery con el nombre(IBQUsuarios1) y TDataSource con el nombre(DSUsuarios1)


para el DBEDIT DE PASSWORD tengo IBTable con el nombre (IBTPassword), TDataSource con el nombre (DSPassword)
TIBQuery con el nombre(IBQPassword1) y TDataSource con el nombre(DSPassword1)
Imágenes Adjuntas
Tipo de Archivo: jpg imagen.jpg (34,1 KB, 5 visitas)
Responder Con Cita