ฟอรั่ม PSsix

Would you like to react to this message? Create an account in a few clicks or log in to continue.

ฟอรั่มของบล็อก http://pssix.blogspot.com


2 posters

    ช่วยดู Checkbox ของผมหน่อยนะครับ

    avatar
    chaodroger
    PSsix Member Class II
    PSsix Member Class II


    ช่วยดู Checkbox ของผมหน่อยนะครับ Empty ช่วยดู Checkbox ของผมหน่อยนะครับ Empty
    จำนวนข้อความ : 30
    ความนิยม : 0
    เข้าร่วมเมื่อ : 30/12/2013

    ช่วยดู Checkbox ของผมหน่อยนะครับ Empty ช่วยดู Checkbox ของผมหน่อยนะครับ

    ตั้งหัวข้อ by chaodroger 17/02/14, 07:56 pm

    Code:
    #include <ButtonConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>


    $Form1 = GUICreate("Form1", 207, 321, 499, 129)
    $Start = GUICtrlCreateButton("Start", 40, 168, 75, 25)
    $Checkbox = GUICtrlCreateCheckbox("Checkbox", 40, 32, 97, 17)


    GUISetState(@SW_SHOW)

      While 1
          $nMsg = GUIGetMsg()
        Switch $nMsg
            Case $GUI_EVENT_CLOSE
                Exit
            Case $Start

               Sleep(500)
               Start()

        EndSwitch
     WEnd




    Func Start()

    If GUICtrlRead($Checkbox) = 1 Than
     
    ToolTip( "Hello World" , 0, 0)

    Endif
    EndFunc

    ในกระทูเก่าๆก็ย้อนไปอ่าน
    ใน Google เอาตัวอย่างมาศึกษาทีละอัน F1 ก็กดอ่านดูแล้ว
    ส่วนมากก็เห็นเค้าใช้ 

    If GUICtrlRead($Checkbox) = 1 Than



    ทำไมของผม Run สคริปไม่ขึ้นอ่ะครับ T-T

    ปล.ขอบคุณครับ ตอนแรกว่าจะไม่โพสถามแล้วอยากหาด้วยเอง สุดท้ายก็หาไม่ได้ T0T
    Arm
    Arm
    PSsix Member Super Class III
    PSsix Member Super Class III


    PSsix Master PSsix Program Coder
    จำนวนข้อความ : 268
    ความนิยม : 54
    เข้าร่วมเมื่อ : 31/03/2011
    อายุ : 26

    ช่วยดู Checkbox ของผมหน่อยนะครับ Empty Re: ช่วยดู Checkbox ของผมหน่อยนะครับ

    ตั้งหัวข้อ by Arm 17/02/14, 08:15 pm

    Error! บรรทัดที่ #31 em232 เขียน Than ผิด แก้เป็น Then
    (ไม่น่าจะเขียนผิดนะ เพราะมันก็มีตัวตรวจสอบไวยากรณ์อยู่แล้วนี่ครับ แต่ถ้ารีบๆก็ผิดได้) em228 

    แล้วก็ GUICtrlRead($Checkbox) = 1 ที่ถูกต้องควรจะเขียนเป็น GUICtrlRead($Checkbox) = $GUI_CHECKED

    Code:
    #include <ButtonConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>

    $Form1 = GUICreate("Form1", 207, 321, 499, 129)
    $Start = GUICtrlCreateButton("Start", 40, 168, 75, 25)
    $Checkbox = GUICtrlCreateCheckbox("Checkbox", 40, 32, 97, 17)
    GUISetState(@SW_SHOW)

    While 1
     $nMsg = GUIGetMsg()
     Switch $nMsg
     Case $GUI_EVENT_CLOSE
     Exit
            Case $Start
     Start()
     EndSwitch
    WEnd

    Func Start()
     If GUICtrlRead($Checkbox) = $GUI_CHECKED Then
     ToolTip( "Hello World" , 0, 0)
     Else
     ToolTip("")
     EndIf
    EndFunc

    EDIT: เสริม If Else ใน Func Start() ให้นิดนึง em230 ชินจัง 
    avatar
    chaodroger
    PSsix Member Class II
    PSsix Member Class II


    ช่วยดู Checkbox ของผมหน่อยนะครับ Empty ช่วยดู Checkbox ของผมหน่อยนะครับ Empty
    จำนวนข้อความ : 30
    ความนิยม : 0
    เข้าร่วมเมื่อ : 30/12/2013

    ช่วยดู Checkbox ของผมหน่อยนะครับ Empty Re: ช่วยดู Checkbox ของผมหน่อยนะครับ

    ตั้งหัวข้อ by chaodroger 17/02/14, 08:41 pm

    โห่่ววว ว่าแล้ว นั่ง งมทั้งวัน T0T ~~~~~ ขอบคุณครับ T^T

      เวลาขณะนี้ 28/03/24, 06:54 pm