Array
(
)

Erro ao criar um BlobStream

Chmeireles
   - 19 ago 2004

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.


#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,