sumar dos edit

[arespremium]

hola vuelvo con otro programa sencillo
quiero sumar dos campos, edit1 y edit2 al sumar que muestre el resultado en un label1.caption

Tengo problema en la operacion con la suma.

Usando esto:
Edit1
Edit2
Button1 (aceptar)
Button2 (borrar)
Button3 (cerrar)
Label1

Sumar
n1:=strtoint(Edit1.text);
n2:=strtoint(Edit2.text);
suma:=n1+n2
label1.caption='la suma es= '+inttostr(suma);


borrar:
begin
edit1.clear;
edit2.clear;
label1.caption:='';
edit1.setfocus;
end;

cerrar:
begin
close;
end;

Saludos

ver_imagen_1 (http://www.subirimagenes.com/imagenes/previo/thump_1312115delphi_sumar_a.gif)
ver_imagen_2 (http://www.subirimagenes.com/imagenes/previo/thump_1312116delphi_sumar_b.gif)

[Caral]

Hola
Primero que nada, no entiendo por que pones esto en un hilo en el foro de Internet?.
Ahora, no veo el problema, mas bien lo tienes muy claro, un par de retoques y ya.

procedure TForm1.Button1Click(Sender: TObject);
Var
n1,n2,suma: Integer;
begin
n1:=strtoint(Edit1.text);
n2:=strtoint(Edit2.text);
suma:= n1 + n2;
label1.caption:='la suma es= '+inttostr(suma);
end;

Saludos

[Neftali [Germán.Estévez]]

Sólo una cosa que no me queda clara...
¿Te estamos hacendo los deberes del "cole"?:D:D

[arespremium]

Sólo una cosa que no me queda clara...
¿Te estamos hacendo los deberes del "cole"?:D:D

En el cole me enseñaron visual basic 6, descubri delphi y lo escuentro mucho mejor que visual basic 6

[Caral]

Hola
Y bueno, sirvio, no sirvio el ejemplo.
Es politica del club, por lo menos asi lo he visto, indicar si la cosa camino o no, ya que otras personas ven los hilos, tal vez con la misma duda y quieren saber en que paro el asunto, asi aprenden mejor.
En otras palabras, terminar el asunto.
Saludos

[ArdiIIa]

En el cole me enseñaron visual basic 6, descubri delphi y lo escuentro mucho mejor que visual basic 6

Pues eso está, pero que muy bien, a medida que profuncides, te gustará mas.

Por cierto, en vez de IntToStr, te recomiendo que utilices IntToStrDef, de este modo evitarás o controlarás que la entrada de teclado se ajusten a números y evitarás errores.