Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Conexión con bases de datos (https://www.clubdelphi.com/foros/forumdisplay.php?f=2)
-   -   Aplicacion de delphi con tablas en database desktop (https://www.clubdelphi.com/foros/showthread.php?t=74975)

Siloé 21-07-2011 23:31:57

Aplicacion de delphi con tablas en database desktop
 
Hola, mi nombre es elisa:
Estoy en ultimo año del secundario, en una tecnica y tengo que hacer un sistema en delphi 5. Eleji hacer un sistema que calcule presupuestos para la industria textil, el problema es que no se nada de delphi, he leido varios libros y buscado en varios lugares, pero la verdad es que no entiendo como hablan.
Mi problema es ese, que me surjen preguntas como por ejemplo ¿como hago para conectar las tablas hechas en database desktop con la pantalla de delphi, para que me aparesca en un DBGrid, y que no se pueda modificar su contenido?. Pero cuando pregunto o busco en internet no entiendo nada de lo que me dicen.
En este momento estoy buscando como hacer para que lo que escriba en un Edit o en un DBEdit se guarde en la tabla, hasta ahora hice esto con un edit:
en el button guardar:
with avios.table1 do
begin
insert
fieldbyname('Nombre').value:=ednombre.text;
fieldbyname('Color').value:=edcolor.text;

*los avios son la materia prima como botones, cierres, hilo, etc. esas cosas que se necesitan para hacer una prenda (ropa).
*Esta es la tabla de avios.
Los datos string los guarda pero no se como hacer para que guarde los datos como la cantidad de avios con el que cuenta el usuario, el precio del avio (osea numeros), etc.
Si me pueden ayudar se los agradezco muchisimo¡ Gracias...

Casimiro Noteví 21-07-2011 23:51:35

El problema es que si no entiendes nada de lo que dicen los libros, ¿qué te vamos a decir nosotros?.
En nuestro FTP hay programas completos, trucos, tutoriales, libros, etc. échale un vistazo y luego nos comunicas las dudas.
Aquí tiene uno de los mejores libros que existen para delphi y bases de datos.

oscarac 21-07-2011 23:57:59

la mejor manera de aprender es practicando
saludos desde lima

cloayza 22-07-2011 17:02:12

Bueno haber si te puedo dar luces sobre tu pregunta.

Primero supongo que tienes nociones de programación!!!;)

Crear Tablas: Para crear tablas puedes utilizar el Database Desktop, puedes usar tablas DBF o Paradox, la eleccion es tuya...

Acceso a Datos: Existen componentes que te permiten acceder a los datos de la tablas que creaste, para ello tienes
  • TTable
  • TQuery

Fuente de datos: Es el componente que permite hacer el enlace entre los datos de las tablas y los componentes visuales este es llamado TDatasource

Controles de Datos: Son los que se utilizan para desplegar la información de los campos de cada tabla en los formularios, cada uno de ellos debe estar asociado a un TDatasource.
  • TDBGrid
  • TDBNavigator
  • TDBEdit
  • TDBText
  • TDBMemo
    ...

Ejemplo:
tDatos: TTable que accedera a una tabla llamada Datos.dbf.
dsDatos: TDatasource enlazada a Datos
gDatos: TDBGrid Grilla que mostrara los datos

Código Delphi [-]
tDatos.Databasename:='c:\Tus_Datos';  //Indicando directorio donde estan los datos
tDatos.TableName:='Datos.dbf'; //Tabla que se quiere accesar
tDatos.Active:=True;  //Se abre la tabla
dsDatos.Dataset:=tDatos; //Asociando la tabla al datasource.
gDatos.Datasource:=dsDatos; //Asociando a la DBGrid.

En este punto ya estaras viendo los datos en un agrilla.

tDatos.Edit: Entrar en modo edición (modificacion de datos).
tDatos.Insert: Entrar en modo inserción de registros .
tDatos.Append: Igual a modo Insert, pero agrega el registro al final.
tDatos.Cancel: Cancela los cambos al registro.
tDatos.Post: Guarda los cambios realizados.
tDatos.Delete:Elimina un registro.

tDatos.First: Se mueve al primer registro de la tabla:
tDatos.Next: Se mueve al siguiente registro.
tDatos.Prior: Se mueve al registro anterior.
tDatos.Last: Se mueve al ultimo registro.

Como accesar los campos?.
Forma 1:
tDatos.FieldByName('Campo').AsInteger
tDatos.FieldByName('Campo').AsString
tDatos.FieldByName('Campo').AsFloat
tDatos.FieldByName('Campo').AsBoolean
tDatos.FieldByName('Campo').AsDate

Forma 2: Campos persistenes (haciendo doble click sobre el TTable, puedes seleccionar que campos deseas hacer persistentes).

tDatosCAMPO1.AsInteger
tDatosCAMPO2.AsString
tDatosCAMPO3.AsFloat
tDatosCAMPO4.AsBoolean
tDatosCAMPO5.AsDate

Me aburri...:D

Bueno eso por ahora...Espero te ayude.

Siloé 22-07-2011 21:02:22

Gracias, me re sirvió muchisimo¡. No es que no entienda NADA de lo que lei de los libros, pero si me cuesta un poco cuando lo voy a poner en practica, por ejemplo cuando me surge una pregunta o me trabo en algo en especifico.
De igual manera te agradezco muchisimo por que en verdad me sirvio mucho.
*Espero no haberte molestado, escribiste un monton y te habras cansado jaja... pero Gracias¡¡


La franja horaria es GMT +2. Ahora son las 16:31:53.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi