RichEdit en Columnas

[erickahr]

Hola de nuevo aki dando lata, necesito acomodar en un RichEdit un texto que irá dividido en tres columnas, Codigo--> Descripcion--> Precio.

En TrucoMania encontré un codigo que permite dividir en columnas:

Código Delphi [-]
procedure TForm1.cxButton1Click(Sender: TObject);
var
    n:integer;
 begin
  with Re1 do
   begin
     Lines.Clear;
     Paragraph.TabCount:=1;
     Paragraph.Tab[0]:=100;
   end;
   for n:=1 to 10 do
     Re1.Lines.Append('Columna 1'^I'Columna 2');
 end;

Para dos columnmas esta perfecto, funciona excelente, pero ahora no se como crear la tercer columna, alguien podria ayudarme?
De antemano Muchas Gracias

[erickahr]

Bueno he resuelto mi problema, tal vez para algunos sea muy tonto, pero no podia hacerlo, encontré en esta pagina un ejemplo, que esta en ingles pero me ayudo bastante, dejo mi solucion por si alguien se encuentra en el mismo problema que yo:

Código Delphi [-]
procedure TForm1.cxButton1Click(Sender: TObject);
var
    n:integer;
 begin
  with Re1 do
   begin
     Lines.Clear;
     Paragraph.TabCount:=2;
     Paragraph.Tab[0]:=100;
     Paragraph.Tab[1]:=200;
   end;
   for n:=1 to 10 do
     Re1.Lines.Append('Columna 1'^I'Columna 2'+^I'Columna3');
end;

Como mencioné talvez para muchos sea muy tonto, pero cuando vamos iniciando, nos topamos con cada cosa....

OK la cuestion es que Paragraph.TabCount indica cuantas tabbulaciones manejaremos por renglón, Paragraph.Tab es un Array que almacena las los topes de tabulador, osea si en un renglón pulso una vez TAB se irá a la columna que le indique en Paragraph.Tab[0], si por segunda ocasion presiono TAB , se irá a la columna 200 ya que es al valor de Paragraph.Tab[1], y asi sucesivamente segun el numero de columnas que tengamos.

Saludos!!!