Ver Mensaje Individual
  #1  
Antiguo 13-06-2007
Avatar de Caral
[Caral] Caral is offline
Miembro Premium
 
Registrado: ago 2006
Posts: 7.659
Reputación: 25
Caral Va por buen camino
Programa (Mini Tutorial) novatos

Primero que nada agradecer al club delphi por permitirme este espacio.
Este mini tutorial solo pretende explicar los conceptos básicos para empezar a trabajar con Delphi, para este se tendrán que tener algunos conocimientos mínimos, muy mínimos, como los míos, así que animo.
He de mencionar que en este ejemplo uso Access como base de datos, no solo por que es el que mas conozco sino por ser de mas fácil acceso al principio, en tal caso se podrá utilizar cualquier base de datos con este ejemplo.
Debo decir que soy como muchos de los que empiezan un novato (aunque digan lo contrario y de lo cual esto agradecido) y que hay muchas maneras de hacer lo mismo, esta es solo una de ellas y no necesariamente la mejor, os aconsejo que este lo toméis como un ejemplo mas (mini tutorial).
Recordad que se me puede pasar algo, así que preguntad sin problemas.
Insto a los maestros de este club, así como a todos los foristas a ayudar en este mini tutorial.
Este programa va a ser para el manejo de una cuenta bancaria:
Depósitos, cheques, transacciones, reportes (QReport).

Iniciemos por la base de datos, Access:
Creemos una nueva base de datos y creemos nuestra primera tabla, Usuarios:



Como veis la clave principal esta en CodUsuario.
Este nos va a servir para entrar en nuestro programa en Delphi.

Ahora creemos nuestra segunda tabla, Banco:



CodTransac = numérico, automático
Retiros, Depósitos, SaldoAnt, SaldoTotal = Numérico, Doble, automático.



Bueno ahora seguimos con Delphi:
Empecemos un nuevo proyecto:
Al primer Form lo vamos a llamar, Banco y lo vamos a guardar, en la carpeta que nos interese, puede ser en proyects, al unit lo vamos a llamar UBanco.
NOTA: Es muy importante ponerle nombres alusivos a los forms, units y demás componentes ya que se nos hará más fácil entender los programas (esto lo aprendí por supuesto en el club Delphi, donde mas).
Vamos a File, new, Datamodule, esto nos creara un datamodule1, lo guardamos en la misma carpeta del proyecto al unit lo vamos a llamar UDM.
Vamos a View Units, y veremos los dos units Ubanco y UDM creados, además de uno que se llama Proyect1, que es el unit por decirlo así principal.
Abrid el proyect1 y cambiad el orden de esta línea así:
Código Delphi [-]
Begin      
Application.Initialize;
Application.CreateForm(TDataModule1, DataModule1); Application.CreateForm(TBanco, Banco); 
Application.Run;    
End.
Como veis esto hace que el datamodule se inicialice primero.

Bueno seguimos con el datamodule:
Vamos a utilizar los componentes ADO, están en la paleta ado.
Por que estos componentes, porque así no tendremos problemas con alias, instalaciones y demás cosas que nos afecten a los novatos.
Bien colocamos en el datamodule un ADOConnection y le cambiamos el nombre a AC1. (Ado Connection 1), fácil de recordar.
Quedaría así:




Ahora vamos a tratar de conectarnos a la base de datos:
Le damos doble clic al AC1, y nos aparecerá esta pantalla:


Le damos clic a Build y aparecerá esta otra pantalla:


Como veis usaremos el Provider: Microsoft Jet 4.0 OLE Provider, le damos clic a Siguiente, esto nos pasara a la siguiente pestaña, Conexión:


Aquí le daremos clic al botón con tres puntos y buscaremos la base de datos en la carpeta donde la hallamos guardado, (recordad donde fue).
Ahora le daremos clic al botón Probar Conexión, si la conexión fue correcta, nos aparecerá una indicación diciendo que la prueba de conexión fue satisfactoria, dadle aceptar a todo para salir de estas pantallas, ya tenéis conexión Delphi, Access, que bien.
Bueno en el siguiente post Tratare de empezar con el programa.
Aqui esta la base de datos:
Edito: Aqui: http://www.terawiki.clubdelphi.com/D...32/Tutoriales/
Esta el codigo completo del tutorial, se llama (Mini Tutorial, novatos.zip)

Saludos

Última edición por Casimiro Notevi fecha: 04-01-2011 a las 02:44:32.
Responder Con Cita