Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Internet (https://www.clubdelphi.com/foros/forumdisplay.php?f=3)
-   -   sumar dos edit (https://www.clubdelphi.com/foros/showthread.php?t=46396)

arespremium 31-07-2007 03:06:50

sumar dos edit
 
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
ver_imagen_2

Caral 31-07-2007 03:37:37

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.
Código Delphi [-]
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] 31-07-2007 09:32:10

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

arespremium 01-08-2007 02:20:06

Cita:

Empezado por Neftali
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 01-08-2007 03:01:00

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 01-08-2007 03:08:25

Cita:

Empezado por arespremium
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.


La franja horaria es GMT +2. Ahora son las 08:43:19.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi