Foto

Delphi

15/12/2003

:?: Olá;

Tenho um banco de dados em interbase 6.0 nele um campo blob chamado Foto preciso gravar e ler 7 fotos JPG de 100K neste campo. Veja como está sendo feito:

query.sql.add(´insert into tabela(campo1,foto)´);
query.sql.add(´values(:campo1,:foto´);
query.parambyname(´campo1´).astring := codigo;
[b:3222675346]query.parambyname(´foto´).asblob := imagem.picture;[/b:3222675346]query.excsql;

[b:3222675346]query.parambyname(´foto´).asblob := imagem.picture; //neste linha, dá erro de compilação dizendo que string e tpicture são incompatíveis. Já está declarado a clausula JPEG na uses[/b:3222675346]
Alguém ajuda ?


Excon

Excon

Curtidas 0

Respostas

Turbo Drive

Turbo Drive

15/12/2003

Irmão, pelo seu código, vc está mandando executar a query e depois está passando outro parâmetro:
query.execsql;
query.parambyname(´foto´).asblob := imagem.picture;

Vc tem que passar todos os parâmetros, aí vc executa a query. Pode ser aí que esteja dando erro.


GOSTEI 0
POSTAR