Cómo usar dev C para programar un cuadro de diálogo similar a Windows

hola: diálogo {

etiqueta = "Cuadro de diálogo de muestra"

: editar {

etiqueta = "Ingresar:"; clave = "editar1";

}

: botón {

clave = "aceptar"

etiqueta = "Aceptar";

is_default = true;

}

}

Archivo de programa: el contenido de entrada se guarda en el valor de la variable del sistema

(defun C:HELLO(/dcl_id)

(setq dcl_id (load_dialog "hello.dcl")); Cargar archivo DCL

(if (not (new_dialog " hola") " dcl_id)) ; Inicializar cuadro de diálogo

(salir); Salir si no funciona

)

(action_tile "aceptar" " (setq value (get_tile \"edit1\")) (done_dialog 1)")

(start_dialog); Mostrar cuadro de diálogo

(unload_dialog dcl_id); Descargar archivo DCL

(principio)