AYUDA CON PARÁMETROS DE CONTROLES SENCILLOS
Publicado: 28 Feb 2009, 19:34
Saludos.
Necesito algo de ayuda con la creación de las GUI.
El código ke sigue representa una ventana con tres botones y dos cuadros de edición (edits).
En resumen el script pasa lo ke se teclea en el edit A hacia el edit B luego de presionar un botón "Get".
Como mensioné anteriormente soy ciego y a parte no puedo usar el koda, entonces debo generar laas ventanas y sus componentes a la antigua, midiendo y parametrizando sumando, restando, etc.
Podrían ayudarme con los parametros de los elementos de la ventana? darme los parametros de posición y de anchura para ke keden como se debe.
Por ejemplo, con los controles edit, cual sería el grosor adecuado para un edit de una sola línea?
Cómo debería parametrizar un control edit para ke fuera multilínea, con barras de desplazamiento a la derecha, pero, no abajo?
Gracias.
El código:
Ÿ̕Ÿ̕lude <GUIConstantsEx.au3>
GUICreate("Pantalla de línea de comandos", 300, 300)
;GUICtrlCreateLabel("Hello world! How are you?", 30, 10)
$boton_cerrar = GUICtrlCreateButton("Cerrar", 30, 280, 60)
$boton_cls = GUICtrlCreateButton("CLS", 100, 280, 60)
$boton_get = GUICtrlCreateButton("Get", 30, 80, 60)
$input_edit = GUICtrlCreateEdit("Comandos de entrada:", 30, 30)
$output_edit = GUICtrlCreateEdit("Salida de comandos", 30, 50, 250, 210)
GUISetState(@SW_SHOW)
While 1
$msg1 = GUIGetMsg()
Select
Case $msg1 = $boton_get
$entrada = GUICtrlRead($input_edit)
GUICtrlSetData($output_edit, $entrada)
MsgBox(0, "Texto ingresado", GUICtrlRead($input_edit))
Case $msg1 = $boton_cerrar
MsgBox(0, "Eventos de ventana", "Has presionado salir!")
ExitLoop
Case $msg1 = $GUI_EVENT_CLOSE
MsgBox(0, "Eventos de ventana", "Has presionado salir!")
ExitLoop
EndSelect
wend
Necesito algo de ayuda con la creación de las GUI.
El código ke sigue representa una ventana con tres botones y dos cuadros de edición (edits).
En resumen el script pasa lo ke se teclea en el edit A hacia el edit B luego de presionar un botón "Get".
Como mensioné anteriormente soy ciego y a parte no puedo usar el koda, entonces debo generar laas ventanas y sus componentes a la antigua, midiendo y parametrizando sumando, restando, etc.
Podrían ayudarme con los parametros de los elementos de la ventana? darme los parametros de posición y de anchura para ke keden como se debe.
Por ejemplo, con los controles edit, cual sería el grosor adecuado para un edit de una sola línea?
Cómo debería parametrizar un control edit para ke fuera multilínea, con barras de desplazamiento a la derecha, pero, no abajo?
Gracias.
El código:
Ÿ̕Ÿ̕lude <GUIConstantsEx.au3>
GUICreate("Pantalla de línea de comandos", 300, 300)
;GUICtrlCreateLabel("Hello world! How are you?", 30, 10)
$boton_cerrar = GUICtrlCreateButton("Cerrar", 30, 280, 60)
$boton_cls = GUICtrlCreateButton("CLS", 100, 280, 60)
$boton_get = GUICtrlCreateButton("Get", 30, 80, 60)
$input_edit = GUICtrlCreateEdit("Comandos de entrada:", 30, 30)
$output_edit = GUICtrlCreateEdit("Salida de comandos", 30, 50, 250, 210)
GUISetState(@SW_SHOW)
While 1
$msg1 = GUIGetMsg()
Select
Case $msg1 = $boton_get
$entrada = GUICtrlRead($input_edit)
GUICtrlSetData($output_edit, $entrada)
MsgBox(0, "Texto ingresado", GUICtrlRead($input_edit))
Case $msg1 = $boton_cerrar
MsgBox(0, "Eventos de ventana", "Has presionado salir!")
ExitLoop
Case $msg1 = $GUI_EVENT_CLOSE
MsgBox(0, "Eventos de ventana", "Has presionado salir!")
ExitLoop
EndSelect
wend