Ir para conteúdo
Fórum Script Brasil
  • 0

Problemas Com O Clientdataset


Guest - Amauri -

Pergunta

Guest - Amauri -

Olá pessoal estou com o seguinte problema.

O Negócio é o seguinte,

Tenho uma função que funciona perfeitamente a muito tempo, ela pega uma imagem no banco de dados e a exibe em um TImage na tela.

Acontece que quando tento executa-la utilizando um ClientDataSet no ponto que está marcado com * ele me da o seguinte erro.

Etream Read Error

Eu só alterei os nomes das querys para os nomes do clientdataset, estou utilizando a mesma base de dados, a mesma plataforma tudo igualzinho, a única diferença é que as querys estão na estação local e o clientdataset está em uma estação que está buscando os dados em um servidor de aplicação, mas a base é a mesma o banco é o mesmo (Firebird 2).

Alguém sabe o que acontece

procedure TForm2.DataSource1DataChange(Sender: TObject; Field: TField);

var

BlobStream : TStream;

JPEGImage : TJPEGImage;

BMPImage : TBitMap;

begin

//Mostrar a Foto Na Tela

if ClientDataSet1Vb_Fotografia_Dep.BlobSize <> 0 then

begin

*******************************************************

linha anode ocorre o erro

*******************************************************

BlobStream:= ClientDataSet1.CreateBlobStream ClientDataSet1Vb_Fotografia_Dep,bmRead);

*******************************************************

*******************************************************

JPEGImage:= TJPEGImage.Create;

BMPImage := TBitMap.Create;

try

BMPImage.LoadFromStream(BlobStream);

JPEGImage.LoadFromStream(BlobStream);

Form2.Image1.Picture.Assign(BMPImage);

finally

BlobStream.Free;

JPEGImage.Free;

BMPImage.Free;

end;

end

else Form2.Image1.Picture:=nil;

end;

Detalhe: Eu já tentei usar o DBIMAGE mas ele me da o mesmo erro

Link para o comentário
Compartilhar em outros sites

2 respostass a esta questão

Posts Recomendados

Participe da discussão

Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152,3k
    • Posts
      652,3k
×
×
  • Criar Novo...