Olá amigos!!!


Tenho um campo tipo ByteA no PostgreSQL e não consigo gravar um jpg nele.



Estou usando assim



procedure TF_CadastroPessoasFotos.GravaFoto(Stm: TMemoryStream; Acao: Byte);

begin

if Acao = 1 then

    Begin

      // inserir

        (ZQ_Cadastro.FieldByName('FOTOGRAFIA') as TBlobField).BlobType := 
ftTypedBinary;

        (ZQ_Cadastro.FieldByName('FOTOGRAFIA') as 
TBlobField).LoadFromStream(Stm);

    End

    else

      if Acao = 0 then

          Begin

            // Limpa a Imagem

              (ZQ_Cadastro.FieldByName('FOTOGRAFIA') as TBlobField).Clear;

              Image1 := Nil;

          End;








Aparentemente grava certinho, mas a foto nao vai pro banco...





Alguém ja passou por isso.





Estou usando ZeosLib com PostgreSQL 8.0



Qualquer dica ficarei agradecido!



Anderson



        



        
                
_______________________________________________________ 
Você quer respostas para suas perguntas? Ou você sabe muito e quer compartilhar 
seu conhecimento? Experimente o Yahoo! Respostas !
http://br.answers.yahoo.com/


-- 
<<<<< 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]
 
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

 


Responder a