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 17-08-2006
ilichhernandez ilichhernandez is offline
Miembro
 
Registrado: oct 2005
Posts: 277
Poder: 20
ilichhernandez Va por buen camino
Problemas para guardar en la tabla

Hola amigos y colegas, tengo el siguiente problema, tengo unos campos dbedit, un par de memos y 2 image,un dbgrid , un componente tabla, una bd y un datasource, ahora bien necesito agregar registros (datos e imagenes) y no me guarda los datos ni imagenes.... aqui les envio de el codigo que tengo.....

Aqui esta el boton agregar, para realizar la insercion
Código Delphi [-]
procedure TForm1.cxButton1Click(Sender: TObject);
begin
table1.Insert;
end;
Aqui esta el codigo de la carga de imagen
Código Delphi [-]
procedure TForm1.dxButton1Click(Sender: TObject);
Var
  jpg : TJpegImage;
  Stream : TMemoryStream;

begin
  jpg := Nil;
  Stream := Nil;
  Try
    openpicturedialog1.Execute;
    edit1.Text := openpicturedialog1.FileName;
    Jpg := TJpegImage.Create;
    Jpg.LoadFromFile(openpicturedialog1.FileName);
    Stream := TMemoryStream.Create;
    Jpg.SaveToStream(Stream);
    Stream.Position := 0;
    cx_etiqueta.Picture.LoadFromFile(openpicturedialog1.FileName);
    TBlobField(Table1.FieldByName('foto_etiqueta')).LoadFromStream(Stream);
     except
      jpg.free;
      stream.Free;
      raise;
    end;
    jpg.free;
    stream.Free;
end;

Y evidentemente el codigo para salvar
Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin
table1.Post;
end;

Bueno espero que alguien pueda saber que es lo que no anda bien por aqui.... muchas gracias de antemanos....
__________________
[Lo que a veces es tan facil, a veces parece imposible]

Última edición por ilichhernandez fecha: 17-08-2006 a las 23:18:08.
Responder Con Cita
  #2  
Antiguo 17-08-2006
BLASS BLASS is offline
Registrado
 
Registrado: abr 2006
Posts: 2
Poder: 0
BLASS Va por buen camino
Sugerencias

Hola...

Recomendaciones......

Puedes almacenar las imagenes en un Folder común, el cual puedas enrutar desde tu aplicación.

En vez de descargar la imagen en la base de datos puedes guardar la ubicación del archivo de imagen.....

Utiliza Append en vez de Insert, te garantiza que siempre será el último registro.

Blass
Responder Con Cita
  #3  
Antiguo 17-08-2006
ilichhernandez ilichhernandez is offline
Miembro
 
Registrado: oct 2005
Posts: 277
Poder: 20
ilichhernandez Va por buen camino
Ok cambie el append por el insert, pero lo otro no lo puedo realizar, pues como es una aplicacion que trabajara en red no podria accesar las imagenes si lo realizao con los nombres y enrutandolos hacia las imagenes, si fuese local me serviria esa solucion pero en red o no se puede asi o yo no se como hacerlo..... gracias...
__________________
[Lo que a veces es tan facil, a veces parece imposible]
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
problemas para guardar Guadalupe .NET 2 27-05-2006 01:58:45
Problemas para guardar registros Nelly Varios 1 19-01-2006 23:22:02
Tabla a excel modificar y guardar en la tabla jgutti Servers 1 06-09-2004 16:20:49
Problemas para eliminar una tabla Eolo Firebird e Interbase 2 29-06-2004 21:24:01
Guardar imagenes en una tabla Jordy Conexión con bases de datos 3 04-07-2003 02:53:35


La franja horaria es GMT +2. Ahora son las 22:00:35.


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