Gravar e Ler campo de Imagem no Interbase.
Olá, pessoal.
Estou procurando a forma de gravar e ler imagens em campo blob do Interbase/Firebird.
Preciso de algo que funcione, pois já tentei varias formas e ainda não deu certo.
Sem Mais, Agradeço desde já.
jrvecchi@zipmail.com.br
Estou procurando a forma de gravar e ler imagens em campo blob do Interbase/Firebird.
Preciso de algo que funcione, pois já tentei varias formas e ainda não deu certo.
Sem Mais, Agradeço desde já.
jrvecchi@zipmail.com.br
Ovidio
Curtidas 0
Respostas
Salomao
18/06/2003
Caro amigo!
mande-me um e-mail que mandarei um exemplo!
salomaosoares@bol.com.br
mande-me um e-mail que mandarei um exemplo!
salomaosoares@bol.com.br
GOSTEI 0
Lindomir
18/06/2003
Olha amigo eu te aconselho a gravar somente o path da imagem e gravar a imagem em uma pasta, e toda vez que o seu aplicativo for recupera-la basta seguir o caminho gravado no campo tipo string
GOSTEI 0
Dfran
18/06/2003
Olá Ovidio.
No banco de dados, crie um campo tipo Blob, sub type 1, segment size 1.
No Delphi, no onclick de um botão, por exemplo, use o seguinte:
[b:5991a549be]var
Imagem: TFileStream;
begin
diagLocalizarImagem.Execute; // executa uma caixa de diálogo
Imagem := TFileStream.Create(diagLocalizarImagem.FileName, fmOpenRead or fmShareDenyWrite);
try
dmGeral.DadosDoClienteLogotipo.LoadFromStream(Imagem);
finally
Imagem.Free;
end;
[/b:5991a549be]
[i:5991a549be] onde:
[b:5991a549be]dmGeral: data module onde está a tabela;
DadosDoCliente: tabela IB dentro do Delphi;
Logotipo: nome do campo que receberá os dados[/b:5991a549be][/i:5991a549be]
Para exibir a imagem, é só colocar um DBImagem e lincar na tabela/campo que contém os dados da imagem.
Para somente exibir uma imagem, sem gravá-la, o procedimento é o mesmo.
Espero ter ajudado.
t+
dFran[/i][/b]
No banco de dados, crie um campo tipo Blob, sub type 1, segment size 1.
No Delphi, no onclick de um botão, por exemplo, use o seguinte:
[b:5991a549be]var
Imagem: TFileStream;
begin
diagLocalizarImagem.Execute; // executa uma caixa de diálogo
Imagem := TFileStream.Create(diagLocalizarImagem.FileName, fmOpenRead or fmShareDenyWrite);
try
dmGeral.DadosDoClienteLogotipo.LoadFromStream(Imagem);
finally
Imagem.Free;
end;
[/b:5991a549be]
[i:5991a549be] onde:
[b:5991a549be]dmGeral: data module onde está a tabela;
DadosDoCliente: tabela IB dentro do Delphi;
Logotipo: nome do campo que receberá os dados[/b:5991a549be][/i:5991a549be]
Para exibir a imagem, é só colocar um DBImagem e lincar na tabela/campo que contém os dados da imagem.
Para somente exibir uma imagem, sem gravá-la, o procedimento é o mesmo.
Espero ter ajudado.
t+
dFran[/i][/b]
GOSTEI 0
Dfran
18/06/2003
Olá Ovidio.
No banco de dados, crie um campo tipo Blob, sub type 1, segment size 1.
No Delphi, no onclick de um botão, por exemplo, use o seguinte:
[b:eb6973f4e5]var
Imagem: TFileStream;
begin
diagLocalizarImagem.Execute; // executa uma caixa de diálogo
Imagem := TFileStream.Create(diagLocalizarImagem.FileName, fmOpenRead or fmShareDenyWrite);
try
dmGeral.DadosDoClienteLogotipo.LoadFromStream(Imagem);
finally
Imagem.Free;
end;
[/b:eb6973f4e5]
[i:eb6973f4e5] onde:
[b:eb6973f4e5]dmGeral: data module onde está a tabela;
DadosDoCliente: tabela IB dentro do Delphi;
Logotipo: nome do campo que receberá os dados[/b:eb6973f4e5][/i:eb6973f4e5]
Para exibir a imagem, é só colocar um DBImagem e lincar na tabela/campo que contém os dados da imagem.
Para somente exibir uma imagem, sem gravá-la, o procedimento é o mesmo.
Espero ter ajudado.
t+
dFran
No banco de dados, crie um campo tipo Blob, sub type 1, segment size 1.
No Delphi, no onclick de um botão, por exemplo, use o seguinte:
[b:eb6973f4e5]var
Imagem: TFileStream;
begin
diagLocalizarImagem.Execute; // executa uma caixa de diálogo
Imagem := TFileStream.Create(diagLocalizarImagem.FileName, fmOpenRead or fmShareDenyWrite);
try
dmGeral.DadosDoClienteLogotipo.LoadFromStream(Imagem);
finally
Imagem.Free;
end;
[/b:eb6973f4e5]
[i:eb6973f4e5] onde:
[b:eb6973f4e5]dmGeral: data module onde está a tabela;
DadosDoCliente: tabela IB dentro do Delphi;
Logotipo: nome do campo que receberá os dados[/b:eb6973f4e5][/i:eb6973f4e5]
Para exibir a imagem, é só colocar um DBImagem e lincar na tabela/campo que contém os dados da imagem.
Para somente exibir uma imagem, sem gravá-la, o procedimento é o mesmo.
Espero ter ajudado.
t+
dFran
GOSTEI 0