Erro ao criar um BlobStream
Senhores,
Estou precisando salvar o valor de um campo blob em uma varíavel do tipo TBLOBSTREAM, mas quando a linha do create é executada dá o seguinte erro ´Invalid Class Typecast´. O comando é tão simples que não sei o que posso está fazendo de errado. Vejam abaixo o código.
A qryteste é um componente do tipo TSQLClienteDataSet, está aberto e posicionado no registro que eu quero carregar os valores.
Alguém poderia me ajudar?
Obrigado,
Estou precisando salvar o valor de um campo blob em uma varíavel do tipo TBLOBSTREAM, mas quando a linha do create é executada dá o seguinte erro ´Invalid Class Typecast´. O comando é tão simples que não sei o que posso está fazendo de errado. Vejam abaixo o código.
procedure TForm1.Button1Click(Sender: TObject); Var Texto:TBlobStream; begin Texto:=TBlobStream.Create(QryTeste.FieldByName(´OBSERVACAO´) as TBLOBFIELD,bmRead); end;
A qryteste é um componente do tipo TSQLClienteDataSet, está aberto e posicionado no registro que eu quero carregar os valores.
Alguém poderia me ajudar?
Obrigado,
Chmeireles
Curtidas 0