Jump to content

Help with getting the value that i enter in Inputbox


Recommended Posts

Hey guys, i'm new with autoit, so i'm having a bit trouble working with GUI and Inputboxes. So i have 3 questions:

1- Why isn't the value (I want to input letters but i tried numbers and it doesn't work also) that i insert in Inputbox1 saving. It just appears in the console: $arr[0][0]:=

2- Why is the value predefined in the others Inputboxes that i don't enter any values numbers. (ex.: $arr[0][1]:=71) And why does it start in the 70 (Inputbox1 when i dont enter any value).

3- How can i limit the Inputboxes to accept only one character. I dont mean write and If seeing if the person just wrote 1 character, i want to make it so the inputbox only let's the user write 1 character.

Thank you in advance!

#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <MsgBoxConstants.au3>
#include <WinAPI.au3>

ola()

Func ola()

#Region ### START Koda GUI section ### Form=c:\users\joaor\desktop\ola.kxf

$Form1_1 = GUICreate("Ola", 859, 518, 240, 122)
$MenuItem1 = GUICtrlCreateMenu("&File")
$MenuItem3 = GUICtrlCreateMenuItem("New", $MenuItem1)
$MenuItem4 = GUICtrlCreateMenuItem("Save", $MenuItem1)
$MenuItem5 = GUICtrlCreateMenuItem("Save as", $MenuItem1)
$MenuItem6 = GUICtrlCreateMenuItem("Exit", $MenuItem1)
$MenuItem2 = GUICtrlCreateMenu("&Options")
$MenuItem7 = GUICtrlCreateMenuItem("Settings", $MenuItem2)
$Label1 = GUICtrlCreateLabel("Coluna 12", 720, 80, 52, 17, $WS_GROUP)
$Label2 = GUICtrlCreateLabel("", 104, 80, 4, 4, $WS_GROUP)
$Label3 = GUICtrlCreateLabel("Coluna 2", 104, 80, 46, 17, $WS_GROUP)
$Label4 = GUICtrlCreateLabel("Coluna 3", 160, 80, 46, 17, $WS_GROUP)
$Label5 = GUICtrlCreateLabel("Coluna 4", 216, 80, 46, 17, $WS_GROUP)
$Label6 = GUICtrlCreateLabel("Coluna 5", 272, 80, 46, 17, $WS_GROUP)
$Label7 = GUICtrlCreateLabel("Coluna 5", 328, 80, 46, 17, $WS_GROUP)
$Label8 = GUICtrlCreateLabel("Coluna 6", 384, 80, 46, 17, $WS_GROUP)
$Label9 = GUICtrlCreateLabel("Coluna 7", 440, 80, 46, 17, $WS_GROUP)
$Label10 = GUICtrlCreateLabel("Coluna 9", 552, 80, 46, 17, $WS_GROUP)
$Label11 = GUICtrlCreateLabel("Coluna 8", 496, 80, 46, 17, $WS_GROUP)
$Label12 = GUICtrlCreateLabel("Coluna 1", 48, 80, 46, 17, $WS_GROUP)
$Label13 = GUICtrlCreateLabel("Coluna 11", 664, 80, 52, 17, $WS_GROUP)
$Label14 = GUICtrlCreateLabel("Coluna 10", 608, 80, 52, 17, $WS_GROUP)
$Label15 = GUICtrlCreateLabel("Linha 1", 0, 120, 39, 17, $WS_GROUP)
$Label16 = GUICtrlCreateLabel("Linha 2", 0, 144, 39, 17, $WS_GROUP)
$Label17 = GUICtrlCreateLabel("Linha 3", 0, 168, 39, 17, $WS_GROUP)
$Label18 = GUICtrlCreateLabel("Linha 4", 0, 192, 39, 17, $WS_GROUP)
$Label19 = GUICtrlCreateLabel("Mabe by J.Ribas", 688, 472, 83, 17, $WS_GROUP)
$Label20 = GUICtrlCreateLabel("Linha 5", 0, 216, 39, 17, $WS_GROUP)
$Label21 = GUICtrlCreateLabel("Linha 6", 0, 240, 39, 17, $WS_GROUP)
$Label22 = GUICtrlCreateLabel("Linha 7", 0, 264, 39, 17, $WS_GROUP)
$Label23 = GUICtrlCreateLabel("Linha 8", 0, 288, 39, 17, $WS_GROUP)
$Label24 = GUICtrlCreateLabel("Número de Aluno:", 0, 24, 89, 17, $WS_GROUP)
$Label25 = GUICtrlCreateLabel("Sexo:", 208, 24, 31, 17, $WS_GROUP)
$Label26 = GUICtrlCreateLabel("Ano:", 64, 48, 26, 17, $WS_GROUP)
$Label27 = GUICtrlCreateLabel("Turma:", 208, 48, 37, 17, $WS_GROUP)
$Label28 = GUICtrlCreateLabel("Linha 9", 0, 312, 39, 17, $WS_GROUP)
$Label29 = GUICtrlCreateLabel("Linha 10", 0, 336, 45, 17, $WS_GROUP)
$Label30 = GUICtrlCreateLabel("Linha 11", 0, 360, 45, 17, $WS_GROUP)
$Label31 = GUICtrlCreateLabel("Linha 12", 0, 384, 45, 17, $WS_GROUP)
$Label32 = GUICtrlCreateLabel("Linha 13", 0, 408, 45, 17, $WS_GROUP)
$Label33 = GUICtrlCreateLabel("Linha 14", 0, 432, 45, 17, $WS_GROUP)
$Label34 = GUICtrlCreateLabel("  +", 48, 96, 21, 24, $WS_GROUP)
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
$Label35 = GUICtrlCreateLabel("  -", 72, 96, 17, 24, $WS_GROUP)
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
$Label36 = GUICtrlCreateLabel("  +", 104, 96, 21, 24, $WS_GROUP)
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
$Label37 = GUICtrlCreateLabel("  -", 128, 96, 17, 24, $WS_GROUP)
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
$Label38 = GUICtrlCreateLabel("  +", 160, 96, 21, 24, $WS_GROUP)
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
$Label39 = GUICtrlCreateLabel("  -", 184, 96, 17, 24, $WS_GROUP)
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
$Label40 = GUICtrlCreateLabel("  +", 216, 96, 21, 24, $WS_GROUP)
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
$Label41 = GUICtrlCreateLabel("  -", 240, 96, 17, 24, $WS_GROUP)
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
$Label42 = GUICtrlCreateLabel("  +", 272, 96, 21, 24, $WS_GROUP)
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
$Label43 = GUICtrlCreateLabel("  -", 296, 96, 17, 24, $WS_GROUP)
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
$Label44 = GUICtrlCreateLabel("  +", 328, 96, 21, 24, $WS_GROUP)
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
$Label45 = GUICtrlCreateLabel("  -", 352, 96, 17, 24, $WS_GROUP)
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
$Label46 = GUICtrlCreateLabel("  +", 384, 96, 21, 24, $WS_GROUP)
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
$Label47 = GUICtrlCreateLabel("  -", 408, 96, 17, 24, $WS_GROUP)
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
$Label48 = GUICtrlCreateLabel("  +", 440, 96, 21, 24, $WS_GROUP)
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
$Label49 = GUICtrlCreateLabel("  -", 464, 96, 17, 24, $WS_GROUP)
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
$Label50 = GUICtrlCreateLabel("  +", 496, 96, 21, 24, $WS_GROUP)
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
$Label51 = GUICtrlCreateLabel("  -", 520, 96, 17, 24, $WS_GROUP)
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
$Label52 = GUICtrlCreateLabel("  +", 552, 96, 21, 24, $WS_GROUP)
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
$Label53 = GUICtrlCreateLabel("  -", 576, 96, 17, 24, $WS_GROUP)
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
$Label54 = GUICtrlCreateLabel("  +", 608, 96, 21, 24, $WS_GROUP)
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
$Label55 = GUICtrlCreateLabel("  -", 632, 96, 17, 24, $WS_GROUP)
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
$Label56 = GUICtrlCreateLabel("  +", 664, 96, 21, 24, $WS_GROUP)
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
$Label57 = GUICtrlCreateLabel("  -", 688, 96, 17, 24, $WS_GROUP)
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
$Label58 = GUICtrlCreateLabel("  +", 720, 96, 21, 24, $WS_GROUP)
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
$Label59 = GUICtrlCreateLabel("  -", 744, 96, 17, 24, $WS_GROUP)
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
$Label60 = GUICtrlCreateLabel("Resultados", 792, 96, 57, 17, $WS_GROUP)
$Input1 = GUICtrlCreateInput("", 88, 24, 73, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input2 = GUICtrlCreateInput("", 248, 24, 73, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input3 = GUICtrlCreateInput("", 88, 48, 73, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input4 = GUICtrlCreateInput("", 248, 48, 73, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input5 = GUICtrlCreateInput("", 48, 120, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input6 = GUICtrlCreateInput("", 72, 120, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input7 = GUICtrlCreateInput("", 104, 120, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input8 = GUICtrlCreateInput("", 128, 120, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input9 = GUICtrlCreateInput("", 160, 120, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input10 = GUICtrlCreateInput("", 184, 120, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input11 = GUICtrlCreateInput("", 216, 120, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input12 = GUICtrlCreateInput("", 240, 120, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input13 = GUICtrlCreateInput("", 272, 120, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input14 = GUICtrlCreateInput("", 296, 120, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input15 = GUICtrlCreateInput("", 328, 120, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input16 = GUICtrlCreateInput("", 352, 120, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input17 = GUICtrlCreateInput("", 384, 120, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input18 = GUICtrlCreateInput("", 408, 120, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input19 = GUICtrlCreateInput("", 440, 120, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input20 = GUICtrlCreateInput("", 464, 120, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input21 = GUICtrlCreateInput("", 496, 120, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input22 = GUICtrlCreateInput("", 520, 120, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input23 = GUICtrlCreateInput("", 552, 120, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input24 = GUICtrlCreateInput("", 576, 120, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input25 = GUICtrlCreateInput("", 608, 120, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input26 = GUICtrlCreateInput("", 632, 120, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input27 = GUICtrlCreateInput("", 664, 120, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input28 = GUICtrlCreateInput("", 688, 120, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input29 = GUICtrlCreateInput("", 720, 120, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input30 = GUICtrlCreateInput("", 744, 120, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input31 = GUICtrlCreateInput("", 48, 144, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input32 = GUICtrlCreateInput("", 72, 144, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input33 = GUICtrlCreateInput("", 104, 144, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input34 = GUICtrlCreateInput("", 128, 144, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input35 = GUICtrlCreateInput("", 160, 144, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input36 = GUICtrlCreateInput("", 184, 144, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))

$Input37 = GUICtrlCreateInput("", 216, 144, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input38 = GUICtrlCreateInput("", 240, 144, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input39 = GUICtrlCreateInput("", 272, 144, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input40 = GUICtrlCreateInput("", 296, 144, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input41 = GUICtrlCreateInput("", 328, 144, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input42 = GUICtrlCreateInput("", 352, 144, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input43 = GUICtrlCreateInput("", 384, 144, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input44 = GUICtrlCreateInput("", 408, 144, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input45 = GUICtrlCreateInput("", 440, 144, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input46 = GUICtrlCreateInput("", 464, 144, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input47 = GUICtrlCreateInput("", 496, 144, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input48 = GUICtrlCreateInput("", 520, 144, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input49 = GUICtrlCreateInput("", 552, 144, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input50 = GUICtrlCreateInput("", 576, 144, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input51 = GUICtrlCreateInput("", 608, 144, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input52 = GUICtrlCreateInput("", 632, 144, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input53 = GUICtrlCreateInput("", 664, 144, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input54 = GUICtrlCreateInput("", 688, 144, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input55 = GUICtrlCreateInput("", 720, 144, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input56 = GUICtrlCreateInput("", 744, 144, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input57 = GUICtrlCreateInput("", 48, 168, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input58 = GUICtrlCreateInput("", 72, 168, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input59 = GUICtrlCreateInput("", 104, 168, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input60 = GUICtrlCreateInput("", 128, 168, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input61 = GUICtrlCreateInput("", 160, 168, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input62 = GUICtrlCreateInput("", 184, 168, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input63 = GUICtrlCreateInput("", 216, 168, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input64 = GUICtrlCreateInput("", 240, 168, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input65 = GUICtrlCreateInput("", 272, 168, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input66 = GUICtrlCreateInput("", 296, 168, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input67 = GUICtrlCreateInput("", 328, 168, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input68 = GUICtrlCreateInput("", 352, 168, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input69 = GUICtrlCreateInput("", 384, 168, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input70 = GUICtrlCreateInput("", 408, 168, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input71 = GUICtrlCreateInput("", 440, 168, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input72 = GUICtrlCreateInput("", 464, 168, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input73 = GUICtrlCreateInput("", 496, 168, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input74 = GUICtrlCreateInput("", 520, 168, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input75 = GUICtrlCreateInput("", 552, 168, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input76 = GUICtrlCreateInput("", 576, 168, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input77 = GUICtrlCreateInput("", 608, 168, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input78 = GUICtrlCreateInput("", 632, 168, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input79 = GUICtrlCreateInput("", 664, 168, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input80 = GUICtrlCreateInput("", 688, 168, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input81 = GUICtrlCreateInput("", 720, 168, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input82 = GUICtrlCreateInput("", 744, 168, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input83 = GUICtrlCreateInput("", 48, 192, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input84 = GUICtrlCreateInput("", 72, 192, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input85 = GUICtrlCreateInput("", 104, 192, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input86 = GUICtrlCreateInput("", 128, 192, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input87 = GUICtrlCreateInput("", 160, 192, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input88 = GUICtrlCreateInput("", 184, 192, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input89 = GUICtrlCreateInput("", 216, 192, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input90 = GUICtrlCreateInput("", 240, 192, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input91 = GUICtrlCreateInput("", 272, 192, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input92 = GUICtrlCreateInput("", 296, 192, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input93 = GUICtrlCreateInput("", 328, 192, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input94 = GUICtrlCreateInput("", 352, 192, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input95 = GUICtrlCreateInput("", 384, 192, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input96 = GUICtrlCreateInput("", 408, 192, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input97 = GUICtrlCreateInput("", 440, 192, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input98 = GUICtrlCreateInput("", 464, 192, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input99 = GUICtrlCreateInput("", 496, 192, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input100 = GUICtrlCreateInput("", 520, 192, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input101 = GUICtrlCreateInput("", 552, 192, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input102 = GUICtrlCreateInput("", 576, 192, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input103 = GUICtrlCreateInput("", 608, 192, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input104 = GUICtrlCreateInput("", 632, 192, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input105 = GUICtrlCreateInput("", 664, 192, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input106 = GUICtrlCreateInput("", 688, 192, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input107 = GUICtrlCreateInput("", 720, 192, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input108 = GUICtrlCreateInput("", 744, 192, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input109 = GUICtrlCreateInput("", 48, 216, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input110 = GUICtrlCreateInput("", 72, 216, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input111 = GUICtrlCreateInput("", 104, 216, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input112 = GUICtrlCreateInput("", 128, 216, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input113 = GUICtrlCreateInput("", 160, 216, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input114 = GUICtrlCreateInput("", 184, 216, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input115 = GUICtrlCreateInput("", 216, 216, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input116 = GUICtrlCreateInput("", 240, 216, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input117 = GUICtrlCreateInput("", 272, 216, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input118 = GUICtrlCreateInput("", 296, 216, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input119 = GUICtrlCreateInput("", 328, 216, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input120 = GUICtrlCreateInput("", 352, 216, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input121 = GUICtrlCreateInput("", 384, 216, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input122 = GUICtrlCreateInput("", 408, 216, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input123 = GUICtrlCreateInput("", 440, 216, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input124 = GUICtrlCreateInput("", 464, 216, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input125 = GUICtrlCreateInput("", 496, 216, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input126 = GUICtrlCreateInput("", 520, 216, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input127 = GUICtrlCreateInput("", 552, 216, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input128 = GUICtrlCreateInput("", 576, 216, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input129 = GUICtrlCreateInput("", 608, 216, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input130 = GUICtrlCreateInput("", 632, 216, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input131 = GUICtrlCreateInput("", 664, 216, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input132 = GUICtrlCreateInput("", 688, 216, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input133 = GUICtrlCreateInput("", 720, 216, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input134 = GUICtrlCreateInput("", 744, 216, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input135 = GUICtrlCreateInput("", 48, 240, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input136 = GUICtrlCreateInput("", 72, 240, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input137 = GUICtrlCreateInput("", 104, 240, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input138 = GUICtrlCreateInput("", 128, 240, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input139 = GUICtrlCreateInput("", 160, 240, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input140 = GUICtrlCreateInput("", 184, 240, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input141 = GUICtrlCreateInput("", 216, 240, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input142 = GUICtrlCreateInput("", 240, 240, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input143 = GUICtrlCreateInput("", 272, 240, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input144 = GUICtrlCreateInput("", 296, 240, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input145 = GUICtrlCreateInput("", 328, 240, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input146 = GUICtrlCreateInput("", 352, 240, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input147 = GUICtrlCreateInput("", 384, 240, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input148 = GUICtrlCreateInput("", 408, 240, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input149 = GUICtrlCreateInput("", 440, 240, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input150 = GUICtrlCreateInput("", 464, 240, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input151 = GUICtrlCreateInput("", 496, 240, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input152 = GUICtrlCreateInput("", 520, 240, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input153 = GUICtrlCreateInput("", 552, 240, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input154 = GUICtrlCreateInput("", 576, 240, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input155 = GUICtrlCreateInput("", 608, 240, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input156 = GUICtrlCreateInput("", 632, 240, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input157 = GUICtrlCreateInput("", 664, 240, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input158 = GUICtrlCreateInput("", 688, 240, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input159 = GUICtrlCreateInput("", 720, 240, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input160 = GUICtrlCreateInput("", 744, 240, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input161 = GUICtrlCreateInput("", 48, 264, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input162 = GUICtrlCreateInput("", 72, 264, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input163 = GUICtrlCreateInput("", 104, 264, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input164 = GUICtrlCreateInput("", 128, 264, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input165 = GUICtrlCreateInput("", 160, 264, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input166 = GUICtrlCreateInput("", 184, 264, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input167 = GUICtrlCreateInput("", 216, 264, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input168 = GUICtrlCreateInput("", 240, 264, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input169 = GUICtrlCreateInput("", 272, 264, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input170 = GUICtrlCreateInput("", 296, 264, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input171 = GUICtrlCreateInput("", 328, 264, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input172 = GUICtrlCreateInput("", 352, 264, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input173 = GUICtrlCreateInput("", 384, 264, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input174 = GUICtrlCreateInput("", 408, 264, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input175 = GUICtrlCreateInput("", 440, 264, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input176 = GUICtrlCreateInput("", 464, 264, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input177 = GUICtrlCreateInput("", 496, 264, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input178 = GUICtrlCreateInput("", 520, 264, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input179 = GUICtrlCreateInput("", 552, 264, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input180 = GUICtrlCreateInput("", 576, 264, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input181 = GUICtrlCreateInput("", 608, 264, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input182 = GUICtrlCreateInput("", 632, 264, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input183 = GUICtrlCreateInput("", 664, 264, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input184 = GUICtrlCreateInput("", 688, 264, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input185 = GUICtrlCreateInput("", 720, 264, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input186 = GUICtrlCreateInput("", 744, 264, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input187 = GUICtrlCreateInput("", 48, 288, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input188 = GUICtrlCreateInput("", 72, 288, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input189 = GUICtrlCreateInput("", 104, 288, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input190 = GUICtrlCreateInput("", 128, 288, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input191 = GUICtrlCreateInput("", 160, 288, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input192 = GUICtrlCreateInput("", 184, 288, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input193 = GUICtrlCreateInput("", 216, 288, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input194 = GUICtrlCreateInput("", 240, 288, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input195 = GUICtrlCreateInput("", 272, 288, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input196 = GUICtrlCreateInput("", 296, 288, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input197 = GUICtrlCreateInput("", 328, 288, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input198 = GUICtrlCreateInput("", 352, 288, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input199 = GUICtrlCreateInput("", 384, 288, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input200 = GUICtrlCreateInput("", 408, 288, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input201 = GUICtrlCreateInput("", 440, 288, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input202 = GUICtrlCreateInput("", 464, 288, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input203 = GUICtrlCreateInput("", 496, 288, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input204 = GUICtrlCreateInput("", 520, 288, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input205 = GUICtrlCreateInput("", 552, 288, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input206 = GUICtrlCreateInput("", 576, 288, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input207 = GUICtrlCreateInput("", 608, 288, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input208 = GUICtrlCreateInput("", 632, 288, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input209 = GUICtrlCreateInput("", 664, 288, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input210 = GUICtrlCreateInput("", 688, 288, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input211 = GUICtrlCreateInput("", 720, 288, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input212 = GUICtrlCreateInput("", 744, 288, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input213 = GUICtrlCreateInput("", 48, 312, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input214 = GUICtrlCreateInput("", 72, 312, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input215 = GUICtrlCreateInput("", 104, 312, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input216 = GUICtrlCreateInput("", 128, 312, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input217 = GUICtrlCreateInput("", 160, 312, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input218 = GUICtrlCreateInput("", 184, 312, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input219 = GUICtrlCreateInput("", 216, 312, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input220 = GUICtrlCreateInput("", 240, 312, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input221 = GUICtrlCreateInput("", 272, 312, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input222 = GUICtrlCreateInput("", 296, 312, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input223 = GUICtrlCreateInput("", 328, 312, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input224 = GUICtrlCreateInput("", 352, 312, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input225 = GUICtrlCreateInput("", 384, 312, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input226 = GUICtrlCreateInput("", 408, 312, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input227 = GUICtrlCreateInput("", 440, 312, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input228 = GUICtrlCreateInput("", 464, 312, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input229 = GUICtrlCreateInput("", 496, 312, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input230 = GUICtrlCreateInput("", 520, 312, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input231 = GUICtrlCreateInput("", 552, 312, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input232 = GUICtrlCreateInput("", 576, 312, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input233 = GUICtrlCreateInput("", 608, 312, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input234 = GUICtrlCreateInput("", 632, 312, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input235 = GUICtrlCreateInput("", 664, 312, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input236 = GUICtrlCreateInput("", 688, 312, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input237 = GUICtrlCreateInput("", 720, 312, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input238 = GUICtrlCreateInput("", 744, 312, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input239 = GUICtrlCreateInput("", 48, 336, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input240 = GUICtrlCreateInput("", 72, 336, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input241 = GUICtrlCreateInput("", 104, 336, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input242 = GUICtrlCreateInput("", 128, 336, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input243 = GUICtrlCreateInput("", 160, 336, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input244 = GUICtrlCreateInput("", 184, 336, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input245 = GUICtrlCreateInput("", 216, 336, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input246 = GUICtrlCreateInput("", 240, 336, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input247 = GUICtrlCreateInput("", 272, 336, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input248 = GUICtrlCreateInput("", 296, 336, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input249 = GUICtrlCreateInput("", 328, 336, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input250 = GUICtrlCreateInput("", 352, 336, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input251 = GUICtrlCreateInput("", 384, 336, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input252 = GUICtrlCreateInput("", 408, 336, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input253 = GUICtrlCreateInput("", 440, 336, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input254 = GUICtrlCreateInput("", 464, 336, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input255 = GUICtrlCreateInput("", 496, 336, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input256 = GUICtrlCreateInput("", 520, 336, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input257 = GUICtrlCreateInput("", 552, 336, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input258 = GUICtrlCreateInput("", 576, 336, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input259 = GUICtrlCreateInput("", 608, 336, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input260 = GUICtrlCreateInput("", 632, 336, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input261 = GUICtrlCreateInput("", 664, 336, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input262 = GUICtrlCreateInput("", 688, 336, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input263 = GUICtrlCreateInput("", 720, 336, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input264 = GUICtrlCreateInput("", 744, 336, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input265 = GUICtrlCreateInput("", 48, 360, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input266 = GUICtrlCreateInput("", 72, 360, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input267 = GUICtrlCreateInput("", 104, 360, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input268 = GUICtrlCreateInput("", 128, 360, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input269 = GUICtrlCreateInput("", 160, 360, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input270 = GUICtrlCreateInput("", 184, 360, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input271 = GUICtrlCreateInput("", 216, 360, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input272 = GUICtrlCreateInput("", 240, 360, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input273 = GUICtrlCreateInput("", 272, 360, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input274 = GUICtrlCreateInput("", 296, 360, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input275 = GUICtrlCreateInput("", 328, 360, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input276 = GUICtrlCreateInput("", 352, 360, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input277 = GUICtrlCreateInput("", 384, 360, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input278 = GUICtrlCreateInput("", 408, 360, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input279 = GUICtrlCreateInput("", 440, 360, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input280 = GUICtrlCreateInput("", 464, 360, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input281 = GUICtrlCreateInput("", 496, 360, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input282 = GUICtrlCreateInput("", 520, 360, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input283 = GUICtrlCreateInput("", 552, 360, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input284 = GUICtrlCreateInput("", 576, 360, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input285 = GUICtrlCreateInput("", 608, 360, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input286 = GUICtrlCreateInput("", 632, 360, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input287 = GUICtrlCreateInput("", 664, 360, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input288 = GUICtrlCreateInput("", 688, 360, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input289 = GUICtrlCreateInput("", 720, 360, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input290 = GUICtrlCreateInput("", 744, 360, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input291 = GUICtrlCreateInput("", 48, 384, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input292 = GUICtrlCreateInput("", 72, 384, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input293 = GUICtrlCreateInput("", 104, 384, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input294 = GUICtrlCreateInput("", 128, 384, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input295 = GUICtrlCreateInput("", 160, 384, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input296 = GUICtrlCreateInput("", 184, 384, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input297 = GUICtrlCreateInput("", 216, 384, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input298 = GUICtrlCreateInput("", 240, 384, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input299 = GUICtrlCreateInput("", 272, 384, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input300 = GUICtrlCreateInput("", 296, 384, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input301 = GUICtrlCreateInput("", 328, 384, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input302 = GUICtrlCreateInput("", 352, 384, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input303 = GUICtrlCreateInput("", 384, 384, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input304 = GUICtrlCreateInput("", 408, 384, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input305 = GUICtrlCreateInput("", 440, 384, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input306 = GUICtrlCreateInput("", 464, 384, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input307 = GUICtrlCreateInput("", 496, 384, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input308 = GUICtrlCreateInput("", 520, 384, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input309 = GUICtrlCreateInput("", 552, 384, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input310 = GUICtrlCreateInput("", 576, 384, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input311 = GUICtrlCreateInput("", 608, 384, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input312 = GUICtrlCreateInput("", 632, 384, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input313 = GUICtrlCreateInput("", 664, 384, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input314 = GUICtrlCreateInput("", 688, 384, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input315 = GUICtrlCreateInput("", 720, 384, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input316 = GUICtrlCreateInput("", 744, 384, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input317 = GUICtrlCreateInput("", 48, 408, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input318 = GUICtrlCreateInput("", 72, 408, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input319 = GUICtrlCreateInput("", 104, 408, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input320 = GUICtrlCreateInput("", 128, 408, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input321 = GUICtrlCreateInput("", 160, 408, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input322 = GUICtrlCreateInput("", 184, 408, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input323 = GUICtrlCreateInput("", 216, 408, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input324 = GUICtrlCreateInput("", 240, 408, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input325 = GUICtrlCreateInput("", 272, 408, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input326 = GUICtrlCreateInput("", 296, 408, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input327 = GUICtrlCreateInput("", 328, 408, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input328 = GUICtrlCreateInput("", 352, 408, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input329 = GUICtrlCreateInput("", 384, 408, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input330 = GUICtrlCreateInput("", 408, 408, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input331 = GUICtrlCreateInput("", 440, 408, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input332 = GUICtrlCreateInput("", 464, 408, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input333 = GUICtrlCreateInput("", 496, 408, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input334 = GUICtrlCreateInput("", 520, 408, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input335 = GUICtrlCreateInput("", 552, 408, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input336 = GUICtrlCreateInput("", 576, 408, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input337 = GUICtrlCreateInput("", 608, 408, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input338 = GUICtrlCreateInput("", 632, 408, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input339 = GUICtrlCreateInput("", 664, 408, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input340 = GUICtrlCreateInput("", 688, 408, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input341 = GUICtrlCreateInput("", 720, 408, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input342 = GUICtrlCreateInput("", 744, 408, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input343 = GUICtrlCreateInput("", 48, 432, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input344 = GUICtrlCreateInput("", 72, 432, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input345 = GUICtrlCreateInput("", 104, 432, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input346 = GUICtrlCreateInput("", 128, 432, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input347 = GUICtrlCreateInput("", 160, 432, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input348 = GUICtrlCreateInput("", 184, 432, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input349 = GUICtrlCreateInput("", 216, 432, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input350 = GUICtrlCreateInput("", 240, 432, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input351 = GUICtrlCreateInput("", 272, 432, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input352 = GUICtrlCreateInput("", 296, 432, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input353 = GUICtrlCreateInput("", 328, 432, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input354 = GUICtrlCreateInput("", 352, 432, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input355 = GUICtrlCreateInput("", 384, 432, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input356 = GUICtrlCreateInput("", 408, 432, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input357 = GUICtrlCreateInput("", 440, 432, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input358 = GUICtrlCreateInput("", 464, 432, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input359 = GUICtrlCreateInput("", 496, 432, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input360 = GUICtrlCreateInput("", 520, 432, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input361 = GUICtrlCreateInput("", 552, 432, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input362 = GUICtrlCreateInput("", 576, 432, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input363 = GUICtrlCreateInput("", 608, 432, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input364 = GUICtrlCreateInput("", 632, 432, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input365 = GUICtrlCreateInput("", 664, 432, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input366 = GUICtrlCreateInput("", 688, 432, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input367 = GUICtrlCreateInput("", 720, 432, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input368 = GUICtrlCreateInput("", 744, 432, 25, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$idButton_1 = GUICtrlCreateButton("Calculate", 640, 32, 75, 25, $WS_GROUP)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

 


While 1
    $idMsg = GUIGetMsg()
    Select
        Case $idMsg=$GUI_EVENT_CLOSE
            ExitLoop

        Case $idMsg = $idButton_1
            $hello=GUICtrlRead($Input1)
            Local  $arr[12][28] = [[$hello, $Input2, $Input3, $Input4, $Input5, $Input6, $Input7, $Input8, $Input9, $Input10, $Input11, $Input12, $Input13, $Input14, $Input15, $Input16, $Input17, $Input18, $Input19, $Input20, $Input21, $Input22, $Input23, $Input24, $Input25, $Input26, $Input27, $Input28],[$Input29, $Input30, $Input31, $Input32, $Input33, $Input34, $Input35, $Input36, $Input37, $Input38, $Input39, $Input40, $Input41, $Input42, $Input43, $Input44, $Input45, $Input46, $Input47, $Input48, $Input49, $Input50, $Input51, $Input52, $Input53, $Input54, $Input55, $Input56],[$Input57, $Input58, $Input59, $Input60, $Input61, $Input62, $Input63, $Input64, $Input65, $Input66, $Input67, $Input68, $Input69, $Input70, $Input71, $Input72, $Input73, $Input74, $Input75, $Input76, $Input77, $Input78, $Input79, $Input80, $Input81, $Input82, $Input83, $Input84],[$Input85, $Input86, $Input87, $Input88, $Input89, $Input90, $Input91, $Input92, $Input93, $Input94, $Input95, $Input96, $Input97, $Input98, $Input99, $Input100, $Input101, $Input102, $Input103, $Input104, $Input105, $Input106, $Input107, $Input108, $Input109, $Input110, $Input111, $Input112],[$Input113, $Input114, $Input115, $Input116, $Input117, $Input118, $Input119, $Input120, $Input121, $Input122, $Input123, $Input124, $Input125, $Input126, $Input127, $Input128, $Input129, $Input130, $Input131, $Input132, $Input133, $Input134, $Input135, $Input136, $Input137, $Input138, $Input139, $Input140],[$Input141, $Input142, $Input143, $Input144, $Input145, $Input146, $Input147, $Input148, $Input149, $Input150, $Input151, $Input152, $Input153, $Input154, $Input155, $Input156, $Input157, $Input158, $Input159, $Input160, $Input161, $Input162, $Input163, $Input164, $Input165, $Input166, $Input167, $Input168],[$Input169, $Input170, $Input171, $Input172, $Input173, $Input174, $Input175, $Input176, $Input177, $Input178, $Input179, $Input180, $Input181, $Input182, $Input183, $Input184, $Input185, $Input186, $Input187, $Input188, $Input189, $Input190, $Input191, $Input192, $Input193, $Input194, $Input195, $Input196],[$Input197, $Input198, $Input199, $Input200, $Input201, $Input202, $Input203, $Input204, $Input205, $Input206, $Input207, $Input208, $Input209, $Input210, $Input211, $Input212, $Input213, $Input214, $Input215, $Input216, $Input217, $Input218, $Input219, $Input220, $Input221, $Input222, $Input223, $Input224],[$Input225, $Input226, $Input227, $Input228, $Input229, $Input230, $Input231, $Input232, $Input233, $Input234, $Input235, $Input236, $Input237, $Input238, $Input239, $Input240, $Input241, $Input242, $Input243, $Input244, $Input245, $Input246, $Input247, $Input248, $Input249, $Input250, $Input251, $Input252],[$Input253, $Input254, $Input255, $Input256, $Input257, $Input258, $Input259, $Input260, $Input261, $Input262, $Input263, $Input264, $Input265, $Input266, $Input267, $Input268, $Input269, $Input270, $Input271, $Input272, $Input273, $Input274, $Input275, $Input276, $Input277, $Input278, $Input279, $Input280],[$Input281, $Input282, $Input283, $Input284, $Input285, $Input286, $Input287, $Input288, $Input289, $Input290, $Input291, $Input292, $Input293, $Input294, $Input295, $Input296, $Input297, $Input298, $Input299, $Input300, $Input301, $Input302, $Input303, $Input304, $Input305, $Input306, $Input307, $Input308],[$Input309, $Input310, $Input311, $Input312, $Input313, $Input314, $Input315, $Input316, $Input317, $Input318, $Input319, $Input320, $Input321, $Input322, $Input323, $Input324, $Input325, $Input326, $Input327, $Input328, $Input329, $Input330, $Input331, $Input332, $Input333, $Input334, $Input335, $Input336]]


            For $i = 0 to UBound( $arr, 1) - 1
                For $j = 0 to UBound($arr, 2) - 1
                    ConsoleWrite("$arr[" & $i & "][" & $j & "]:=" & $arr[$i][$j] & @LF)

                Next
            Next

    EndSelect
WEnd

Exit

EndFunc

 

Edited by Melba23
Added code tags
Link to post
Share on other sites
  • Moderators

EvilRubberDuck,

When you post code please use Code tags - see here how to do it.  Then you get a scrolling box and syntax colouring as you can see above now I have added the tags.

M23

Edit: You need to learn about arrays!

Edited by Melba23

Public_Domain.png.2d871819fcb9957cf44f4514551a2935.png Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind

Open spoiler to see my UDFs:

Spoiler

ArrayMultiColSort ---- Sort arrays on multiple columns
ChooseFileFolder ---- Single and multiple selections from specified path treeview listing
Date_Time_Convert -- Easily convert date/time formats, including the language used
ExtMsgBox --------- A highly customisable replacement for MsgBox
GUIExtender -------- Extend and retract multiple sections within a GUI
GUIFrame ---------- Subdivide GUIs into many adjustable frames
GUIListViewEx ------- Insert, delete, move, drag, sort, edit and colour ListView items
GUITreeViewEx ------ Check/clear parent and child checkboxes in a TreeView
Marquee ----------- Scrolling tickertape GUIs
NoFocusLines ------- Remove the dotted focus lines from buttons, sliders, radios and checkboxes
Notify ------------- Small notifications on the edge of the display
Scrollbars ----------Automatically sized scrollbars with a single command
StringSize ---------- Automatically size controls to fit text
Toast -------------- Small GUIs which pop out of the notification area

 

Link to post
Share on other sites

Oh, my bad xD thank you!

Yeah i know, you right about the arrays, i'm sure there is a better way for that array but i didn't yet had the time to look for one. Any ideas?

Edit: I forgot to explain one thing. This part in the code 

$hello=GUICtrlRead($Input1)
            Local  $arr[12][28] = [[$hello (...)

is me trying to force the Input1 to get the value there, but it didn't work either.

Edited by EvilRubberDuck
Link to post
Share on other sites
  • Moderators

EvilRubberDuck,

Here is your code cleaned up a bit and shortened a great deal:

#include <GUIConstantsEx.au3>
#include <MsgBoxConstants.au3>

ola()

Func ola()

    $Form1_1 = GUICreate("Ola", 859, 518, 240, 122)
    $MenuItem1 = GUICtrlCreateMenu("&File")
    $MenuItem3 = GUICtrlCreateMenuItem("New", $MenuItem1)
    $MenuItem4 = GUICtrlCreateMenuItem("Save", $MenuItem1)
    $MenuItem5 = GUICtrlCreateMenuItem("Save as", $MenuItem1)
    $MenuItem6 = GUICtrlCreateMenuItem("Exit", $MenuItem1)
    $MenuItem2 = GUICtrlCreateMenu("&Options")
    $MenuItem7 = GUICtrlCreateMenuItem("Settings", $MenuItem2)

    For $iCol = 1 To 13
        GUICtrlCreateLabel("Coluna " & $iCol, (56 * $iCol) - 8, 80, 56, 17)
        GUICtrlCreateLabel("  +", (56 * $iCol) - 8, 96, 21, 24)
        GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
        GUICtrlCreateLabel("  -", (56 * $iCol) + 16, 96, 17, 24)
        GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
    Next

    For $iRow = 1 To 14
        GUICtrlCreateLabel("Linha " & $iRow, 0, ($iRow * 24) + 100, 45, 17)
    Next

    GUICtrlCreateLabel("Número de Aluno:", 0, 24, 89, 17)
    GUICtrlCreateLabel("Sexo:", 208, 24, 31, 17)
    GUICtrlCreateLabel("Ano:", 64, 48, 26, 17)
    GUICtrlCreateLabel("Turma:", 208, 48, 37, 17)

    $Input_Aluno = GUICtrlCreateInput("", 88, 24, 73, 21)
    $Input_Sexo = GUICtrlCreateInput("", 248, 24, 73, 21)
    $Input_Ano = GUICtrlCreateInput("", 88, 48, 73, 21)
    $Input_Turma = GUICtrlCreateInput("", 248, 48, 73, 21)

    GUICtrlCreateLabel("Mabe by J.Ribas", 688, 472, 83, 17)
    GUICtrlCreateLabel("Resultados", 792, 96, 57, 17)

    Local $aInput[14][15][2] ; [Column][Row][[+/-]

    For $iCol = 1 To 13
        $iX = (56 * $iCol) - 8
        For $iRow = 1 To 14
            $iY = ($iRow * 24) + 96
            $aInput[$iCol][$iRow][0] = GUICtrlCreateInput("", $iX, $iY, 24, 21)
            GUICtrlSetLimit(-1, 1)
            $aInput[$iCol][$iRow][1] = GUICtrlCreateInput("", $iX + 24, $iY, 24, 21)
            GUICtrlSetLimit(-1, 1)
        Next
    Next

    $idButton_Calc = GUICtrlCreateButton("Calculate", 640, 32, 75, 25)
    GUISetState(@SW_SHOW)

    While 1
        $idMsg = GUIGetMsg()
        Select
            Case $idMsg = $GUI_EVENT_CLOSE
                ExitLoop

            Case $idMsg = $idButton_Calc

                MsgBox($MB_SYSTEMMODAL, "Calc", "What do you want to calculate?")
        EndSelect

    WEnd



    Exit

EndFunc   ;==>ola

Now what do you want to happen when the button is pressed?

M23

Public_Domain.png.2d871819fcb9957cf44f4514551a2935.png Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind

Open spoiler to see my UDFs:

Spoiler

ArrayMultiColSort ---- Sort arrays on multiple columns
ChooseFileFolder ---- Single and multiple selections from specified path treeview listing
Date_Time_Convert -- Easily convert date/time formats, including the language used
ExtMsgBox --------- A highly customisable replacement for MsgBox
GUIExtender -------- Extend and retract multiple sections within a GUI
GUIFrame ---------- Subdivide GUIs into many adjustable frames
GUIListViewEx ------- Insert, delete, move, drag, sort, edit and colour ListView items
GUITreeViewEx ------ Check/clear parent and child checkboxes in a TreeView
Marquee ----------- Scrolling tickertape GUIs
NoFocusLines ------- Remove the dotted focus lines from buttons, sliders, radios and checkboxes
Notify ------------- Small notifications on the edge of the display
Scrollbars ----------Automatically sized scrollbars with a single command
StringSize ---------- Automatically size controls to fit text
Toast -------------- Small GUIs which pop out of the notification area

 

Link to post
Share on other sites

Oh wow, that indeed is much better!

I tried with your code and indeed now i can get the values that i write in the Inputboxes, but i still don't understand why with my code i can't get my Inputvalues :/ If you could explain me i would much obliged! 

I just have one small problem with your code: With mine i clicked "TAB" and the mouse passed to the cell to the right till the end of the line, and now is go by coluns. But i think that i resolve that simply by changing the order they are created. (Am i right?)

Now i need to compare the array with all the Inputs with 10 other arrays of the same size and with values predefined. Depending if they are the same or not will vary the final result. But that i want to try it first myself.

Link to post
Share on other sites

but i still don't understand why with my code i can't get my Inputvalues :/ If you could explain me i would much obliged

The line to write your input values to the console should probably look something like this

ConsoleWrite("$arr[" & $i & "][" & $j & "]:=" & guictrlread($arr[$i][$j]) & @LF)

But i think that i resolve that simply by changing the order they are created. (Am i right?)

Yes, change the order of creation to change the tab order.

Oh wow, that indeed is much better!

Yes, M23 is the God of Gui's  :)

Edited by kylomas

Forum Rules         Procedure for posting code

"I like pigs.  Dogs look up to us.  Cats look down on us.  Pigs treat us as equals."

- Sir Winston Churchill

Link to post
Share on other sites
  • Moderators

EvilRubberDuck,

Glad you like the shorter code - please ask if there is anything you do not understand about how or why I managed to reduce it so much.

To change the TABSTOP order you do indeed need to change the creation order - this works as you wish

Local $aInput[15][14][2] ; [Row][Col][[+/-]

For $iRow = 1 To 14
    $iY = ($iRow * 24) + 96
    For $iCol = 1 To 13
        $iX = (56 * $iCol) - 8
        $aInput[$iRow][$iCol][0] = GUICtrlCreateInput("", $iX, $iY, 24, 21)
        GUICtrlSetLimit(-1, 1)
        $aInput[$iRow][$iCol][1] = GUICtrlCreateInput("", $iX + 24, $iY, 24, 21)
        GUICtrlSetLimit(-1, 1)
    Next
Next

Good for you for wanting to try to code the next part yourself - you know where we are if run into any problems.

M23

Public_Domain.png.2d871819fcb9957cf44f4514551a2935.png Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind

Open spoiler to see my UDFs:

Spoiler

ArrayMultiColSort ---- Sort arrays on multiple columns
ChooseFileFolder ---- Single and multiple selections from specified path treeview listing
Date_Time_Convert -- Easily convert date/time formats, including the language used
ExtMsgBox --------- A highly customisable replacement for MsgBox
GUIExtender -------- Extend and retract multiple sections within a GUI
GUIFrame ---------- Subdivide GUIs into many adjustable frames
GUIListViewEx ------- Insert, delete, move, drag, sort, edit and colour ListView items
GUITreeViewEx ------ Check/clear parent and child checkboxes in a TreeView
Marquee ----------- Scrolling tickertape GUIs
NoFocusLines ------- Remove the dotted focus lines from buttons, sliders, radios and checkboxes
Notify ------------- Small notifications on the edge of the display
Scrollbars ----------Automatically sized scrollbars with a single command
StringSize ---------- Automatically size controls to fit text
Toast -------------- Small GUIs which pop out of the notification area

 

Link to post
Share on other sites
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <MsgBoxConstants.au3>
#include <Array.au3>

ola()

Func ola()

#Region ### START Koda GUI section ### Form=c:\users\joaor\desktop\ola.kxf
$Form1_1 = GUICreate("ola", 859, 518, 240, 122)
$MenuItem1 = GUICtrlCreateMenu("&File")
$MenuItem3 = GUICtrlCreateMenuItem("New", $MenuItem1)
$MenuItem4 = GUICtrlCreateMenuItem("Save", $MenuItem1)
$MenuItem5 = GUICtrlCreateMenuItem("Save as", $MenuItem1)
$MenuItem6 = GUICtrlCreateMenuItem("Exit", $MenuItem1)
$MenuItem2 = GUICtrlCreateMenu("&Options")
$MenuItem7 = GUICtrlCreateMenuItem("Settings", $MenuItem2)

$idButton_1 = GUICtrlCreateButton("Calculate", 640, 32, 75, 25, $WS_GROUP)

$Label1 = GUICtrlCreateLabel("Mabe by J.Ribas", 688, 472, 83, 17, $WS_GROUP)
$Label2 = GUICtrlCreateLabel("Número de Aluno:", 0, 24, 89, 17, $WS_GROUP)
$Label3 = GUICtrlCreateLabel("Sexo:", 208, 24, 31, 17, $WS_GROUP)
$Label4 = GUICtrlCreateLabel("Ano:", 64, 48, 26, 17, $WS_GROUP)
$Label5 = GUICtrlCreateLabel("Turma:", 208, 48, 37, 17, $WS_GROUP)
$Label6 = GUICtrlCreateLabel("Resultados", 792, 96, 57, 17, $WS_GROUP)

$Input1 = GUICtrlCreateInput("", 88, 24, 73, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input2 = GUICtrlCreateInput("", 248, 24, 73, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input3 = GUICtrlCreateInput("", 88, 48, 73, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
$Input4 = GUICtrlCreateInput("", 248, 48, 73, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))

$icolum=-8
$numbcol=0
For $icol = 1 to 12
    $icolum=$icolum+56
    $numbcol=$numbcol+1
    GUICtrlCreateLabel("Coluna " & $numbcol, $icolum, 80, 52, 17, $WS_GROUP)
Next

$iline=98
$numblin=0
For $icol = 1 to 14
    $iline=$iline+24
    $numblin=$numblin+1
    GUICtrlCreateLabel("Linha " & $numblin, 4, $iline, 42, 17, $WS_GROUP)
Next

$iplus=-8
$iminus=16
For $icol = 1 to 12
    $iplus=$iplus+56
    $Label34 = GUICtrlCreateLabel("  +", $iplus, 96, 21, 24, $WS_GROUP)
    GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
    $iminus=$iminus+56
    $Label35 = GUICtrlCreateLabel("  -", $iminus, 96, 17, 24, $WS_GROUP)
    GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
Next


$iY=96
$numb=5
$numbr=0
For $ilin = 1 to 14
    $iY=$iY+24
    $iX=24
    $iXr=0
    For $icolu = 1 to 12
        $numb=$numb+$numbr
        $sInput="$" & "Input" &$numb
        $sInput=execute($sInput)

        $iX=$iX+24+$iXr
        $sInput=GUICtrlCreateInput("", $iX, $iY, 24, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
        GUICtrlSetLimit(-1, 1)

        $numb=$numb+1
        $sInput="$" & "Input" &$numb
        $sInput=execute($sInput)

        $sInput=GUICtrlCreateInput("", $iX+24, $iY, 24, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
        GUICtrlSetLimit(-1, 1)
        $iXr=32

        $numbr=1

    Next
Next

GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###




While 1
    $idMsg = GUIGetMsg()
    Select
        Case $idMsg=$GUI_EVENT_CLOSE
            ExitLoop

        Case $idMsg = $idButton_1

                $numb=5
                $numbr=0
                Local  $arr[14][24]
                    For $i=0 to UBound( $arr, 1) -1
                        For $j=0 to UBound( $arr, 2) -1
                            $numb=$numb+$numbr
                            $sInput="$" & "Input" &$numb
                            $sInput=execute($sInput)
                            $arr[$i][$j]=GUICtrlRead($sInput)
                            ConsoleWrite($arr[$i][$j]& @LF)
                            $numbr=1
                        Next
                    Next

                    _ArrayDisplay($arr)

        EndSelect
WEnd

Exit

Thank you so much for your help to this point Melba23!

So wrote my code from scratch basing myself on the code you wrote Melba23, and it's like this now. But because i changed the way the inputs are generated i can´t seem to save them in the array now. 

I tried to define variables to Input's again but it doesn't work.. What am i doing wrong?

Link to post
Share on other sites
  • Moderators

EvilRubberDuck,

I am not surprised you cannot read the inputs as you never store the ControlIDs that are returned when you create them and so have no way to address them. I do not know what you think you are doing with the section of your code:

$numb = $numb + $numbr

$sInput = "$" & "Input" & $numb
$sInput = Execute($sInput)

but it almost certainly not what you believe it to be.

You need to store the returned ControlIDs from the GUICtrlCreateInput calls as these are the values AutoIt uses to identify the control. When you use GUICtrlRead you need to use these values so that AutoIt knows which control you are looking to read. Take a look at how I have modified the code;

#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <MsgBoxConstants.au3>
#include <Array.au3>

ola()

Func ola()


    $Form1_1 = GUICreate("ola", 859, 518, 240, 122)
    $MenuItem1 = GUICtrlCreateMenu("&File")
    $MenuItem3 = GUICtrlCreateMenuItem("New", $MenuItem1)
    $MenuItem4 = GUICtrlCreateMenuItem("Save", $MenuItem1)
    $MenuItem5 = GUICtrlCreateMenuItem("Save as", $MenuItem1)
    $MenuItem6 = GUICtrlCreateMenuItem("Exit", $MenuItem1)
    $MenuItem2 = GUICtrlCreateMenu("&Options")
    $MenuItem7 = GUICtrlCreateMenuItem("Settings", $MenuItem2)

    $idButton_1 = GUICtrlCreateButton("Calculate", 640, 32, 75, 25)

    $Label1 = GUICtrlCreateLabel("Mabe by J.Ribas", 688, 472, 83, 17)
    $Label2 = GUICtrlCreateLabel("Número de Aluno:", 0, 24, 89, 17)
    $Label3 = GUICtrlCreateLabel("Sexo:", 208, 24, 31, 17)
    $Label4 = GUICtrlCreateLabel("Ano:", 64, 48, 26, 17)
    $Label5 = GUICtrlCreateLabel("Turma:", 208, 48, 37, 17)
    $Label6 = GUICtrlCreateLabel("Resultados", 792, 96, 57, 17)

    $Input1 = GUICtrlCreateInput("", 88, 24, 73, 21)
    $Input2 = GUICtrlCreateInput("", 248, 24, 73, 21)
    $Input3 = GUICtrlCreateInput("", 88, 48, 73, 21)
    $Input4 = GUICtrlCreateInput("", 248, 48, 73, 21)

    $icolum = -8
    $numbcol = 0
    For $icol = 1 To 12
        $icolum = $icolum + 56
        $numbcol = $numbcol + 1
        GUICtrlCreateLabel("Coluna " & $numbcol, $icolum, 80, 52, 17)
    Next

    $iline = 98
    $numblin = 0
    For $icol = 1 To 14
        $iline = $iline + 24
        $numblin = $numblin + 1
        GUICtrlCreateLabel("Linha " & $numblin, 4, $iline, 42, 17)
    Next

    $iplus = -8
    $iminus = 16
    For $icol = 1 To 12
        $iplus = $iplus + 56
        $Label34 = GUICtrlCreateLabel("  +", $iplus, 96, 21, 24)
        GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
        $iminus = $iminus + 56
        $Label35 = GUICtrlCreateLabel("  -", $iminus, 96, 17, 24)
        GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
    Next

    ; Create an array to hold the ControlIDs
    Local $aControlID[15][25] ; You need the array size to be one more than the max number as it also has a [0] element

    $iY = 96
    For $ilin = 1 To 14
        $iY = $iY + 24
        $iX = 24
        $iXr = 0
        For $icolu = 1 To 12
            $iX = $iX + 24 + $iXr

            ; Add the ControlIDs to the array when the inputs are created
            $aControlID[$ilin][($icolu * 2) - 1] = GUICtrlCreateInput("", $iX, $iY, 24, 21)
            GUICtrlSetLimit(-1, 1)
            $aControlID[$ilin][$icolu * 2] = GUICtrlCreateInput("", $iX + 24, $iY, 24, 21)
            GUICtrlSetLimit(-1, 1)
            $iXr = 32
        Next
    Next

    GUISetState(@SW_SHOW)


    _ArrayDisplay($aControlID, "ControlIds", Default, 8)


    While 1
        $idMsg = GUIGetMsg()
        Select
            Case $idMsg = $GUI_EVENT_CLOSE
                ExitLoop



            Case $idMsg = $idButton_1
                ; Create an array to hold the input content - it is the same size as the array we created to hold the ControlIDs
                Local $aInputContent[15][25]
                For $i = 1 To 14
                    For $j = 1 To 24
                        ; Now read the content of each input and store it in the array - we use the stored ControlID to identify the control to read
                        $aInputContent[$i][$j] = GUICtrlRead($aControlID[$i][$j])
                    Next
                Next
                ; And here is the result
                _ArrayDisplay($aInputContent)

        EndSelect

    WEnd



    Exit

EndFunc   ;==>ola

Does that make it clearer?

M23

Public_Domain.png.2d871819fcb9957cf44f4514551a2935.png Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind

Open spoiler to see my UDFs:

Spoiler

ArrayMultiColSort ---- Sort arrays on multiple columns
ChooseFileFolder ---- Single and multiple selections from specified path treeview listing
Date_Time_Convert -- Easily convert date/time formats, including the language used
ExtMsgBox --------- A highly customisable replacement for MsgBox
GUIExtender -------- Extend and retract multiple sections within a GUI
GUIFrame ---------- Subdivide GUIs into many adjustable frames
GUIListViewEx ------- Insert, delete, move, drag, sort, edit and colour ListView items
GUITreeViewEx ------ Check/clear parent and child checkboxes in a TreeView
Marquee ----------- Scrolling tickertape GUIs
NoFocusLines ------- Remove the dotted focus lines from buttons, sliders, radios and checkboxes
Notify ------------- Small notifications on the edge of the display
Scrollbars ----------Automatically sized scrollbars with a single command
StringSize ---------- Automatically size controls to fit text
Toast -------------- Small GUIs which pop out of the notification area

 

Link to post
Share on other sites

I tried to create a controlID using the info here, but it seems it doesn't work that well here or i made a mistake..

Can you tell me if it's possible to use this to create "controlsID"?

$numb = $numb + $numbr

$sInput = "$" & "Input" & $numb
$sInput = Execute($sInput)

$iX=$iX+24+$iXr
        $Input=GUICtrlCreateInput("", $iX, $iY, 24, 21, BitOR($ES_AUTOHSCROLL,$WS_GROUP))
        GUICtrlSetLimit(-1, 1)

I thought this would create and Input associated to the variable $Input5 (5 being the number in $numb). I wanted this so i could then call this variable with guictrlread.

Analyzing your the thing that i dint't know was that i could use arrays as variables. What i mean is that i thought that i could only use arrays in my code to store information.

Edited by EvilRubberDuck
Link to post
Share on other sites
  • Moderators

EvilRubberDuck,

I thought this would create and Input associated to the variable $Input5

Not a chance - like I said:

 I do not know what you think you are doing with the section of your code [...] but it almost certainly not what you believe it to be

I have no idea what that thread to which you linked is on about - some people here get far too fancy for their own good and overcomplicate things to an absolutely ridiculous degree.

Best to operate on the KISS principle and stick with storing and recalling the ControlIDs as I showed above - did you understand the changes I made?

M23

Public_Domain.png.2d871819fcb9957cf44f4514551a2935.png Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind

Open spoiler to see my UDFs:

Spoiler

ArrayMultiColSort ---- Sort arrays on multiple columns
ChooseFileFolder ---- Single and multiple selections from specified path treeview listing
Date_Time_Convert -- Easily convert date/time formats, including the language used
ExtMsgBox --------- A highly customisable replacement for MsgBox
GUIExtender -------- Extend and retract multiple sections within a GUI
GUIFrame ---------- Subdivide GUIs into many adjustable frames
GUIListViewEx ------- Insert, delete, move, drag, sort, edit and colour ListView items
GUITreeViewEx ------ Check/clear parent and child checkboxes in a TreeView
Marquee ----------- Scrolling tickertape GUIs
NoFocusLines ------- Remove the dotted focus lines from buttons, sliders, radios and checkboxes
Notify ------------- Small notifications on the edge of the display
Scrollbars ----------Automatically sized scrollbars with a single command
StringSize ---------- Automatically size controls to fit text
Toast -------------- Small GUIs which pop out of the notification area

 

Link to post
Share on other sites
  • Moderators

EvilRubberDuck,

Great. Let me know if I can help again in the future.

M23

Public_Domain.png.2d871819fcb9957cf44f4514551a2935.png Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind

Open spoiler to see my UDFs:

Spoiler

ArrayMultiColSort ---- Sort arrays on multiple columns
ChooseFileFolder ---- Single and multiple selections from specified path treeview listing
Date_Time_Convert -- Easily convert date/time formats, including the language used
ExtMsgBox --------- A highly customisable replacement for MsgBox
GUIExtender -------- Extend and retract multiple sections within a GUI
GUIFrame ---------- Subdivide GUIs into many adjustable frames
GUIListViewEx ------- Insert, delete, move, drag, sort, edit and colour ListView items
GUITreeViewEx ------ Check/clear parent and child checkboxes in a TreeView
Marquee ----------- Scrolling tickertape GUIs
NoFocusLines ------- Remove the dotted focus lines from buttons, sliders, radios and checkboxes
Notify ------------- Small notifications on the edge of the display
Scrollbars ----------Automatically sized scrollbars with a single command
StringSize ---------- Automatically size controls to fit text
Toast -------------- Small GUIs which pop out of the notification area

 

Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
  • Recently Browsing   0 members

    No registered users viewing this page.

  • Similar Content

    • By funkey
      Hello,
      it's quite often, that someone asks how to change the texts of the MsgBox buttons or the InputBox buttons or how to change the position of ta MsgBox. Since years I use CBT hooks for that, but now I made a small UDF out of it for the ease of use. Of course you can build your own GUI or use already existing UDFs to do the same, but I like this way and you can hack (hook) the inbuild InputBox.
       
      HookDlgBox.au3
      #include-once #include <WinAPI.au3> Global Const $tagCBT_CREATEWND = "ptr lpcs;HWND tagCBT_CREATEWND" Global Const $tagCREATESTRUCT = "ptr lpCreateParams;handle hInstance;HWND hMenu;HWND hwndParent;int cy;int cx;int y;int x;LONG style;ptr lpszName;ptr lpszClass;DWORD dwExStyle" Global $g__hProcDlgBox = DllCallbackRegister("__DlgBox_CbtHookProc", "LRESULT", "int;WPARAM;LPARAM") Global $g__TIdDlgBox = _WinAPI_GetCurrentThreadId() Global $g__hHookDlgBox = _WinAPI_SetWindowsHookEx($WH_CBT, DllCallbackGetPtr($g__hProcDlgBox), 0, $g__TIdDlgBox) Global Const $g__MaxDlgBtns = 5 ; maximum of 5 buttons to rename text Global Const $g__MaxDlgItemId = 11 ; maximun ID of buttons to search is 11 as this is the maximun used in Messagebox Global $g__DlgBoxPosX, $g__DlgBoxPosY, $g__DlgBoxWidth, $g__DlgBoxHeight Global $g__aDlgBoxBtnText[$g__MaxDlgBtns] Global $g__DlgBtnCount = 0 _DlgBox_SetDefaults() OnAutoItExitRegister("__DlgBox_UnregisterHook") Func _DlgBox_SetButtonNames($TxtBtn1 = Default, $TxtBtn2 = Default, $TxtBtn3 = Default, $TxtBtn4 = Default, $TxtBtn5 = Default) $g__aDlgBoxBtnText[0] = $TxtBtn1 $g__aDlgBoxBtnText[1] = $TxtBtn2 $g__aDlgBoxBtnText[2] = $TxtBtn3 $g__aDlgBoxBtnText[3] = $TxtBtn4 $g__aDlgBoxBtnText[4] = $TxtBtn5 $g__DlgBtnCount = @NumParams EndFunc ;==>_DlgBox_SetButtonNames Func _DlgBox_SetPosition($x = Default, $y = Default) ;only for MsgBox, not working and not needed for InputBox $g__DlgBoxPosX = $x $g__DlgBoxPosY = $y EndFunc ;==>_DlgBox_SetPosition Func _DlgBox_SetSize($w = Default, $h = Default) $g__DlgBoxWidth = $w $g__DlgBoxHeight = $h EndFunc ;==>_DlgBox_SetSize Func _DlgBox_SetDefaults() $g__DlgBoxPosX = Default $g__DlgBoxPosY = Default $g__DlgBoxWidth = Default $g__DlgBoxHeight = Default For $i = 0 To UBound($g__aDlgBoxBtnText) - 1 $g__aDlgBoxBtnText[$i] = Default Next EndFunc ;==>_DlgBox_SetDefaults Func __DlgBox_CbtHookProc($nCode, $wParam, $lParam) Local $tcw, $tcs Local $iSearch = 0 Local $ahBtn[$g__DlgBtnCount] If $nCode < 0 Then Return _WinAPI_CallNextHookEx($g__hHookDlgBox, $nCode, $wParam, $lParam) EndIf Switch $nCode Case 3 ;5=HCBT_CREATEWND If _WinAPI_GetClassName(HWnd($wParam)) = "#32770" Then ;Dialoig window class $tcw = DllStructCreate($tagCBT_CREATEWND, $lParam) $tcs = DllStructCreate($tagCREATESTRUCT, DllStructGetData($tcw, "lpcs")) If $g__DlgBoxPosX <> Default Then DllStructSetData($tcs, "x", $g__DlgBoxPosX) If $g__DlgBoxPosY <> Default Then DllStructSetData($tcs, "y", $g__DlgBoxPosY) If $g__DlgBoxWidth <> Default Then DllStructSetData($tcs, "cx", $g__DlgBoxWidth) If $g__DlgBoxHeight <> Default Then DllStructSetData($tcs, "cy", $g__DlgBoxHeight) EndIf Case 5 ;5=HCBT_ACTIVATE For $i = 1 To $g__MaxDlgItemId If IsHWnd(_WinAPI_GetDlgItem($wParam, $i)) Then If $g__aDlgBoxBtnText[$iSearch] <> Default Then _WinAPI_SetDlgItemText($wParam, $i, $g__aDlgBoxBtnText[$iSearch]) $iSearch += 1 If $iSearch >= UBound($ahBtn) Then ExitLoop EndIf Next EndSwitch Return _WinAPI_CallNextHookEx($g__hHookDlgBox, $nCode, $wParam, $lParam) EndFunc ;==>__DlgBox_CbtHookProc Func __DlgBox_UnregisterHook() _WinAPI_UnhookWindowsHookEx($g__hHookDlgBox) DllCallbackFree($g__hProcDlgBox) EndFunc ;==>__DlgBox_UnregisterHook Func _WinAPI_SetDlgItemText($hDlg, $nIDDlgItem, $lpString) Local $aRet = DllCall('user32.dll', "int", "SetDlgItemText", _ "hwnd", $hDlg, _ "int", $nIDDlgItem, _ "str", $lpString) Return $aRet[0] EndFunc ;==>_WinAPI_SetDlgItemText  
      Simple example to see how to use it
      #include "HookDlgBox.au3" _DlgBox_SetButtonNames("1", "two", "3") MsgBox(4, "Test 1", "Custom button texts") _DlgBox_SetPosition(20, 20) MsgBox(66, "Test 2", "Custom position and button texts") _DlgBox_SetButtonNames("Submit", "Don't submit", "Don't know") InputBox("Test 3", "Where were you born?", "Planet Earth") _DlgBox_SetSize(800, 800) InputBox("Test 4", "Where were you born?", "Planet Earth") _DlgBox_SetSize(Default, 800) MsgBox(66, "Test 5", "Strange but working") _DlgBox_SetButtonNames(Default, "Wait", "What?") _DlgBox_SetSize(Default, Default) _DlgBox_SetPosition(500, 500) MsgBox(66, "Test 6", "So far so good!") _DlgBox_SetDefaults() MsgBox(6, "Test 7", "Default position and button texts") Hope you like it.
       
      Best regards
      funkey
      HookDlgBox Example.au3
       
      HookDlgBox.au3
    • By odaylton
      Text translated from Portuguese by google - please apologize for any errors
       
      First I have to thank the development team for product quality and the ease with which it is possible to develop tools with AutoIt.
       
      I am developing a series of libraries to facilitate the creation of Forms that once it is stable and comprehensive I intend to share here for autoit
      But suddenly during development an unexpected effect appeared in simple inputbox fields.
       
      Everything is working fine, however if I'm in an inputbox, don't change its selected content and move focus to another field the selected text remains blue (selected) instead of returning to normal
      See the image....

      When pricing 3x TABs all remain blue
       
      However if I change the field , when leaving its focus it behaves normally
      See the ex below:

      1) I selected “tipo Default” and pressed TAB (to test what happens)
      2) typed "TESTE" and pressed TAB
      3) I pressed TAB 2x again and the "Centralizado" field turned blue
      Note: by default, when receiving focus, the text is always automatically selected
       
      Here are some parts of the code:
      Gui  create:
      ;modifique o tamanho inicial aqui ;$Form[$Form[0][0]][1] = 600 ;largura =800 ;$Form[$Form[0][0]][2] = 600 ;Atura =600 ;$Form[$Form[0][0]][3] = "RoboAutomato - "&$NomeProjeto $Form[$Form[0][0]][0] = GUICreate($Form[$Form[0][0]][3], _ $Form[$Form[0][0]][1], $Form[$Form[0][0]][2], _ Default, Default, _ BitOR($GUI_SS_DEFAULT_GUI, $WS_MAXIMIZEBOX, $WS_SIZEBOX, $WS_THICKFRAME, $WS_TABSTOP, $WS_POPUP)) GUISetFont($FormFonteTam, _ ;Tamanho da Fonte $FormFonteTipo, _ ;Tipo da Fonte $FormFonteEstilo, _ ;Estilo da Fonte $FormFonteNome) ; Nome da Fonte #Region Criando ToolTip $hGUIToolTip = _GUIToolTip_Create($Form[$Form[0][0]][0], BitOR($_TT_ghTTDefaultStyle, $TTS_BALLOON)) ; balloon style tooltip #EndRegion Criando ToolTip  inputs create:
      .... InputCriar(200, 200, _ ;Coordenadas Base Default, Default, _ ;Largura e Altura automatica se negativo em função do extremo da janela "|Referencia|", _ ;Label do Input "Tudo Default ou qq diferente de 1,2,3,4: mais simples", _ ;Texto explicativo do InputBox e seu label "Teste do tipo Default", _ ;Valor Default da Input Default, _ ;0 é Defaultou define o estilo Default, _ ;Defini a forma de incerção Default=20 caracteres "CCCCCCCCCCCCCCCCCCCC" Default, _ Default, _ Default, _ ; Tipo de alinhamento em relação a Janela Default, _ ;Tamanho da Fonte Default, _ ;Tipo da Fonte Default, _ ;Estilo da Fonte Default) ; Nome da Fonte InputCriar(200, Default, _ ;Coordenadas Base Default, Default, _ ;Largura e Altura automatica se negativo em função do extremo da janela "|Canto inferior esquerdo|", _ ;Label do Input "Tipo 1: 2 linhas", _ ;Texto explicativo do InputBox e seu label "Tipo 1: 2 linhas", _ ;Valor Default da Input 1, _ ;0 é Defaultou define o estilo Default, _ ;Defini a forma de incerção Default=20 caracteres "CCCCCCCCCCCCCCCCCCCC" Default, _ Default, _ Default, _ ; Tipo de alinhamento em relação a Janela Default, _ ;Tamanho da Fonte Default, _ ;Tipo da Fonte Default, _ ;Estilo da Fonte Default) ; Nome da Fonte ..... Function InputCriar:
      Func InputCriar($InputX = Default, $InputY = Default, _ ;Coordenadas Base Canto Superior Esquerdo se não definido proxima linha e coluna $InputWidth = Default, $InputHeight = Default, _ ;Largura e Altura automatica se negativo em função do extremo da janela $InputRotulo = "", _ ;Label do Inpu $InputTip = "", _ ;Texto explicativo do InputBox e seu label $InputDefault = "", _ ;Valor Default da Input $InputAlin = Default, _ ;0 é Defaultou define o estilo $InputMascara = Default, _ ;Defini a forma de incerção Default=20 caracteres "CCCCCCCCCCCCCCCCCCCC" $InputEstilo = Default, _ $InputEstiloEx = Default, _ $InputResizing = Default, _ ; Tipo de alinhamento em relação a Janela $InputTamFonte = Default, _ ;Tamanho da Fonte $InputFonteTipo = Default, _ ;Tipo da Fonte $InputFonteEstilo = Default, _ ;Estilo da Fonte $InputFonteNome = Default) ; Nome da Fonte .... $InputEstilo = BitOR($ES_AUTOHSCROLL, _ $WS_TABSTOP) ... $InputEstiloEx = $WS_EX_CLIENTEDGE ;formato baixo relevo ... $Inputs[$Inputs[0][0]][0] = GUICtrlCreateInput($Mascara5, _ ;Default da Input $Form[$Form[0][0]][6]+$InputX, $Form[$Form[0][0]][7]+$InputY, _ ;Coordenadas Base $InputWidth, $InputHeight, _ ;Altura e largura automatica $InputEstilo, _ ;Estilo $InputEstiloEx) ;Extilo extra ... GUICtrlSetData($Inputs[$Inputs[0][0]][0], $Inputs[$Inputs[0][0]][3]) Return $Inputs[$Inputs[0][0]][0] EndFunc ;==>InputCriar sorry for not putting all the code because there are many libraries and they are in the initial stage of development
       
      What should I change to get Inputbox's behavior back to normal????
      Thank you for your attention
    • By nooneclose
      Why can I not click on either of my input fields?
      #Region ### START Koda GUI section ### Form= Global $Form1 = GUICreate("Form1", 730, 437, 192, 124) ;GUISetFont(14, 800, 0, "MS Sans Serif") GUISetBkColor(0xC0DCC0) Global $Label1 = GUICtrlCreateLabel("Enter your Password. UserName is auto filled", 62, 40, 604, 41, $SS_CENTER) GUICtrlSetFont(-1, 26, 800, 0, "MS Sans Serif") Global $Label2 = GUICtrlCreateLabel("User Name:", 120, 130, 604, 31, $SS_LEFT) GUICtrlSetFont(-1, 20, 800, 0, "MS Sans Serif") Global $Label3 = GUICtrlCreateLabel("Password:", 135, 210, 604, 31, $SS_LEFT) GUICtrlSetFont(-1, 20, 800, 0, "MS Sans Serif") Global $Input1 = GUICtrlCreateInput(@UserName, 274, 130, 185, 32) GUICtrlSetFont(-1, 14, 800, 1, "MS Sans Serif") Global $Input2 = GUICtrlCreateInput("Password", 274, 210, 185, 32, $ES_PASSWORD) GUICtrlSetFont(-1, 14, 800, 0, "MS Sans Serif") Global $OK = GUICtrlCreateButton("OK", 274, 270, 185, 57) GUICtrlSetFont(-1, 20, 800, 0, "MS Sans Serif") GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $OK Global $UserName = GUICtrlRead($Input1) Global $PassWord = GUICtrlRead($Input2) ExitLoop EndSwitch WEnd ; Delete the GUI window GUIDelete()  
    • By matwachich
      Hi AutoIters!
      Here is my new UDF about GUIs: it's an enhanced mixture of Advanced InputBox (deprecated) and KODA Parser (deprecated), with additional functions.
      What you can do with it:
      Parse KODA files and directly create GUIs (_GUIUtils_CreateFromKODA) Parse a simple JSON form definition to simply create advanced InputBoxes with any amount/type of input controls (_GUIUtils_CreateFromJSON) Created GUIs are returned as Scripting.Dictionary objects, and you have helper functions to access GUIs controls by their names (_GUIUtils_HWnd, _GUIUtils_CtrlID, _GUIUtils_HCtrl ...) A function that can make a GUI created from KODA/JSON (defined by it's $oForm object) and make it a modal InputDialogBox (just like InputBox, but returns all entered data as Scripting.Dictionary object) Functions are documented, and there are some examples.
      Consider this UDF as beta, but since I'm currently using it in a small commercial project, it should become production ready in near future.
      To always get the latest code version, get it from Github (more up to date than this topic).
      Update 04/02/2020:
      New simple application example Fixed focused control handling in _GUIUtils_InputDialog Reset input values before returning from _GUIUtils_InputDialog Fixed CloseOnEsc in _GUIUtils_InputDialog Fixed Input not reset Fixed all ListBox items are selected Project now on GitHub https://github.com/matwachich/autoit-guiutils/
      Update 05/02/2020:
      Support for nodate for Date and Time input controls (pass null value) New handling of focused control _GUIUtils_InputDialog: Now, you can specify the focused control in $oInitialData by setting "controlName:focus" = True Updated documentation of _GUIUtils_InputDialog Update 07/02/2020:
      Bug corrected when setting Data input control Added: abillity to read a single input control New functions (_GUIUtils_GetInputs, _GUIUtils_WriteInputs), documentation completion. Readme file and screenshots on Github Page  
      GUIUtils.zip
    • By matwachich
      DEPRECATED: see this new UDF
       
×
×
  • Create New...