Jump to content

Alfabetik Yada Numerik Sıralama


woramon
 Share

Recommended Posts

Bir çalışmam var, fakat auto-it alfabetik / numerik sıralama yapabilyormu tam emin değilim. Eğer yapabiliyorsa hangi pluginle yada hangi kodlarla yapabilirim Yardımlerınızı bekliyorum. Şimdiden yardım eden teşşekkür ederim.(konuya biraz geç cevap yazabilirim. Bulunduğum bilgisyarın intrneti yok bu tür durumlar için internet kafaye gitmek zorunda kalıyorum)
Link to comment
Share on other sites

teşekkür ederim. Zaten gui işlemlerindeyim ama bir yandan da belirli kodların kafamda oluşmasını istiyorum.(burdan yardım isterken bazen proje kodlarınıda vermem gereke bilir.Yardımı Özel mesajla istesem olurmu).

Bir de bu programda bir çok exe olcak ve yüklü olduğu yerin içinde bir exe yığıntısı olmasını istemiyorum.Autoitte Autoplay Media Studio gibi tek exe de birden fazla menü ile çalışabiliyormuyuz.Böyle bir örnek görmüştüm. Ama benim gui tasarımımın kodları biraz daha farklı, örnek bir tasarım şeklim aşağıda:)
Tabi exe yığıntısından kurtulmanın farklı yollarını biliyorsanız oda olabilir :)
[codebox]#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
Opt("GUIOnEventMode", 1)
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 408, 282, 192, 124)
GUISetOnEvent($GUI_EVENT_CLOSE, "Form1Close")
GUISetOnEvent($GUI_EVENT_MINIMIZE, "Form1Minimize")
GUISetOnEvent($GUI_EVENT_MAXIMIZE, "Form1Maximize")
GUISetOnEvent($GUI_EVENT_RESTORE, "Form1Restore")
$Button1 = GUICtrlCreateButton("Button1", 56, 112, 105, 33)
GUICtrlSetOnEvent($Button1, "Button1Click")
$Input1 = GUICtrlCreateInput("Input1", 56, 80, 81, 21)
GUICtrlSetOnEvent($Input1, "Input1Change")
$Label1 = GUICtrlCreateLabel("Label1", 56, 56, 36, 17)
GUICtrlSetOnEvent($Label1, "Label1Click")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
Sleep(100)
WEnd

Func Button1Click()

EndFunc
Func Form1Close()

EndFunc
Func Form1Maximize()

EndFunc
Func Form1Minimize()

EndFunc
Func Form1Restore()

EndFunc
Func Input1Change()

EndFunc
Func Label1Click()

EndFunc
[/codebox]

Edited by woramon
Link to comment
Share on other sites

Ilgili dosyaları Fileinstall komutu ile autoit içine gömüp, çalıştırmak istediğinde temp klasörüne çıkartarak çalıştırabilirsin.
[codebox]#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <Array.au3>

Global $Array[1] = [0]

Opt("GUIOnEventMode", 1)
#region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 408, 282, 192, 124)
GUISetOnEvent($GUI_EVENT_CLOSE, "Form1Close")

$Button1 = GUICtrlCreateButton("Button1", 56, 112, 105, 33)
GUICtrlSetOnEvent($Button1, "Button1Click")
$Input1 = GUICtrlCreateCombo("", 56, 80, 81, 21)
GUICtrlCreateLabel("Label1", 56, 56, 36, 17)
GUISetState(@SW_SHOW)

While 1
Sleep(100)
WEnd

Func Button1Click()
Local $InputRead = StringStripWS(GUICtrlRead($Input1), 3)
If $InputRead = "" Then Return 0

For $I = 1 To $Array[0]
If $Array[$I] = $InputRead Then Return 0
Next

$Array[0] += 1
ReDim $Array[$Array[0] + 1]

$Array[$Array[0]] = $InputRead

_ArraySort($Array, 0, 1)
_ArrayDisplay($Array, "Test 1-2-3")

Local $ComboSetData
For $I = 1 To $Array[0]
$ComboSetData &= $Array[$I] & "|"
Next

GUICtrlSetData($Input1, "")
GUICtrlSetData($Input1, $ComboSetData, $InputRead)

EndFunc ;==>Button1Click

Func Form1Close()
Exit
EndFunc ;==>Form1Close[/codebox]

Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

 Share

  • Recently Browsing   0 members

    No registered users viewing this page.

×
×
  • Create New...