ActiveDelphi

[Valdira]

Olá,

Utilizo firebird e Ibexpert, preciso converter um campo de blob para string, só que tem um agravante, o blob contêm vários caracteres , é possível removê-los via procedure e deixar somente o texto do campo?

Este é um exemplo do registro a que me refiro...

{\rtf1\ansi\ansicpg1252\deff0\deflang1046{\fonttbl{\f0\fnil\fcharset0 MS Sans Serif;}{\f1\fnil MS Sans Serif;}}
\viewkind4\uc1\pard\f0\fs16 Aluna perdeu a 4\'aa aula de texto, devido ao atraso ap\'f3s o intervalo 10h30min.\f1
\par \pard
\par }


Me ajudem..please...

Obrigada.

[pestana]

o que você deseja fazer? aonde você quer armazenar o conteúdo deste campo? este campo que esta definido como blob armazena strings?

qual banco você esta trabalhando? poste a estrutura desta tabela.
_________________
Ao invés de ficar desanimado no que deu de errado, olhe para frente, aprenda com os erros e veja o que ainda pode ser feito. A determinação e a persistência é uma das etapas para o sucesso.

[Valdira.Lima]

Eu utilizo firebird...

A situação é a seguinte, o campo é tipo blob, e na aplicação tem um editor de texto, de modo que quando gravo o campo na tabela fica cheio de caracteres de formatação, preciso extrair esses caracteres do campo e deixar só o texto puro..

Segunda situação, preciso converter esse blob pra varchar, pois preciso exportar esses registros, e o campo que vai recebê-lo é varchar..


Obrigada.
_________________
Att,
Valdira Lima.

[pestana]

você esta gravando estas informações assim:

dataSet.ParamByName('campo').AsBlob := memo.Lines.Text; ou
dataSet.ParamByName('campo').AsString := memo.Lines.Text;

e parra recuperar os dados:
memo.Text := dataSet.ParamByName('campo').AsString;
_________________
Ao invés de ficar desanimado no que deu de errado, olhe para frente, aprenda com os erros e veja o que ainda pode ser feito. A determinação e a persistência é uma das etapas para o sucesso.

[thomazs]

Se você estiver usando Firebird 2.1, tem a função replace para remover os ítens, porém, creio eu que não será eficiente, pois as tags não mantém um padrão. Salvo engano, o firebird 2.1 tb trata os campos blob text como varchar, mas se não ocorrer, use a funçao substring, pegando dados da primeira posição, até o tamanho máximo dela, isso fará com que o conteúdo seja tratado como varchar.
_________________
Suporte e Consultoria em Desenvolvimento de Sistemas
Bacharel em Sistemas de Informação
Especialista em Bancos de Dados
Desenvolvimento: Clipper, Delphi, PHP, Python/Django

[DonOctavioDelFlores]

isso é um RTF.

Abra esse texto num RichEdit e manipule por ali.
_________________
“The problem with the world is that everyone is a few drinks behind.” Humphrey Bogart