Hola a todos,
Hace unos días me dió por hacer experimentos con Clipper / ms-dos, y me salió esto. Supongo que muchos os habreis hecho una función como esta, por no decir casi todos, ya que es muy simple, pero por si alguno no lo había hecho, la podeis usar, cambiar, manosear, etc etc. Es una pequeña función que crea un menú tipo PROMPT con simplemente almacenar en una variable numérica el resultado de la función (que es el número de opción elegida). Ej:
nOpc := PMB( aOpciones, aMensajes, nMsgRow, lMsgCenter, nBoxRowI, nBoxColI, cClrBack, lSombra )
Muchas de las opciones funcionan por defecto, por lo que no hace falta enviar todos los parámetros, si te sirve la configuración por defecto.
Si alguien la mejora o conoce alguna otra mejor que pueda aconsejar, encantado.
Incluye un documento en el que se explica el significado y el uso de cada parámetro. Tan solo hay que enlazar el PMB.prg con tu aplicación.
Saludos,
Enviar correo