ขอวิธีทำให้หน้าต่าง มันไปอยู่ชิดจอ มุมล่างขวาหน่อยครับ

ขอแบบ PSsix NetMeter v1.2 วัดความเร็วดาวน์โหลด/อัปโหลด

อยากได้อย่างงั้นมากเลยครับ และให้มันไปอยูุ่มุมนั้นไม่ไหวหน้าจอขนาดเท่าไหร่ก็ตาม

และก็อีกอันนึง ตั้งให้เป็น ทำงานทุกครั้งที่เปิดเครื่องด้วยนะครับ

ขอบคุณครับ

rolovely พิมพ์ว่า:ขอแบบ PSsix NetMeter v1.2 วัดความเร็วดาวน์โหลด/อัปโหลด

อยากได้อย่างงั้นมากเลยครับ และให้มันไปอยูุ่มุมนั้นไม่ไหวหน้าจอขนาดเท่าไหร่ก็ตาม

และก็อีกอันนึง ตั้งให้เป็น ทำงานทุกครั้งที่เปิดเครื่องด้วยนะครับ

ขอบคุณครับ

---------------------------------------------------------------------------------------------
ผมขออนุญาตแนะแนวทางให้นะครับ จะไม่เขียนโค๊ดให้ท่านนำไปใช้ตรงๆเลย

การคิดและเขียนคำสั่งด้วยตนเองได้ จะเกิดเป็นความภาคภูมิใจ เป็นโปรแกรมเมอร์ที่มีคุณภาพได้ในอนาคต

ท่านลองใช้คำสั่งเหล่านี้ลองเขียนโค๊ดลงมาให้ดูก่อนครับ ผิดหรือถูกไม่เป็นไร เดี๋ยวผมแก้ไขเพิ่มเติมเป็นความรู้ให้.

ฝึกเขียนคำสั่งและการใช้งานไฟล์ INI เพื่อกำกับควบคุมการทำงานของโปรแกรมไว้จะดีมาก
-------------------------------------------------------------------------------------------------------------------
WinGetPos()
WinMove()
GUICtrlGetHandle()
GUICtrlSetPos()
GUIGetStyle()
_WinAPI_ClientToScreen()
_WinAPI_GetClientHeight()
_WinAPI_GetClientRect()
_WinAPI_GetXYFromPoint()
_WinAPI_MoveWindow()
_WinAPI_MoveTo()
_WinAPI_SetWindowPos()

WinPosition SampleCode

Code:

#NoTrayIcon
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>

Opt("MustDeclareVars", 1)
Opt("TrayMenuMode", 1)

Global $GuiTitle = 'WinPosition'

Local $Form1 = GUICreate($GuiTitle, 219, 130, -1, -1)
Local $Form1context = GUICtrlCreateContextMenu()
Local $MenuItem1 = GUICtrlCreateMenu("Option", $Form1context)
Local $MenuItem3 = GUICtrlCreateMenu("View", $MenuItem1)
Local $MenuItem4 = GUICtrlCreateMenuItem("Help", $MenuItem3)
Local $MenuItem7 = GUICtrlCreateMenuItem("", $MenuItem3)
Local $MenuItem12 = GUICtrlCreateMenuItem("About", $MenuItem3)
Local $MenuItem2 = GUICtrlCreateMenuItem("LeftTop", $MenuItem1)
Local $MenuItem9 = GUICtrlCreateMenuItem("RightTop", $MenuItem1)
Local $MenuItem5 = GUICtrlCreateMenuItem("LeftButton", $MenuItem1)
Local $MenuItem6 = GUICtrlCreateMenuItem("RighttButton", $MenuItem1)
Local $MenuItem13 = GUICtrlCreateMenuItem("", $MenuItem1)
Local $MenuItem10 = GUICtrlCreateMenuItem("ScreenCenter", $MenuItem1)
Local $MenuItem11 = GUICtrlCreateMenuItem("", $Form1context)
Local $MenuItem8 = GUICtrlCreateMenuItem("Exit", $Form1context)
Local $Label1 = GUICtrlCreateLabel("เลือกตำแหน่งมุมมองได้2วิธี", 32, 24, 128, 20)
GUICtrlSetFont(-1, 10, 400, 4, "MS Sans Serif")
Local $Label2 = GUICtrlCreateLabel("1.คลิ๊กขวาที่หน้าต่าง GUI", 32, 56, 115, 15)
Local $Label3 = GUICtrlCreateLabel("2.คลิ๊กขวาที่ TrayIcon บนทาสก์บาร์", 32, 80, 165, 15)
Local $MenuItem14 = TrayCreateMenu("Option")
Local $MenuItem15 = TrayCreateMenu("View", $MenuItem14)
Local $MenuItem19 = TrayCreateItem("Help", $MenuItem15)
Local $MenuItem22 = TrayCreateItem("", $MenuItem15)
Local $MenuItem20 = TrayCreateItem("About", $MenuItem15)
Local $MenuItem17 = TrayCreateItem("LeftTop", $MenuItem14)
Local $MenuItem18 = TrayCreateItem("RightTop", $MenuItem14)
Local $MenuItem23 = TrayCreateItem("LeftButton", $MenuItem14)
Local $MenuItem24 = TrayCreateItem("RightButton", $MenuItem14)
Local $MenuItem25 = TrayCreateItem("", $MenuItem14)
Local $MenuItem26 = TrayCreateItem("ScreenCenter", $MenuItem14)
Local $MenuItem21 = TrayCreateItem("")
Local $MenuItem16 = TrayCreateItem("Exit")
GUISetState(@SW_SHOW)
TraySetState()
TraySetClick(16)
While 1
    Local $nMsg = GUIGetMsg()
   Switch $nMsg
      Case $GUI_EVENT_CLOSE  ;Context menu control.
         Exit
      Case $MenuItem8
         ExitLoop
      Case $MenuItem2
         WinMove($GuiTitle, "", 0, 0)
      Case $MenuItem9
         WinMove($GuiTitle, "", 800, 0)
      Case $MenuItem5
         WinMove($GuiTitle, "", 0, 570)
      Case $MenuItem6
         WinMove($GuiTitle, "", 800, 570)
      Case $MenuItem10
         WinMove($GuiTitle, "", 400, 300)
      Case $MenuItem12
         MsgBox(64, "", "Create by: sak2005")
   EndSwitch
   
   Local $msg = TrayGetMsg()
   Switch $msg
       Case $MenuItem16  ;Tray menu control.
         ExitLoop
        Case $MenuItem17
            WinMove($GuiTitle, "", 0, 0)
      Case $MenuItem18
         WinMove($GuiTitle, "", 800, 0)
      Case $MenuItem23
         WinMove($GuiTitle, "", 0, 570)
      Case $MenuItem24
         WinMove($GuiTitle, "", 800, 570)
      Case $MenuItem26
         WinMove($GuiTitle, "", 400, 300)
      Case $MenuItem20
         MsgBox(64, "", "Create by: sak2005")
   EndSwitch
WEnd