Problema con memo
 

Hola club delphi!

Sigo haciendo ejercicios de mi primer tp con delphi,
en este caso es un ejercicio en donde necesito que con un click se me generen, 10 multiplos de un numero.

Lo que hice es lo siguiente( y el problema es que en el memo no se me generan todos los numeros, sino que solo me muestra uno):

Código Delphi [-]
var 
     a,i,b:integer;
  begin
      a:=Strtoint(edit1.text);
    for i:=1 to 10 do
       b:=a*i;
       memo1.lines.add(inttostr(b));
end;

La verdad no se si esta mal programado, o es que el uso que le estoy dando al memo esta mal.. si hubiera alguna sugerencia de la cual pueda sacar provecho para el uso del memo lo agradeceria. gracias!

Hola,

Tal vez después del "do" te falta un "begin":

Código Delphi [-]
var
  a,i,b:integer;
begin
  a:=Strtoint(edit1.text);
  for i:=1 to 10 do
  begin
    b:=a*i;
    memo1.lines.add(inttostr(b));
  end;
end;

Genial muchas gracias. Necesitaba un comienzo, como en el if, sldos

agustin_uni,

:rolleyes:

Revisa esta información:
Espero sea útil :)

Nelson.