Hola
Esto es lo que realmente no entiendo ....
Código Delphi
[-]
procedure tform2.mostrarclick(sender: tobject);
var
num,cuadrado,cubo,i:integer;
linea,i2,cuadrado2,cubo2:string; begin
num:=strtoint(numero.text);
linea:=format('%5s%6s%5s%8s%6s%4s',[' ','numero',' ','cuadrado',' ','cubo']);
salida.items.add(linea); linea:=format('%5s%6s%5s%8s%6s%4s',[' ','________',' ','__________',
' ','_____']); salida.items.add(linea);
Podrian ayudarme
Gracias.
Saludos.