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