ฟอรั่ม 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

    โปรแกรมใช้ไปสักพักเด้ง Error ช่วยบอกวิธีแก้ที

    avatar
    senzaa456
    มือใหม่เพิ่งสมัคร
    มือใหม่เพิ่งสมัคร


    โปรแกรมใช้ไปสักพักเด้ง Error ช่วยบอกวิธีแก้ที Empty โปรแกรมใช้ไปสักพักเด้ง Error ช่วยบอกวิธีแก้ที Empty
    จำนวนข้อความ : 3
    ความนิยม : 0
    เข้าร่วมเมื่อ : 26/05/2013

    โปรแกรมใช้ไปสักพักเด้ง Error ช่วยบอกวิธีแก้ที Empty โปรแกรมใช้ไปสักพักเด้ง Error ช่วยบอกวิธีแก้ที

    ตั้งหัวข้อ by senzaa456 24/06/13, 06:32 pm

    Code:

    Func test()
    Opt("MouseCoordMode", 2)
    Opt("PixelCoordMode", 2)
    Opt("CaretCoordMode", 2)
    $CN = GUICtrlRead($Input1)
    $DL = GUICtrlRead($Input3)

    If WinExists(GUICtrlRead($Input4)) Then WinActivate(GUICtrlRead($Input4))
    While 1
     $coord = PixelSearch( 5,102, 791,535, GUICtrlRead($Input2))
     If _IsPressed($CN) Then
      Sleep($DL)
      MouseClick("",$coord[0] ,$coord[1],1,0)
            While _IsPressed($CN)
                Sleep($DL)
      WEnd
      Else
            Sleep($DL)
      EndIf
     WEnd
    EndFunc

    ผมมือใหม่ครับ (เด็กน้อยก็งี้แหละ) เขียนโค๊ด  คลิกขวาแล้วจะเลื่อนเม้าส์ไปคลิกที่สี แต่ใช้แปปเดียวก็เด้งขึ้น Error

    MouseClick("",$coord[0] ,$coord[1],1,0)
    MouseClick("",$coord ^ ERROR

    Error:Subscipt used with non-Array Variable

    ต้องแก้ยังไงครับ  (ขอบคุณล่วงหน้าครับ)
    avatar
    themeenmm
    สมาชิกทั่วไป
    สมาชิกทั่วไป


    โปรแกรมใช้ไปสักพักเด้ง Error ช่วยบอกวิธีแก้ที Empty โปรแกรมใช้ไปสักพักเด้ง Error ช่วยบอกวิธีแก้ที Empty
    จำนวนข้อความ : 16
    ความนิยม : 0
    เข้าร่วมเมื่อ : 30/04/2013

    โปรแกรมใช้ไปสักพักเด้ง Error ช่วยบอกวิธีแก้ที Empty Re: โปรแกรมใช้ไปสักพักเด้ง Error ช่วยบอกวิธีแก้ที

    ตั้งหัวข้อ by themeenmm 24/06/13, 08:28 pm

    Code:

    Func test()
    Opt("MouseCoordMode", 2)
    Opt("PixelCoordMode", 2)
    Opt("CaretCoordMode", 2)
    $CN = GUICtrlRead($Input1)
    $DL = GUICtrlRead($Input3)

    If WinExists(GUICtrlRead($Input4)) Then WinActivate(GUICtrlRead($Input4))
    While 1
     $coord = PixelSearch( 5,102, 791,535, GUICtrlRead($Input2))
     If Not @error Then กันเออเร่อลองดู จะเหมือนกันป่าว
     If _IsPressed($CN) Then
      Sleep($DL)
      MouseClick("",$coord[0] ,$coord[1],1,0)
      EndIf
            While _IsPressed($CN)
                Sleep($DL)
      WEnd
      Else
            Sleep($DL)
      EndIf
     WEnd
    EndFunc


    ลองใช้ดูครับ

      เวลาขณะนี้ 19/04/24, 06:40 pm