Search the Community

Chắc các bạn ở đây sẽ có người có những chiếc laptop "xịn" hỗ trợ độ phân giải Full HD, 2k, với độ phân giải đó mà nhét vào màn hình 15-17 ich thì thực sự kinh khủng vì thứ gì cũng trở lên "bé tí", và windows nó đề nghị mình chạy scale 125 - 150% tùy loại, như màn hình của mình chẳng hạn Điều đó thực sự khó chịu khi mình thiết kế giao diện hiện trên Visual studio "đẹp như tiên" mà khi chạy lên thì "like sịt", khoảng cách các input to tổ bố luôn, cái gì cũng bị kéo dãn mờ tịt, thật kinh khủng ! Để giải quyết vấn đề này, bạn hãy làm theo mình nhé. 1. Trong file Program.cs, bạn sửa thành thế này: static class Program { // Sử dụng WinAPI [System.Runtime.InteropServices.DllImport("user32.dll")] private static extern bool SetProcessDPIAware(); [STAThread] static void Main() { SetProcessDPIAware(); Application.EnableVisualStyles(); Application.SetCompatibleTextRenderingDefault(false); Application.Run(new frmMain()); } } 2. Tiếp theo, mở design của form cần thiết kế lên AutoScaleMode bạn chọn DPI nhé OK, đơn giản vậy thôi, thử chạy chương trình lên, nó sẽ giống hệt những gì bạn design, thật tuyệt vời ^^!

Tải về: [Hidden Content] Tác giả: Huỳnh Phúc Huy https://www.facebook.com/phuchuy1992

Mặc định Control Edit của GUI AutoIt không có chức năng Select All (Ctrl + A) nên ta phải thêm code vào. 1. Code khi chế độ GUI là GUIGetMsg() $GUI = GUICreate("Ctrl + A để select all text trong Edit", 310, 210) $Edit1 = GUICtrlCreateEdit("test1", 2, 2, 300, 100) $Edit2 = GUICtrlCreateEdit("test2", 2, 104, 300, 100) GUISetState(@SW_SHOWNOACTIVATE) #Region <Thêm 3 dòng code này> $Ctrl_A = GUICtrlCreateDummy() Local $DefButton[1][2] = [["^a", $Ctrl_A]] GUISetAccelerators($DefButton) #EndRegion While Sleep(40) Switch GUIGetMsg() #region <Thêm 2 dòng code này> Case $Ctrl_A GUICtrlSendMsg(DllCall("user32.dll", "int", "GetDlgCtrlID", "hwnd", ControlGetHandle("", "", "[CLASSNN:" & ControlGetFocus("") & "]"))[0], 0xB1, 0, -1) #EndRegion Case -3 Exit EndSwitch WEnd 2. Code khi chế độ GUI là SetOnEvent: Opt("GUIOnEventMode", 1) $GUI = GUICreate("Ctrl + A để select all text trong Edit", 310, 210) GUISetOnEvent(-3, "_Exit") $Edit1 = GUICtrlCreateEdit("test1", 2, 2, 300, 100) $Edit2 = GUICtrlCreateEdit("test2", 2, 104, 300, 100) GUISetState(@SW_SHOWNOACTIVATE) #Region <Thêm 3 dòng code này> $Ctrl_A = GUICtrlCreateDummy() GUICtrlSetOnEvent($Ctrl_A, "_SelectAll") Local $DefButton[1][2] = [["^a", $Ctrl_A]] GUISetAccelerators($DefButton) #EndRegion While Sleep(30) WEnd Func _SelectAll() GUICtrlSendMsg(DllCall("user32.dll", "int", "GetDlgCtrlID", "hwnd", ControlGetHandle("", "", "[CLASSNN:" & ControlGetFocus("") & "]"))[0], 0xB1, 0, -1) EndFunc Func _Exit() Exit EndFunc

Mọi người cho e hỏi là mình muốn zoom cửa sổ về một kích thuớc cố định thì mình dùng code ntn ạ, mong mn giúp e với