Hola
Como ya tenemos casi todo listo y tenemos una tabla USUARIOS creada lo logico es hacer un Form para loguearnos, entonces crearemos un form mas.
Como siempre:
File New, Form.
Esto nos creara el form2 que es el que iniciara el programa:
Arrastremos al nuevo form:
2 Edit.
2 Label
2 Botones
1 IBQuery (de la paleta Interbase)
Cambiemos el Name del form por FLogin, quedaria asi:
Bien, ahora nos queda poner el codigo que necesitamos:
Empecemos por el IBQuery:
En la propiedad Database pondremos la direccion de la IBDatabase:
DataModule2.IBDatabase1
En la propiedad SQL (strings) presionaremos el boton y nos saldra una pantalla:
En este caso solo tendremos la Tabla Usuarios, escribiremos esto:
Código SQL
[-]SELECT CodUsuario, Nombre, Clave FROM Usuarios WHERE
CodUsuario = :cod
Quedara asi:
Presionamos OK.
Ahora en la propiedad Params del IBQuery, presionamos el boton y nos saldra una pequeña pantalla, ahi cambiaremos algunos datos, quedara asi:
Segimos con los botones.
Saludos
Continua....