Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Tablas planas (https://www.clubdelphi.com/foros/forumdisplay.php?f=20)
-   -   Cierto error al ingresar datos en access (https://www.clubdelphi.com/foros/showthread.php?t=50798)

Snakerahj 28-11-2007 14:57:06

Cierto error al ingresar datos en access
 
Hola a todos, mi problema debe ser muy sencillo o puede ser muy claro, pero no puedo ver que esta pasando aqui... tengo una pequeña aplicacion que esta conectada a una base de datos en access. Se supone que la aplicacion recoje una serie de datos de un alumno y los inserta en la bd, y en realidad si lo hace, ahora bien, cuando doy click sobre el boton guardar lo tengo que hacer dos veces para que inserte los datos en access, de lo contrario no lo hace. miren, aqui esta el codigo de mi boton ojala y me puedan explicar que hacer.

Gracias.

procedure TForm1.Button1Click(Sender: TObject);
begin
ADOTable1.Insert;
ADOTable1.Fields.FieldByName('matricula').Text:=Edit2.Text;
ADOTable1.Fields.FieldByName('nombre').Text:= Edit1.Text;
ADOTable1.Fields.FieldByName('periodo').Text:= Edit3.Text;
ADOTable1.Fields.FieldByName('grupo').Text:= Edit4.Text;
end;

Snakerahj 28-11-2007 15:27:40

a mi mismo
 
Me respondo a mi mismo, mmm... bueno, en realidad es otra duda porque al parecer pude solucionar el problema sin embargo fue incluyendo una instruccion que creia solo tenia que poner una vez... miren:

procedure TForm1.Button1Click(Sender: TObject);
begin
ADOTable1.Insert;
ADOTable1.Fields.FieldByName('matricula').Text:=Edit2.Text;
ADOTable1.Fields.FieldByName('nombre').Text:= Edit1.Text;
ADOTable1.Fields.FieldByName('periodo').Text:= Edit3.Text;
ADOTable1.Fields.FieldByName('grupo').Text:= Edit4.Text;
ShowMessage('Registro Guardado');
Edit1.Text:='';
Edit2.Text:='';
Edit3.Text:='';
Edit4.Text:='';
ADOTable1.Insert;
end;

Alguien me puede explicar a que se debe esto?
me ocasionara algun problema?

egostar 28-11-2007 19:11:42

Cita:

Empezado por Snakerahj (Mensaje 248998)
Hola a todos, mi problema debe ser muy sencillo o puede ser muy claro, pero no puedo ver que esta pasando aqui... tengo una pequeña aplicacion que esta conectada a una base de datos en access. Se supone que la aplicacion recoje una serie de datos de un alumno y los inserta en la bd, y en realidad si lo hace, ahora bien, cuando doy click sobre el boton guardar lo tengo que hacer dos veces para que inserte los datos en access, de lo contrario no lo hace. miren, aqui esta el codigo de mi boton ojala y me puedan explicar que hacer.

Gracias.

Hola Snakerahj, bienvenido al club, te invito a que leas nuestra guia de estilo.

Pasando a tu problema, solo te falta realizar el post de los datos.

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin
  ADOTable1.Insert;
  ADOTable1.Fields.FieldByName('matricula').Text:=Edit2.Text;
  ADOTable1.Fields.FieldByName('nombre').Text:= Edit1.Text;
  ADOTable1.Fields.FieldByName('periodo').Text:= Edit3.Text;
  ADOTable1.Fields.FieldByName('grupo').Text:= Edit4.Text;
  ADOTable1.Post; // <----------
end;

Nota: Usa las etiquetas de delphi para que se entienda mejor el código, ves la diferencia?.

Salud OS

Snakerahj 29-11-2007 16:02:03

Otra pregunta
 
Gracias por tus respuestas, pero aqui te tengo mas...
mira... intento hacer un boton de busqueda con las instruccion
Pues pregunta es ¿como puedo moverme entre las tuplas de mi tabla?
porque con FindByName solo revisa el primer registro

jhonny 29-11-2007 17:13:20

Cita:

Empezado por Snakerahj (Mensaje 249273)
Gracias por tus respuestas, pero aqui te tengo mas...
mira... intento hacer un boton de busqueda con las instruccion
Pues pregunta es ¿como puedo moverme entre las tuplas de mi tabla?
porque con FindByName solo revisa el primer registro

Que es una tupla?, acaso es parte de alguna jerga o es es.wikipedia.org/wiki/Tupla ?

egostar 29-11-2007 17:18:02

Cita:

Empezado por Snakerahj (Mensaje 249273)
Gracias por tus respuestas, pero aqui te tengo mas...
mira... intento hacer un boton de busqueda con las instruccion
Pues pregunta es ¿como puedo moverme entre las tuplas de mi tabla?
porque con FindByName solo revisa el primer registro

Seria bueno que esta pregunta la hicieras en otro hilo, es importante ya que si alguien busca algo sobre esta pregunta tuya, nunca la podrá encontrar ya que nada tiene que ver con el titulo de este hilo.

Solo te comento que esto lo puedes hacer de varias formas, depende que es lo que quieres hacer y que quieres mostrar, abre un hilo nuevo con tu duda explicando que quieres hacer con detalle y seguro que tendrás mucha ayuda al respecto, no te limites en cuanto a escribir :).

Ya has intentado hacer una busqueda en el foro?

Salud OS

Snakerahj 29-11-2007 18:21:49

Tupla
 
Una tupla en una bd es por ejemplo...

tienes que una entidad estudiante contiene como atributos o campos: matricula, nombre, grupo, numero de inscripcion

entonces una tupla puede ser:

S05006666, Juan Alberto Perez, 103, 2ª

jhonny 29-11-2007 18:27:46

Cita:

Empezado por Snakerahj (Mensaje 249337)
Una tupla en una bd es por ejemplo...

tienes que una entidad estudiante contiene como atributos o campos: matricula, nombre, grupo, numero de inscripcion

entonces una tupla puede ser:

S05006666, Juan Alberto Perez, 103, 2ª

Ahhh, ya te entiendo, osea un tupla es lo mismo que un registro en una tabla :).

Para recorrer esos registros basta con hacer algo como:

Código Delphi [-]
Dataset.First;
While not Dataset.Eof do
begin
  //Aqui capturas y/o haces lo que tengas que hacer con el registro en cuestión :).
DataSet.Next;
end;

De todas formas, si requieres una aclaración mas detallada del asunto, sería bueno que sigas la recomendación que te a dado egostar, de esa manera estaremos pensando en las personas que a futuro tengan esta misma duda ;).

Snakerahj 29-11-2007 18:34:22

Thank's
 
Gracias, lo voy a probar


La franja horaria es GMT +2. Ahora son las 23:22:55.

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