@darendeli
Numaraları listeye yazdırmadan önce bir arrayda sıralatırsan daha verimli olacaktır. Aşağıdaki örneği incelersin...
Kod: Tümünü seç
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <GUIListBox.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
;Elimizdeki sayıları arrayda sıralatalım.
Local $MY_NUMBERS[4][3] = [[3]] ;Toplam sıramız 3 olsun.
;Birinci listenin sayıları
$MY_NUMBERS[1][0] = 195
$MY_NUMBERS[2][0] = 175
$MY_NUMBERS[3][0] = 25
;Ikinci listenin sayıları
$MY_NUMBERS[1][1] = 132
$MY_NUMBERS[2][1] = 141
$MY_NUMBERS[3][1] = 348
Local $Form1 = GUICreate("Form1", 538, 438, 192, 124)
Local $List1 = GUICtrlCreateList("", 32, 32, 121, 253,10485760)
Local $List2 = GUICtrlCreateList("", 176, 32, 121, 253,10485760)
Local $Button1 = GUICtrlCreateButton("Yeni Numara Ekle", 32, 344, 265, 33)
Local $Button2 = GUICtrlCreateButton("Sonuçları aktar", 305, 344, 220, 33,1)
Local $List3 = GUICtrlCreateList("", 328, 32, 193, 253,10485760)
Local $Input1 = GUICtrlCreateInput("55", 32, 312, 121, 21)
Local $Input2 = GUICtrlCreateInput("84", 176, 312, 121, 21)
GUISetState(@SW_SHOW)
For $I = 1 to $MY_NUMBERS[0][0]
GUICtrlSetData($List1, $MY_NUMBERS[$I][0] & "|")
GUICtrlSetData($List2, $MY_NUMBERS[$I][1] & "|")
Next
#EndRegion ### END Koda GUI section ###
Local $Number1, $Number2
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
$Number1 = Number(GUICtrlRead($Input1))
$Number2 = Number(GUICtrlRead($Input2))
If $Number1 = 0 Then
GUICtrlSetState($Input1,256)
ContinueLoop
EndIf
If $Number2 = 0 Then
GUICtrlSetState($Input2,256)
ContinueLoop
EndIf
$MY_NUMBERS[0][0] += 1
Redim $MY_NUMBERS[$MY_NUMBERS[0][0] + 1][3]
$MY_NUMBERS[$MY_NUMBERS[0][0]][0] = $Number1
$MY_NUMBERS[$MY_NUMBERS[0][0]][1] = $Number2
GUICtrlSetData($List1, $Number1 & "|")
GUICtrlSetData($List2, $Number2 & "|")
Case $Button2
GUICtrlSetData($List3,"") ;Clear List
For $I = 1 to $MY_NUMBERS[0][0]
$MY_NUMBERS[$I][2] = $MY_NUMBERS[$I][0] + $MY_NUMBERS[$I][1]
GUICtrlSetData($List3,$MY_NUMBERS[$I][0] & " + " & $MY_NUMBERS[$I][1] & " = " & $MY_NUMBERS[$I][2] & "|")
Next
EndSwitch
WEnd
