Jump to content

Autoit Butona Bastırma Sorunu


NightVision

Recommended Posts

Mrb,

Dükkanda kullandığmız lisanslı bir pro için autoit başladım makro yazmaya, kurulum yapılıyor,

güncelleme işide tamam fakat iş en son kısma gelince kalıyor, en son lisans numarasını girdiyorum

labele yapıştırıyor seri numarasını tamam, fakat tamam tuşuna basamadım, autoit de Au3info yardımıyla butonun adına baktım buton adı yok arka plana gizli gibi program delphi ile yazılmış DEDE programını açıp butonun adını buldum fakar autoit butonu görmediği için kod işe yaramadı, tab ve enter tuşlarını kullanrak tamam butanuna basmak istedim oda olmadı ne gibi bir yol önerirsiniz?

Link to comment
Share on other sites

TAB tusuyla muhakkak gelebilmelisin o butona, yoksa baska bir cozum bulamazsin.

Haa birde MouseClick() vardi galiba [ismini tam hatirlamiyorum ama ....].

Yalniz MouseClick sadece senin bilgisayarinda ise yarar o da ekranini degistirmezsen...

Saygilarimla,

CCoder.

Link to comment
Share on other sites

@NightVision

Autoit v3 Windows Info programında tıklatmaya çalıştığın butonun bilgilerine ulaşamıyorsan @CCoder söylediği gibi MouseClick fonksiyonunu kullanabilirsin.

Lakin, her ekran çözünürlülüğünde sorunsuz çalışması için ilgilis satrıdan önce Opt("MouseCoordMode",0) komutunu yazmalısın.

Butonun konumun öğrenmek için ise Autoit v3 Windows Info'da Control sekmesine bak. Örnek bir script verim.

Opt("MouseCoordMode",0)
Global $Title = "BlueLife - Test"
WinWait($Title,"")
If Not WinActive($Title,"") Then WinActivate($Title,"")
WinWaitActive($Title,"")
MouseClick("left", 90, 130)[/CODE]

Yukarıda Opt("MouseCoordMode",0) kullandığımı için ekrana gelen gui ekranı nerde olursa olsun, sonuç değişmez...

Biraz kurcala... Kolay gelsin......

Link to comment
Share on other sites

@NightVision

Autoit v3 Windows Info programında tıklatmaya çalıştığın butonun bilgilerine ulaşamıyorsan @CCoder söylediği gibi MouseClick fonksiyonunu kullanabilirsin.

Lakin, her ekran çözünürlülüğünde sorunsuz çalışması için ilgilis satrıdan önce Opt("MouseCoordMode",0) komutunu yazmalısın.

Butonun konumun öğrenmek için ise Autoit v3 Windows Info'da Control sekmesine bak. Örnek bir script verim.

Opt("MouseCoordMode",0)
Global $Title = "BlueLife - Test"
WinWait($Title,"")
If Not WinActive($Title,"") Then WinActivate($Title,"")
WinWaitActive($Title,"")
MouseClick("left", 90, 130)[/CODE]

Yukarıda Opt("MouseCoordMode",0) kullandığımı için ekrana gelen gui ekranı nerde olursa olsun, sonuç değişmez...

Biraz kurcala... Kolay gelsin......

Verdiğin bilgileri için teşekkür ederim, senin dediğin yöneteme bakayım dedim fakat bu seferde pencerenin adının olmadığı farkettim resim aşşağıda

111qyx3.jpg

Link to comment
Share on other sites

Bak orda yzıyor... Onu kullanabilirsin...

Örnek olarak;

Opt("MouseCoordMode",0)
Global $Title = "[CLASS:Tgvffrm]"
WinWait($Title,"")
If Not WinActive($Title,"") Then WinActivate($Title,"")
WinWaitActive($Title,"")
MouseClick("left", 90, 130)[/CODE]

Kolay gelsin....

Edit: Ufak bir hata.. :D

Link to comment
Share on other sites

Tabiki Classıda kullanabilirsin. Yukarıda örnek vermiştim. "[CLASS:Tgvffrm]"

Mesaj için ise, Msgbox kullanabilirisin.

MsgBox(64,"Bilgi...","Kurulum başarı ile tamamlandı!" & @crlf & "Bu mesaj kutusu 10 saniye içinde kapanacak...",10)[/CODE]

vs. gbi...

Link to comment
Share on other sites

  • 2 ay sonra...

Arkadaşlar benimde bir sorunum var ilgilenirseniz sevinirim.

KolMoves programını kuruyorum.Herşey tamam serial girdiriliyor lakin şu ekranı bir türlü geçemedim.

51yf00.jpg

ShellExecuteWait("fo-k742.exe", "fo-k742.exe /VERYSILENT /SUPPRESSMSGBOXES /NORESTART /SP-")

ShellExecute(@ProgramFilesDir & "\KoolMoves\koolmoves.exe")

WinWait("Register")

WinSetTrans("Register", "", 1)

WinActivate("Register")

ControlClick("Register", "", "Edit1")

ClipPut("ReCep www.tnctr.com")

Send("^v")

Send("{TAB}")

ClipPut("K7-44Ra-agGa")

Send("^v")

ControlClick("Register", "", "Button1")

WinWait("KoolMoves")

WinSetTrans("KoolMoves", "", 1)

WinActivate("KoolMoves")

ControlClick("KoolMoves", "", "Button1")

WinWait("Tip of the Day")

WinSetTrans("Tip of the Day", "", 1)

WinActivate("Tip of the Day")

ControlClick("Tip of the Day", "", "Button1")

Run('taskkill.exe /f /im koolmoves.exe')

Run('taskkill.exe /f /im koolmoves.exe') yerine ProcessClose("koolmoves.exe") yapıyorum yine olmuyor takıldığım yer Tip of the Day penceresi burayı bir türlü atlayamadım.Bu pencerede ControlClick("Tip of the Day", "", "Button1") yerine Send("{ESC}") veya Send("{SPACE}") veya Send("{ENTER}") yapıyorum olmuyor.Normalde elle kurunca o pencerede bu tuşlara basınca oluyor.bu kısmı nasıl geçeceğim.Yardım ederseniz sevinirim.

Link to comment
Share on other sites

blue_life hocanın verdigi bi kod var onu yazarsan sorun olmuyor diyordu

bak bunu yazmış;

------------------------------

Autoit v3 Windows Info programında tıklatmaya çalıştığın butonun bilgilerine ulaşamıyorsan @CCoder söylediği gibi MouseClick fonksiyonunu kullanabilirsin.

Lakin, her ekran çözünürlülüğünde sorunsuz çalışması için ilgilis satrıdan önce Opt("MouseCoordMode",0) komutunu yazmalısın.

Butonun konumun öğrenmek için ise Autoit v3 Windows Info'da Control sekmesine bak. Örnek bir script verim.

CODE

Opt("MouseCoordMode",0)

Global $Title = "BlueLife - Test"

WinWait($Title,"")

If Not WinActive($Title,"") Then WinActivate($Title,"")

WinWaitActive($Title,"")

MouseClick("left", 90, 130)

Yukarıda Opt("MouseCoordMode",0) kullandığımı için ekrana gelen gui ekranı nerde olursa olsun, sonuç değişmez...

Biraz kurcala... Kolay gelsin......

---------------------------------------

Link to comment
Share on other sites

Archived

This topic is now archived and is closed to further replies.

  • Recently Browsing   0 members

    No registered users viewing this page.

×
×
  • Create New...