CALCULADORA

Deberás crear el siguiente diseño en Power Builder.


La estructura de su proyecto será el siguiente: ( Pulsar Doble clic para agrandar la imagen )

CODIGO EN LOS SIGUIENTES BOTONES:

CODIGO BOTON:

sle_1.text=string((long(long(sle_1.text)*10))+1)

* Deberás repetir el siguiente código para todos los controles con NUMEROS.

CODIGO BOTON:

xoper=string("+")
xnum=integer(sle_1.text)
sle_1.text = "0"

* La misma estructura para los demás operadores.


CODIGO BOTON:

choose case xoper

case "+"

sle_1.text = string(long(long(sle_1.text)+xnum))

case "-"

sle_1.text = string(integer(xnum - (long(sle_1.text))))

case "x"

sle_1.text = string(integer(long(sle_1.text)*xnum))

case "/"

sle_1.text = string(integer(xnum / (long(sle_1.text))))

end choose

CODIGO BOTON:


sle_1.text="0"
xnum=0


Luego deberás pulsar Dclic en la Aplicación CALCULADORA y en la hoja OPEN escribirás el código que abrirá la ventana w_cal.


Para compilar o ejecutar el proyecto pulsa en el siguiente Botón ó (Ctrl + R)



Si algo no te quedo bien claro postéalo aquí, gracias.

4 comentarios:

renzo.fer dijo...
Este comentario ha sido eliminado por el autor.
renzo.fer dijo...
Este comentario ha sido eliminado por el autor.
Giovanni Luis Barrantes L dijo...

muchas gracias. cualquier cosa que necesites avisame.

Giovanni Luis Barrantes L dijo...

este es mi codigo : boton 1, así sucesivamente a cada boton
SLE_1.TEXT=STRING(NUM)

variables instance:
double NUM,s,r,m,d,p,RC
decimal Ex
boton +,-,* es parecido :SLE_1.TEXT=STRING("+")
en los simbolos = hacía la entrada y salida de datos (exponente = ^ raiz cuadrada rc pero llegué hasta ahí.)

Publicar un comentario en la entrada