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

 
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 29-08-2007
juangabriel1786 juangabriel1786 is offline
Miembro
 
Registrado: ene 2006
Posts: 38
Poder: 0
juangabriel1786 Va por buen camino
Red face Como isertar datos sin usar DBedit

Me gustaria saber como isertar datos sin usar DBedit en la base de datos, intente con esto

Código Delphi [-]
Tunidades.FieldByName('fecha_registro').Value:=DateToStr(Date);
   Tunidades.FieldByName('fecha_modificacion').Value:=DateToStr(Date);
   Tunidades.FieldByName('usuario_registro').Value:=usuario;
   Tunidades.FieldByName('usuario_modificacion').Value:=usuario;

pero me da un error al tratar de guardar los datos con esto

Código Delphi [-]
Tunidades.Edit;
  Tunidades.Post;
  Tunidades.Insert;
  Tunidades.Edit;

row cannot be located for updating, some values may have been changed since it was last read


La base de datos es Mysql usando ADO

este es el procedure de mi boton: que a la vez guarda y actualiza


Código Delphi [-]
procedure TFunidades.Button1Click(Sender: TObject);
var
   s:String;
begin
  s:='';
  //seleccionamos el campo activo o inactivo
  if RadioGroup1.ItemIndex = 0 then
       s:= 'A'
  else
       s:= 'I';
  DBactivo.Text:=s;
  
//aqui se guarda en la base de datos
  Tunidades.Edit;
  Tunidades.Post;
  Tunidades.Insert;
  Tunidades.Edit;

   //aqui estoy tratando de usignar datos a la base de datos, a parte de los datos que se asignan en el form
  
   Tunidades.FieldByName('fecha_registro').Value:=DateToStr(Date);
   Tunidades.FieldByName('fecha_modificacion').Value:=DateToStr(Date);
   Tunidades.FieldByName('usuario_registro').Value:=usuario;
   Tunidades.FieldByName('usuario_modificacion').Value:=usuario;}


  //conteo para llevar el codigo de la unidades contabilizado
  conteo:=conteo + 1;
  Tunidades.FieldByName('cod_unidad').Value:=conteo;

   DBedit2.SetFocus;

  showmessage('El registro se guardo satisfactoriamente');

end;

Última edición por juangabriel1786 fecha: 29-08-2007 a las 21:42:37.
Responder Con Cita
 



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
Usar Block de notas como Base de Datos edelphi Conexión con bases de datos 2 31-01-2007 04:21:16
como usar un dbrowse con dbedit en la misma tabla mcantob C++ Builder 0 23-11-2006 19:47:34
Como usar DNS con Bases de datos ClaudioGVera Conexión con bases de datos 0 13-05-2005 21:36:52
como enlazo una base de datos acces con un DBEdit Bitbanner Conexión con bases de datos 1 17-01-2005 18:42:51
como validar datos en el evento onkeypress de un dbedit? viajero2015 Varios 1 01-02-2004 21:41:59


La franja horaria es GMT +2. Ahora son las 01:45:04.


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