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


ผู้รู้ช่วยหน่อยนะครับ

Share

soziie
PSsix Member Class II
PSsix Member Class II


จำนวนข้อความ : 37
ความนิยม : 1
เข้าร่วมเมื่อ : 10/12/2011

ผู้รู้ช่วยหน่อยนะครับ

ตั้งหัวข้อ by soziie on 10/12/11, 09:58 pm

พอดีอยากสร้างโปรแกรมที่เป็นช่องให้ใส่ข้อความอะครับอยากได้ประมาน 10 - 20 ข้อความ ประมานนี้อะครับ

สวัสดีครับ
สวัสดีค่ะ
สบายดีไหม

อยากได้ประมานนี้อะครับ แล้วแบบว่า ทำเป็น hotkey อะครับ ประมานว่ากด F1 แล้วSendคำว่าสวัสดีครับ กด F2 แล้วSendคำว่าสวัสดีค่ะ ประมานนี้อะคัฟ ยังไงช่วยแนะนำหน่อยนะครับ ขอบคุณมากๆพอดีเพิ่งหัดเขียนครับ

POS
PSsix
PSsix


จำนวนข้อความ : 1151
ความนิยม : 323
เข้าร่วมเมื่อ : 19/07/2010

Re: ผู้รู้ช่วยหน่อยนะครับ

ตั้งหัวข้อ by POS on 11/12/11, 09:28 am

ตัวอย่างตามสคริปต์ด้านล่างนี้ ตั้งค่าปุ่ม F1 ถึง F9

Code:
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>

Global $Input[9] ,$Label[9] ,$il =16
$Form1 = GUICreate("PSsix", 240, 390,-1,-1 )
for $i =0 to 8
 $Input[$i]= GUICtrlCreateInput($i+1, 16, $il, 121, 21)
$Label[$i] = GUICtrlCreateLabel("กดปุ่ม F"&$i+1 , 152, $il, 107, 17)
$il +=40
$keyset ="{"&"F"&$i+1 &"}"
$fn ="fn"&$i+1
HotKeySet($keyset , $fn)
   Next

GUISetState(@SW_SHOW)


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

Func fn1()
Send(GUICtrlRead($Input[0]))
   EndFunc

Func fn2()
Send(GUICtrlRead($Input[1]))
   EndFunc

Func fn3()
Send(GUICtrlRead($Input[2]))
   EndFunc

Func fn4()
Send(GUICtrlRead($Input[3]))
   EndFunc

Func fn5()
Send(GUICtrlRead($Input[4]))
   EndFunc

Func fn6()
Send(GUICtrlRead($Input[5]))
   EndFunc

Func fn7()
Send(GUICtrlRead($Input[6]))
   EndFunc

   Func fn8()
Send(GUICtrlRead($Input[7]))
   EndFunc

   Func fn9()
Send(GUICtrlRead($Input[8]))
   EndFunc



||----------------------------------------------------------------------------------------------------------------||

กลุ่ม AutoIt ในเฟสบุ๊ค
[You must be registered and logged in to see this link.]

++++++++++++++++++++++++++++++++++++++++++++
pssix.blogspot.com

soziie
PSsix Member Class II
PSsix Member Class II


จำนวนข้อความ : 37
ความนิยม : 1
เข้าร่วมเมื่อ : 10/12/2011

Re: ผู้รู้ช่วยหน่อยนะครับ

ตั้งหัวข้อ by soziie on 11/12/11, 01:27 pm

ขอบคุณมากๆเลยคราฟฟ

    เวลาขณะนี้ 28/02/17, 02:46 pm