x_files_x Posted December 27, 2017 Share Posted December 27, 2017 Mrb, arkadaşlar. Diyelim ki run("deneme.exe") komutu ile ilgili programı çalıştırdık. Bu deneme.exe dosyasının aktif pencere başlığına nasıl ulaşırım? 1 Quote Link to comment Share on other sites More sharing options...
darendeli Posted December 27, 2017 Share Posted December 27, 2017 (edited) Global $AktifPencereAdi = WinGetTitle("[ACTIVE]") MsgBox(0,"Çalısan Pencerenin Başlığı",$AktifPencereAdi) ;Exe Nin Adını Mesaj ile Gösterme $Programim = Run("Notepad.exe") WinWait($Programim, "", 2) $handle = WinGetHandle("[CLASS:Notepad]") MsgBox(0, "", WinGetTitle($handle, "")) Edited December 27, 2017 by darendeli Quote Link to comment Share on other sites More sharing options...
x_files_x Posted January 5, 2018 Author Share Posted January 5, 2018 darendeli, 27.12.2017 - 17:09 yazdı: Global $AktifPencereAdi = WinGetTitle("[ACTIVE]") MsgBox(0,"Çalısan Pencerenin Başlığı",$AktifPencereAdi) ;Exe Nin Adını Mesaj ile Gösterme $Programim = Run("Notepad.exe") WinWait($Programim, "", 2) $handle = WinGetHandle("[CLASS:Notepad]") MsgBox(0, "", WinGetTitle($handle, "")) darendeli kardeş, eline sağlık işime yaradı Quote Link to comment Share on other sites More sharing options...
darendeli Posted January 19, 2018 Share Posted January 19, 2018 (edited) #include <ButtonConstants.au3> #include <EditConstants.au3> #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> Global $AktifPencereAdi = WinGetTitle("[ACTIVE]") #Region ### START Koda GUI section ### Form= $Form1 = GUICreate("Aktif Pencerenin Adı", 342, 101, 192, 124) $Input1 = GUICtrlCreateInput("", 24, 24, 297, 21) $Button1 = GUICtrlCreateButton("Kontrol Et", 24, 56, 185, 33) $Checkbox1 = GUICtrlCreateCheckbox("Sürekli Kontrol Et", 224, 54, 105, 17) $Checkbox2 = GUICtrlCreateCheckbox("Sürekli Üstte Tut", 224, 74, 105, 17) $herzamanustte = 0 GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $Button1 GUICtrlSetData($Input1,$AktifPencereAdi) Case $Checkbox1 If GUICtrlRead($Checkbox1) = $GUI_CHECKED Then AdlibRegister("_PencereBilgi",1000) ElseIf GUICtrlRead ($Checkbox1) = $GUI_UNCHECKED Then AdlibUnRegister("_PencereBilgi") EndIf Case $Checkbox2 If GUICtrlRead($Checkbox2) = $GUI_CHECKED Then $herzamanustte = Not $herzamanustte WinSetOnTop ($Form1,"",$herzamanustte) Else WinSetOnTop ($Form1,"","") EndIf EndSwitch WEnd Func _PencereBilgi() Global $AktifPencereAdi = WinGetTitle("[ACTIVE]") If $AktifPencereAdi == "Aktif Pencerenin Adı" Then GUICtrlSetData($Input1,"") Else GUICtrlSetData($Input1,$AktifPencereAdi) EndIf EndFunc Pencere Baslıklarını Gösteren Kücük bir Gui Yaptım Lazım olan Kullanır... Edited January 19, 2018 by darendeli 1 Quote Link to comment Share on other sites More sharing options...
x_files_x Posted February 19, 2018 Author Share Posted February 19, 2018 @darendeli eline sağlık kardeşim güzel olmuş Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.