Ante :: Deluvian :: diálogo Extensión Perl para una interacción de usuario muy antigua
Descargar ahora

Ante :: Deluvian :: diálogo Clasificación y resumen

Ante :: Deluvian :: diálogo Etiquetas

Módulo perl perla diálogo la interacción del usuario deluviano

Ante :: Deluvian :: diálogo Descripción

Extensión Perl para la interacción de usuario de estilo muy antiguo Ante :: Deluvian :: Dialog es un módulo Perl para la interacción de usuario de estilo muy antiguo. COMENTARIOS DEVOLVERSIONES AFER Varios intentos de obtener maldiciones que se ejecutan en Windows (sin tener que instalar Cygwin), me decidí a hacer algo de programación para obtener un ASCII puro Ventana de diálogo basada y muy simple. Estoy seguro de que no habrá muchos usuarios que prefieran este tipo de interfaz, pero no quiero estar obligado a producir un poco de GUI solo para controlar o probar la comunicación. Quien intente este programa, Pensará que me he vuelto loco, y ciertamente tendrá razón. ConcestructorNew (Plataforma => "MSWIN", TITLE => "Título de la ventana", PROMPT => "What We Weing"); Hay otros dos récord de opciones, que se pueden configurar en un valor booleano y repetir, lo que espera obtener un archivo de entrada previamente grabado. Esto es principalmente para fines de prueba, si no le gusta repetir una secuencia de entrada especial a mano ... Estoy seguro de que lo descubrirá si esto es interesante para usted.Synopsis Use Ante :: Deluvian :: Diálogo; $ d = ante :: Deluvian :: Diálogo-> Nuevo (Plataforma => "MSWIN", DrawFrame => 1, Título => "Título de la ventana", PROMPT => "Por favor haga su elección:", # registro => 1, # Replay => "C: / TEMP / Addialog / _. TXT",); $ FDIR = $ D-> DSELECT (); Imprimir "Ha seleccionado el directorio $ FDIR ... \ N"; $ fname = $ d-> fselect ($ FDIR); Imprimir "Ha seleccionado el archivo $ FNAME ... \ N"; @Alst = ("A" .. "Z", "A" .. "Z"); @ares = $ d-> ListBox (\ @ alst, select => "Multi"); $ rd = $ d-> radiolista (, , , , ,]); $ D-> Alerta (); if (-t $ fname) {$ INPF = IO :: File-> Nuevo ($ FNAME); $ D-> TEXTBOX ($ INPF); } else {$ d-> TextBox ($ FNAME); } Requisitos: · Perl

Ante :: Deluvian :: diálogo Software relacionado