Curta Nossa Página
App Android | Significado dos NomesSignificado dos Nomes
Dicas

Como Remover Linhas em Branco do Memo ou RichEdit | Delphi

Removendo todas as linhas em branco de um Memo ou RichEdit com Delphi

procedure TForm1.Button1Click(Sender: TObject);
var
 i: integer;
begin
 for i := Memo1.Lines.Count/1 downto 0 do
   if trim(Memo1.Lines[i]) = '' then
      Memo1.Lines.Delete(i);
end;

Gostou? Avalie:

0 / 5 0
Etiquetas
Veja também:
Botão Voltar ao topo
Fechar

Adblock detectado

Por favor, considere apoiar-nos, desativando o seu bloqueador de anúncios