Texto en varias columnas en un TMemo  

Enviado Por: Radikal (Q3 Team)
Web : http://www.q3.nu
Email: radikal@q3.nu
Fecha: 30/09/99

Truco accedido 69 veces

 


Basta con que pongas su propiedad WantTabs a TRUE y aņadas las lineas separando las columnas con ^I

Un ejemplo:

  • Pon un TMemo (Memo1)
  • Pon a TRUE la propiedad Memo1.WantTabs;
  • Pon un TButton (Button1) y mete esto su evento OnClick: 


     procedure TForm1.Button2Click(Sender: TObject);
 begin
   Memo1.Lines.Add('Una'^i'Dos');
 end;