Olá,
eu gravo uma imagem no banco de dados firebird, mas não estou
conseguindo apresentá-la eu um tib_image. O código usado é este
abaixo, cujo qual consegui de exemplo consultando inúmeros fóruns e
inclusive no livro firebird essencial. Neste caso estou querendo
apresentar uma imagem de extensão bmp já gravada no seu respectivo
campo no banco de dados, mas este código apresenta erro logo na
primeira linha. O erro é o seguinte: "Tipos
incompatíveis 'Tib_BlobStreamMode' e 'Tib_BlobStreamMode'" e o curso
fica posicionado no bmread. No banco de dados, meu campo blob
responsável por armazenar as imagens chama-se foto é do subtipo
binário e tamanho 80. Estou aberto à qualquer discussão.
Desde já agradeço
stream := dmc.IB_QryFuncionario.CreateBlobStream
(dmc.IB_QryFuncionario.fieldByName('FOTO'), bmread);
Bmp := TBitMap.create;
try
bmp.loadfromstream(stream);
ib_image.Picture.Assign(bmp);
finally
bmp.Free;
end;
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]
Links do Yahoo! Grupos
<*> Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
<*> Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
