how to create a country input field, which can show the list immediately when i click on it or i press the 'Tab'

[1stPK]

cho tôi biết cách tạo trường nhập quốc gia, có thể hiển thị danh sách ngay lập tức khi tôi nhấp vào trường đó hoặc khi tôi nhấn nút 'Tab' trên bàn phím
 

expandcollapse popup

#include <GUIConstantsEx.au3>
#include <MsgBoxConstants.au3>
Toàn cầu $g_Countries = "Afghanistan|Albania|Algeria|Andorra|Angola|Antigua và Barbuda|Argentina|Armenia|Úc|Áo|Azerbaijan|" & _
    "Bahamas|Bahrain|Bangladesh|Barbados|Belarus|Belgium|Belize|Benin|Bhutan|Bolivia|Bosnia và Herzegovina|Botswana|Brazil|Brunei|Bulgaria|Burkina Faso|Burundi|" & _
    "Cabo Verde|Campuchia|Cameroon|Canada|Cộng hòa Trung Phi|Chad|Chile|Trung Quốc|Colombia|Comoros|Congo (Congo-Brazzaville)|Costa Rica|Croatia|Cuba|Síp|Cộng hòa Séc|" & _
    "Cộng hòa Dân chủ Congo|Đan Mạch|Djibouti|Dominica|Cộng hòa Dominica|Ecuador|Ai Cập|El Salvador|Guinea Xích Đạo|Eritrea|Estonia|Eswatini|Ethiopia|” & _
    "Fiji|Phần Lan|Pháp|Gabon|Gambia|Georgia|Đức|Ghana|Hy Lạp|Grenada|Guatemala|Guinea|Guinea-Bissau|Guyana|Haiti|Tòa thánh|Honduras|Hungary|Iceland|Ấn Độ|" & _
    "Indonesia|Iran|Iraq|Ireland|Israel|Ý|Jamaica|Nhật Bản|Jordan|Kazakhstan|Kenya|Kiribati|Kuwait|Kyrgyzstan|Lào|Latvia|Liban|Lesotho|Liberia|Libya|Liechtenstein|" & _
    "Litva|Luxembourg|Madagascar|Malawi|Malaysia|Maldives|Mali|Malta|Quần đảo Marshall|Mauritania|Mauritius|Mexico|Micronesia|Moldova|Monaco|Mông Cổ|Montenegro|" & _
    "Ma-rốc|Mozambique|Myanmar|Namibia|Nauru|Nepal|Hà Lan|New Zealand|Nicaragua|Niger|Nigeria|Bắc Triều Tiên|Bắc Macedonia|Na Uy|Oman|Pakistan|Palau|" & _
    "Nhà nước Palestine|Panama|Papua New Guinea|Paraguay|Peru|Philippines|Ba Lan|Bồ Đào Nha|Qatar|Romania|Nga|Rwanda|Saint Kitts và Nevis|Saint Lucia|" & _
    "Saint Vincent và Grenadines|Samoa|San Marino|Sao Tome và Principe|Ả-Rập Xê-út|Senegal|Serbia|Seychelles|Sierra Leone|Singapore|Slovakia|Slovenia|" & _
    "Quần đảo Solomon|Somalia|Nam Phi|Hàn Quốc|Nam Sudan|Tây Ban Nha|Sri Lanka|Sudan|Suriname|Thụy Điển|Thụy Sĩ|Syria|Tajikistan|Tanzania|Thái Lan|" & _
    "Timor-Leste|Togo|Tonga|Trinidad và Tobago|Tunisia|Thổ Nhĩ Kỳ|Turkmenistan|Tuvalu|Uganda|Ukraine|Các Tiểu Vương quốc Ả Rập Thống nhất|Vương quốc Anh|Hoa Kỳ|" & _
    "Uruguay|Uzbekistan|Vanuatu|Thành phố Vatican|Venezuela|Việt Nam|Yemen|Zambia|Zimbabwe"

; Tạo cửa sổ GUI
$hGUI = GUICreate("Đăng ký tài khoản", 400, 300)

; Tạo các trường nhập liệu
GUICtrlCreateLabel("ID", 20, 20)
$ID = GUICtrlCreateInput("", 100, 20, 200, 20)

GUICtrlCreateLabel("Mật khẩu", 20, 60)
$Pass = GUICtrlCreateInput("", 100, 60, 200, 20, 0x0020)

GUICtrlCreateLabel("Email", 20, 100)
$Email = GUICtrlCreateInput("", 100, 100, 200, 20)

GUICtrlCreateLabel("Số điện thoại", 20, 140)
$SDT = GUICtrlCreateInput("", 100, 140, 200, 20)

GUICtrlCreateLabel("Quốc gia", 20, 180)
$countryInput cục bộ = GUICtrlCreateCombo("", 100, 180, 200, 20)
GUICtrlSetData($countryInput, $g_Countries)

; Tạo nút Đăng ký
$btnRegister = GUICtrlCreateButton("Đăng ký", 150, 220, 100, 30)

; Hiển thị cửa sổ GUI
Giao diện thiết lập trạng thái ()

; Vòng lặp sự kiện
Trong khi 1
    $iMsg = GUIGetMsg()
    
    Chuyển đổi $iMsg
        Trường hợp $GUI_EVENT_CLOSE
            Ra
        Trường hợp $btnRegister
            ; Lấy dữ liệu từ các trường nhập
            $strID = GUICtrlRead($ID)
            $strPass = GUICtrlRead($Pass)
            $strEmail = GUICtrlRead($Email)
            $strSDT = GUICtrlRead($SDT)
            $strCountry = GUICtrlRead($Country)
            
            ; Kiểm tra xem tất cả các trường đã được điền chưa
            Nếu $strID == "" Hoặc $strPass == "" Hoặc $strEmail == "" Hoặc $strSDT == "" Hoặc $strCountry == "" Thì
                MsgBox($MB_ICONERROR, "Lỗi", "Vui lòng điền vào tất cả các trường!")
            Khác
                ; Mô phỏng đăng ký thành công (bạn có thể thêm logic để lưu hoặc xác thực)
                MsgBox($MB_ICONINFORMATION, "Đăng ký thành công", "Bạn đã đăng ký thành công!")
            Kết thúcNếu
    Kết thúc chuyển đổi
Cuối

 

Edited 1 hour ago by 1stPK

[Dan_555]

GUICtrlCreateCombo

[Nine]

GUIRegisterMsg($WM_COMMAND, WM_COMMAND)

and

Func WM_COMMAND($hWnd, $iMsg, $wParam, $lParam)
  Local $idCombo = _WinAPI_LoWord($wParam)
  Local $iNotif = _WinAPI_HiWord($wParam)
  If $iNotif = $CBN_SETFOCUS and $idCombo = $countryInput Then GUICtrlSendMsg($idCombo, $CB_SHOWDROPDOWN, True, 0)
  Return $GUI_RUNDEFMSG
EndFunc