Código
Richedit1.SelAttributes.Color:=clBLue; // Cor Azul
Richedit1.SelAttributes.Style:=[fsBold,fsUnderline]; // Negrito e sublinhado
Richedit1.Lines.Add('Linha'); // Adiciona linha
Richedit1.SelAttributes.Style:=[]; // Volta ao estilo normal
Richedit1.SelAttributes.Color:=clBlack; // Volta à cor normal
Planeta Delphi - www.planetadelphi.com.br - Todos os direitos reservados | Copyright 2001-2009