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.

7 comentarios:

Anónimo dijo...
Este comentario ha sido eliminado por el autor.
Anónimo dijo...
Este comentario ha sido eliminado por el autor.
Giovanni Luis Barrantes Lazo dijo...

muchas gracias. cualquier cosa que necesites avisame.

Giovanni Luis Barrantes Lazo 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í.)

kevyn dijo...

genial bro

Unknown dijo...

No compila

Unknown dijo...

amigo, y las variables xoper y xnum ??
las declare en instance de variables pero aun asi no compila hacia las demas

Publicar un comentario