¿cómo puedo poner la tabla de multiplicar en un listbox?

[frankmanuel06]

bueno soy nuevo en esto de programar y mi pregunta es esta como puedo hacer un programa que yo ponga un numero en un edit y me ponga la tabla de multiplicar de dicho numero, bueno yo ya e comenzado pero no me funciona. estos son los codigos:

procedure TForm1.Button1Click(Sender: TObject);
var
o,n,i:integer;
begin
n:=strtoint(edit1.text);
o:=i*n;
for i:= 1 to 12 do;
listbox1.items.add((edit1.text)+inttostr(i)+'='+inttostr(o))

end;

end.
bueno espero me ayuden y gracias de antemano .

[cloayza]

Bienvenido al foro...te recomiendo leer La Guía de Estilo...

Cuando coloques código utiliza las etiquetas correspondiente...

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var
o,n,i:integer;
begin
       listbox1.items.clear;
       n:=strtoint(edit1.text);
       //o:=i*n;
       for i:= 1 to 12 do;
            listbox1.items.add(format('%d x %d = %d',[n,i,n*i]));
end;

Saludos cordiales

[frankmanuel06]

mira me funciono pero quiero que me ponga, ejemplo si pones 1 en el edit me ponga
1x1=1
1x2=2
1x3=3

asi sucesivamente.

saludos!

[cloayza]

Bueno el código hace lo que requieres...el problema es que despues de for...do hay un punto y coma que esta de mas...

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var
o,n,i:integer;
begin
       listbox1.items.clear;
       n:=strtoint(edit1.text);
       //o:=i*n;
       for i:= 1 to 12 do  //;
            listbox1.items.add(format('%d x %d = %d',[n,i,n*i]));
end;

Saludos cordiales

[frankmanuel06]

Muchas gracias y saludos!

[frankmanuel06]

men gracias por tu tiempo jajaj pero tengo una pregunta para que es eso
de format('%d x %d = %d',[n,i,n*i])); para que sirve eso de %d y lo de format. es que quiero saber mas y mas sobre esto de programar. gracias

[ecfisa]

Hola frankmanuel06.

Revisa en la ayuda de delphi y también en este enlace: Format

Saludos

[frankmanuel06]

no se ingles pero como quiera gracias por la ayuda

[ecfisa]

Empezado por frankmanuel06

no se ingles pero como quiera gracias por la ayuda

Algo mas completo y en español:

• Convertir cualquier tipo de variable a String (I)
• Convertir cualquier tipo de variable a String (y II)

Saludos

[frankmanuel06]

Muchisimas gracias por tu tiempo y saludos! DDD

[[AzidRain]]

Que bonito, "Háganme mi tarea y además me explican como le hicieron..."

[[movorack]]

Empezado por AzidRain

Que bonito, "Háganme mi tarea y además me explican como le hicieron..."

..................

[frankmanuel06]

men pense que esta web era para que respondieran tus dudas men yo estaba intentando hacer ese programa pero no podia haci que decidi preguntar porque como ya habia dicho soy un principiante . saludos cordiales!