ActiveDelphi - Índice do Fórum ActiveDelphi
.: O site do programador Delphi! :.
 
 FAQFAQ   PesquisarPesquisar   MembrosMembros   GruposGrupos   RegistrarRegistrar 
 PerfilPerfil   Entrar e ver Mensagens ParticularesEntrar e ver Mensagens Particulares   EntrarEntrar 

Remover linha do memo que não contenha "#"

 
Novo Tópico   Responder Mensagem    ActiveDelphi - Índice do Fórum -> Delphi
Exibir mensagem anterior :: Exibir próxima mensagem  
Autor Mensagem
thunderwave3
Novato
Novato


Registrado: Sábado, 14 de Agosto de 2010
Mensagens: 23
MensagemEnviada: Qua Nov 02, 2011 8:41 pm    Assunto: Remover linha do memo que não contenha "#" Responder com Citação
Fala pessoal!
Tenho muitas linhas em um memo e preciso remover todas linhas que não contenham o "#"
Ex:
TRGDkdnfgfHAfdl
NCVtwfd#Ojdgdua
72ghdgd/HDapie
25244//dydghdUIA
ojedWOIhjd#1111

No caso gostaria que filtrasse as linhas e o resultado fosse esse:
NCVtwfd#Ojdgdua
ojedWOIhjd#1111

Qualquer ajuda será bem vinda.
Desde já agradeço
Abraços.
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
imex
Moderador
Moderador


Registrado: Sexta-Feira, 7 de Janeiro de 2011
Mensagens: 11666
MensagemEnviada: Qua Nov 02, 2011 9:38 pm    Assunto: Responder com Citação
Não testei, mas experimente mais ou menos desta forma:

Código:
var
  i: integer;
begin
for i := Memo1.Lines.Count - 1 downto 0 do
    if Pos('#', Memo1.Lines[i]) = 0 then
        Memo1.Lines.Delete(i);


Espero que ajude.

__________________
Assinatura: Imoveis em Guarulhos para alugar
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
thunderwave3
Novato
Novato


Registrado: Sábado, 14 de Agosto de 2010
Mensagens: 23
MensagemEnviada: Qui Nov 03, 2011 12:46 am    Assunto: Responder com Citação
Funcionou, muito obrigado mesmo!!!!!
Abraços.
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
Mostrar os tópicos anteriores:   
Novo Tópico   Responder Mensagem    ActiveDelphi - Índice do Fórum -> Delphi Todos os horários são GMT - 3 Horas
Página 1 de 1

 
Ir para:  
Enviar Mensagens Novas: Proibido.
Responder Tópicos Proibido
Editar Mensagens: Proibido.
Excluir Mensagens: Proibido.
Votar em Enquetes: Proibido.


Powered by phpBB © 2001, 2005 phpBB Group
Traduzido por: Suporte phpBB