Fórum Gravar imagens em SQLServer #324075
22/06/2006
0
Amigos!
Uso o delphi5 com SQLServer2005. Estou tentando colocar uma imagem,
a qual eu scanneio e coloco em um componente TImage, que eu chamo de Iamge1.
Gostaria de saber como eu faço para passá-la diretamente em formato JPEG para o BD.
Usando o formato .bmp faço assim e dá certo:
[b:53a2911807] QDet_Capa.Parameters[1].Assign(Image1.Picture.Bitmap);[/b:53a2911807]
Porém se eu tento converter Image1 para .jpeg através de
[b:53a2911807]JPEG.Assign(Image1.Picture.Bitmap);[/b:53a2911807]
e tento carregar através de
[b:53a2911807]QDet_Capa.Parameters[1].Assign(JPEG);[/b:53a2911807]
eu obtenho uma mensagem de erro. QDet_Capa é um TADOCommand
que tem a seguinte instrução:
[b:53a2911807]insert into DETALHE_CAPA
(COD_PRODUTO, IMAGEM_CAPA, COMENTARIO_CAPA)
values
(:p1, :p2, :p3)[/b:53a2911807]
Pesquisei as mensagens do fórum e pelo que ví teria que salvar
a imagem no disco para depois chamá-la através de um
TFileStream... não tem como fazer isso sem salvar em disco e
carregar novamente?
Uso o delphi5 com SQLServer2005. Estou tentando colocar uma imagem,
a qual eu scanneio e coloco em um componente TImage, que eu chamo de Iamge1.
Gostaria de saber como eu faço para passá-la diretamente em formato JPEG para o BD.
Usando o formato .bmp faço assim e dá certo:
[b:53a2911807] QDet_Capa.Parameters[1].Assign(Image1.Picture.Bitmap);[/b:53a2911807]
Porém se eu tento converter Image1 para .jpeg através de
[b:53a2911807]JPEG.Assign(Image1.Picture.Bitmap);[/b:53a2911807]
e tento carregar através de
[b:53a2911807]QDet_Capa.Parameters[1].Assign(JPEG);[/b:53a2911807]
eu obtenho uma mensagem de erro. QDet_Capa é um TADOCommand
que tem a seguinte instrução:
[b:53a2911807]insert into DETALHE_CAPA
(COD_PRODUTO, IMAGEM_CAPA, COMENTARIO_CAPA)
values
(:p1, :p2, :p3)[/b:53a2911807]
Pesquisei as mensagens do fórum e pelo que ví teria que salvar
a imagem no disco para depois chamá-la através de um
TFileStream... não tem como fazer isso sem salvar em disco e
carregar novamente?
Luis.wolff
Curtir tópico
+ 0
Responder
Posts
23/06/2006
Luis.wolff
problema resolvido.. foi só usar um TMemoryStream.. Abraços...
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)