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