Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Coloboración Paypal con ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 23-07-2011
avila avila is offline
Miembro
 
Registrado: may 2011
Posts: 13
Poder: 0
avila Va por buen camino
ADOQuery guardar datos

Hola a todos:
Necesito saber si hay otra forma de guardar datos capturados a traves de Edits? usando un ADOQuery, éste es el único código que me ha funcionado pero quiero saber si lo estoy escribiendo bien y para que sirve "SQL.Close", me he dado cuenta que para delphi es indiferente si lo incluyo. También me he dado cuenta que al ingresar datos en verdad cierra la tabla que estoy consultando, cómo puedo abrirla nuevamente?

Código Delphi [-]


procedure TfrmProductos.btnGuardarClick(Sender: TObject);
begin
  With detalleGral do
  begin
   SQL.Clear;
   SQL.Add('insert into detalleGral (fecha,cod_producto,cantidad,' );
   SQL.Add('observaciones,no_inventario,id_cuenta) values(');
   SQL.Add(''+QuotedStr(MaskFecha.Text)+','+QuotedStr(EditCodProd.Text)+','+QuotedStr(EditCantidad.Text  )+',');
   SQL.Add(''+QuotedStr(EditObs.Text)+','+QuotedStr(EditInventa.Text)+','+QuotedStr(EditCta.Text)+')');
   ExecSQL;
end;
Responder Con Cita
  #2  
Antiguo 23-07-2011
avila avila is offline
Miembro
 
Registrado: may 2011
Posts: 13
Poder: 0
avila Va por buen camino
Código Delphi [-]

...
SQL.Clear;
SQL.Close:   // Para que sirve esta instrucción???
...
Hay otra manera de guardar datos con istrucciones SQL????
Responder Con Cita
  #3  
Antiguo 23-07-2011
Avatar de Caral
[Caral] Caral is offline
Miembro Premium
 
Registrado: ago 2006
Posts: 7.659
Poder: 26
Caral Va por buen camino
Hola
Cuando se usa ADD en el sql si se quiere volver a hacer la insercion o consulta es necesario borrar la anterior, por eso se usa Clear.
Si no se quiere tener ese problema se usa TEXT.
Código Delphi [-]
 With detalleGral do
  begin
   SQL.Text:= 'insert into detalleGral (fecha,cod_producto,cantidad, '+
              'observaciones,no_inventario,id_cuenta) '+
              'values( :MFech, :CodProd, :Cant, :Obs, :Inven, :Cta)';
   Parameters[0].Value:= MaskFecha.Text;
   Parameters[1].Value:= EditCodProd.Text;
   Parameters[2].Value:= EditCantidad.Text;
   Parameters[3].Value:= EditObs.Text;
   Parameters[4].Value:= EditInventa.Text;
   Parameters[5].Value:= EditCta.Text;
   ExecSQL;
Ademas es mas cómodo y se define mejor usando parametros en la consulta, asi se evitan errores.
Saludos
__________________
Siempre Novato
Responder Con Cita
  #4  
Antiguo 23-07-2011
avila avila is offline
Miembro
 
Registrado: may 2011
Posts: 13
Poder: 0
avila Va por buen camino
Que buen consejo, muchisimas gracias Caral, lo he probado y en verdad es mucho más cómodo. Saludos y estamos en contacto.
Responder Con Cita
  #5  
Antiguo 23-07-2011
avila avila is offline
Miembro
 
Registrado: may 2011
Posts: 13
Poder: 0
avila Va por buen camino
Nuevamente:

Utilizando esta técnica que me acosejo Caral, consigo grabar datos a mi tabla, pero, necesito visualizar estos datos a través de un DBGrid cuando estoy grabandolos, pero cuando lo hago a través de un botón btnGrabar el DBGrid deja de mostrarme los datos, como que cerrara el Query o el DataSource, ¿Cómo puedo hacer tal cosa? ingresar mis datos, grabarlos y que se vean estos en el DBGrid, ¿cómo?

Código Delphi [-]

procedure TForm2.btnGrabarClick(Sender: TObject);
begin
   With Query do
   begin
     SQL.Text:= 'insert into cuentas(id_cuenta,cuenta)' +
     'values(:id_cuenta,:cuenta)';
     Parameters[0].value:= Edit1.Text;
     Parameters[1].value:= Edit2.Text;
     ExecSQL;
   end;
end;
Responder Con Cita
  #6  
Antiguo 24-07-2011
Avatar de Caral
[Caral] Caral is offline
Miembro Premium
 
Registrado: ago 2006
Posts: 7.659
Poder: 26
Caral Va por buen camino
Hola
El BGGrid esta ligado a algo como un adotable o un adoquery.
Si abres y cierras estos lo hara.
Saludos
__________________
Siempre Novato
Responder Con Cita
Respuesta


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Mostrar datos de un ADOQuery en un DBGrid Usuaria1980 Varios 21 14-04-2011 17:40:39
Guardar datos de ADOquery LoganFenix Conexión con bases de datos 2 12-09-2008 19:59:25
Modificar Datos con ADOQuery estopi Conexión con bases de datos 4 21-11-2006 17:25:56
ADOquery insertar datos sakuragi Conexión con bases de datos 3 08-12-2004 15:10:23
Pasar datos de un Adoquery a un ListBox1 danytorres Varios 6 09-05-2003 03:16:37


La franja horaria es GMT +2. Ahora son las 01:39:33.


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