Luciano,

Use uma stringlist para isto.

Ex.:

procedure TForm1.Button1Click(Sender: TObject);
var
  minhaStringList : tStrings;
begin
  minhaStringList:=TStringList.Create;
  with minhaStringList do
  begin
     Delimiter:='#';
     Text:=MeuArquivo.FIeldByname('CampoBlob').AsString;
  end;
end;

[ ]´s
Moacir

Luciano escreveu:

>Pessoal estou com o seguinte problema
>
>Estou fazendo importação de um arquivo para outro e um dos campos é campo 
>memo. Então eu tenho uma string que é: "Fazendo Teste#Continuando a fazer 
>teste"
>
>Eu quero encontrar a String "#" e armazenar o "Fazendo Teste" na primeira 
>linha de TMemo ou TDMemo e depois continuar lendo a string até que tenha 
>terminado.
>
>Alguém poderia me dar uma ajuda.
>
>Grato
>
>Luciano
>
>
>
>
>
>Luciano Alves de Oliveira
>Programador
>Altec Soluções em Informática
>(19] 3543-3656
>
>[As partes desta mensagem que não continham texto foram removidas]
>
>
>
>  
>



-- 
No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.344 / Virus Database: 267.11.10/119 - Release Date: 4/10/2005



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