Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Conexión con bases de datos
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Conexión con bases de datos

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 11-01-2008
mzell mzell is offline
Registrado
 
Registrado: jul 2006
Ubicación: La Ceiba, Honduras
Posts: 7
Poder: 0
mzell Va por buen camino
Hola sdiaz1983.

Segun lo que veo, estás combinando dos metodos diferentes para realizar la actualización.

Puedes probar actualizarlo en las siguientes formas:
(estoy asumiendo que los EditBox ya tienen valores asignados)

Forma 1 (Utilizando metodos de dataset):
Código Delphi [-]
procedure TFrmClientes.BtEditarClick(Sender: TObject);
begin
{...}
QryCliente.Edit;
QueryCliente.FieldByName('Cedula').value := EdtCedula.Text;
QueryCliente.FieldByName('Nombre').value := EdtNombre.Text;
QueryCliente.FieldByName('Apellido').value := EdtApellido.Text;
QueryCliente.FieldByName('Telefono').value := EdtTelefono.Text;
QueryCliente.FieldByName('Direccion').value := EdtDireccion.Text;
QryCliente.Post;


Forma 2 (Utilizando los metodos de Query)
Código Delphi [-]
procedure TFrmClientes.BtEditarClick(Sender: TObject);
begin
{...}
QryCliente.SQL.Text:='update cliente set Cedula:=P1 and Nombre:=P2 and Apellido:=P3 and Telefono:=P4 and Direccion:=P5';
QryCliente.Params[0].AsString:=EdtCedula.Text;
QryCliente.Params[1].AsString:=Edtnombre.Text;
QryCliente.Params[2].AsString:=EdtApellido.Text;
QryCliente.Params[3].AsString:=EdtTelefono.Text;
QryCliente.Params[4].AsString:=EdtDireccion.Text;
QryCliente.ExecSQL;
end;

Espero que sea útil esta sugerencia.
Hasta luego.
Responder Con Cita
  #2  
Antiguo 11-01-2008
sdiaz1983 sdiaz1983 is offline
Miembro
 
Registrado: sep 2007
Posts: 52
Poder: 17
sdiaz1983 Va por buen camino
con respecto a su ayuda

Buen dia.

De antemano Le agradezco por haber respondido mi duda, pero probe ambas alternativas, en una me bota un error con respecto a la sentencia
Código Delphi [-]
QryCliente.ExecSql;
que me dice que invalid use of keyword token, y con respecto al otro metodo el registro me lo elimina.

Una cosa que queria depronto complementar es que yo los datos los ingreso al formulario, los editbox no tienen valores preasignados sino que yo se los ingreso estando el programa en ejecucion, no se entonces si en algo cambia las sentencias que usted me explico anteriormente.

Mil gracias por su ayuda y estare pendiente de su respuesta.
Responder Con Cita
Respuesta



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
Actualizar tabla con datos de otra tabla mediante UPDATE Rockin Firebird e Interbase 18 28-11-2007 19:15:42
Registros en DBGrid a una Tabla Paradox koalasoft Varios 9 10-10-2005 21:36:29
Recuperar registros borrados en tabla paradox rmnart Tablas planas 2 16-09-2005 00:58:34
Añadir registros de tabla paradox con asm ciscu Varios 8 03-05-2005 14:12:26
Como actualizar toda una tabla con bastantes registros? IcebergDelphi Firebird e Interbase 4 16-12-2003 14:08:00


La franja horaria es GMT +2. Ahora son las 01:03:20.


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