x_files_x
-
Posts
503 -
Joined
-
Last visited
Content Type
Profiles
Forums
Calendar
Posts posted by x_files_x
-
-
Arkadaslar buldum, eğer lazım olur die düsünüyorsanız buyrun, hepinize çok tşk ederim,
#include <Constants.au3> #include <GUIConstantsEx.au3> #include <Misc.au3> #include <WinAPI.au3> #include <WindowsConstants.au3> Global Const $SC_DRAGMOVE = 0xF012 HotKeySet('{ESC}', '_Exit') Example() Func Example() Local $hGUI = GUICreate('', 100, 100, Default, Default, $WS_POPUP) _WinAPI_SetLayeredWindowAttributes($hGUI, 0xABCDEF) Local $iButton = GUICtrlCreateButton('Drag me', 0, 0, 100, 100) GUISetState(@SW_SHOW, $hGUI) Local $aCtrlCursor = 0, $aMousePos = 0, _ $fMove = False, _ $iBefore = 0 While 1 Switch GUIGetMsg() Case $iButton MsgBox($MB_SYSTEMMODAL, '', 'Button click') ; ExitLoop Case $GUI_EVENT_PRIMARYDOWN $aCtrlCursor = GUIGetCursorInfo($hGUI) $aMousePos = MouseGetPos() $fMove = False $iBefore = $aMousePos[0] + $aCtrlCursor[0] + $aMousePos[1] + $aCtrlCursor[1] ; Detect the co-ordinates before. While _IsPressed(01) WinMove($hGUI, '', $aMousePos[0] - $aCtrlCursor[0], $aMousePos[1] - $aCtrlCursor[1]) ; _SendMessage($hGUI, $WM_SYSCOMMAND, $SC_DRAGMOVE, False) ; If the co-ordinates are different then it moved. $fMove = Not ($aMousePos[0] + $aCtrlCursor[0] + $aMousePos[1] + $aCtrlCursor[1] = $iBefore) $aMousePos = MouseGetPos() If @error Then ExitLoop WEnd ; If it moved clear the button message. If $fMove Then Do ; Clear the button message. Until GUIGetMsg() = 0 EndIf EndSwitch WEnd GUIDelete($hGUI) EndFunc ;==>Example Func _Exit() Exit EndFunc ;==>_Exit -
#include <GuiconstantsEx.au3>
#include <WindowsConstants.au3>
HotKeySet("{ESC}", "On_Exit")
$hGUI = GUICreate("X", 100, 100, -1, -1, $WS_POPUP)
GUISetBkColor(2368804, $hGUI)
$hLabel = GUICtrlCreateLabel("", 0, 0, 100, 20, -1, $GUI_WS_EX_PARENTDRAG)
;~ GUICtrlSetBkColor(-1, 0x00)
;GUICtrlSetState(-1, $GUI_DISABLE)
$hButton = GUICtrlCreateButton("Test", 2, 2, 95, 95)
GUISetState()
While 1
Switch GUIGetMsg()
Case $hButton
On_Button()
EndSwitch
WEnd
Func On_Button()
Exit
EndFunc ;==>On_Button
Func On_Exit()
Exit
EndFunc ;==>On_Exitböyle bişi yaptım üstten taşınıyor
-
Hepinize cevaplarınız için tşk ederim, kuusra bakmayın ben acemi oldugum icin bilmedigim cok sey var, tıpkı guicreat in o yanındakilerin ne anlama geldikleri gibi, bilseydim zaten ben ordan yapardım, yardımlarınız icin tşk ederim, sanırım buton tutularak taşınmıyormus, bunuda öğrenmiş oldum
-
ama taşınmadı hala? ilk verdiginiz örnekte sadece pencere boyutu büyüdü, digerinde ise, benim guinin kenarlıkları yoktu bunun var, olmadı
-
Mrb arkadaşlar ben bu örneği deneme olarak yaptım bişi için, ancak bunu nasıl istedigim zaman taşıma özelligi koyucam, pencere sabit hareket etmiyor birde scripti açınca alttaki görev cubugunda olmasın istiyorum, yardım edebilecek varmı acaba?
#include <GUIConstants.au3> #include <WindowsConstants.au3> GUICreate('Defuse', 75, 67, 1200, 200, $WS_POPUP, $WS_EX_TOPMOST) $gob = GUICtrlCreateButton('Kapat', 2, 2, 70, 62) GUISetState() While 1 While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $gob Exit EndSwitch WEnd WEnd -
Ben biraz araştırdım ve buldum ama ezbere yapıyorum mantıgı biraz karısık gibi, buyrun işte size örnegi, bu scripte hesap makinesinin ekranı aktifken calıstırdıgınızda, 7 tusuna basar, ekranın neresine taşırsanız taşıyın yerini bulur ve 7 tuşuna basar, yani class yada buton işlemi degil coordinatlarını buluyor.
$WindowPosition = WinGetPos("Hesap Makinesi") MouseClick ("left", $WindowPosition[0] + 30, $WindowPosition[1] + 190) -
Forumda yardım edebilecek birileri yokmu..
-
programı indirip denemek lazım :) smart record die bi özelligi ile yapıyordu
-
mousepos die bişi var autoitte, burda da pencereye bir pos yapılıyor sanırım, yani pencere kordinatlarını alıp ona göre silem yapılıyor
-
bilmiyorum ki hatırladıgım kadarıyla classı olmayan yerlerede tıklıyordu, bence o pencerenin başlıgına göre yeni kordinatları buluyor oraya tıklıyor, ama nasıl bilmiyoruım..
-
Arkadaşlar hepinize merhaba, Remouse standart adındaki bir proğramla geçen uğraşıyordum, smart mouse kaydedici bir özelliği var bu özellik ile mesela hesap makinesini açtım ve 1 tuşuna bastırıp kaydettirdim, ben hesap makinesinin ekrandaki kordinatını değiştirsemde mouse yeni kordinatı bulup yine 1 tuşuna basıyor, böyle bişiyi autoit ile yapmak istiyorum o proğrama sırf bu nedenle bağlı kalmak yerine kendi ilgilendiğim Autoit ile yapmak istiyorum yardımcı olur musunuz, bir örneği filan olsa bakardım,
-
Katılıyorum online oyun merakı yerine proğramlama dillerine bakman daha faydalı olur.
-
onu nasıl yapacağız peki @MostWanted kardeş?
-
Cevaplarınız için tşk ederim yardımınızla hallettim
-
Arkadaşlar merhaba, ben bugun aklıma takıldı yapılırmı dedim ama uğraştım bulamadım, yapmak istedigim şey şudur;
mesela scripte bi hotkey atadık diyelim ki ctrl+q olsun ben ne zaman ctrl+q tuşuna basarsam script ekranın resmini cekip benim önceden belirledigim yere otomatik kaydedecek, ama işlem , bana kaydedilsin mi die sormasına gerek yok kendisi kaydedicek yani, böyle bişi mümkün mü arkadaslar?
-
ClipPut(WinGetTitle("[Active]", ""))
Tşk ederim kardeşim, işimi gördü, bunu bir türlü autoit helpte bulamadım
-
Arkadaşlar s.a bişi ile uğraşırken acaba yapabilirmiyim düşündümde, şöyle bişi yapmak istiyorum, bir script olucak bu script sürekli aktif olacak yada hotkey gibi olacak farketmez, ne zaman ben ctrl+m tuşuna basarsam o an aktif olan ekrandaki pencerenin başlıgını kopyalayacak hafızaya, bunu nasıl yapabilirim, hotkey kısmı kolayda aktif olan pencereyi nasıl kopyalatıcam onu bulamadım,
-
Cevaplar için tşk ederim herkese,
-
Çalıştı hocam çok tşk ederim :) NT6 nedir bilmiyorum ama windows 8 kullanıyorum hocam
-
Bluelife hocam verdiginiz kodları düzenleyip calıstırdıgımda disk cıkartıldı takıldı diyor ama bişi olmuyor sadece uyarı geliyor
Anladığım kadarıyla sabit bir bilgisayarda bu işlemi gerçekleştirmek istiyorsun. Öncelikle sürücünün gerçek yolunu bulmalısın. Bunun için komut istemini aç ve moutvol yazıp entera bas. Karşına bir takım bilgiler gelecektir. Istediğin sürücünün yolunu/konumunu bulduktan sonra aşağıdaki değişkenleri düzeltirsin..
Benim bilgisayarım için verdiğim örnek...Local $VolumePoint = "\\?\Volume{cfabc5ca-6bf0-11e2-aa02-005056c00008}\" Local $VolumeChar = "V:\" If FileExists($VolumePoint) = 0 Then MsgBox(16,$VolumeChar, "$VolumePoint değişkenindeki bilgi hatalı!") Exit EndIf _DeleteVolumeMountPoint($VolumeChar) MsgBox(64,$VolumeChar,"Sürücü çıkartıldı!") _SetVolumeMountPoint($VolumeChar,$VolumePoint) MsgBox(64,$VolumeChar,"Sürücü takıldı!") Func _DeleteVolumeMountPoint($lpszVolumeMountPoint) Local $ret = DllCall("kernel32.dll", "hwnd", "DeleteVolumeMountPointW", "wstr", $lpszVolumeMountPoint) If $ret[0] <> 0 Then Return 1 Else Return 0 EndIf EndFunc ;==>_DeleteVolumeMountPoint Func _SetVolumeMountPoint($lpszVolumeMountPoint, $lpszVolumeName) Local $ret = DllCall("kernel32.dll", "int", "SetVolumeMountPointW", "wstr", $lpszVolumeMountPoint, "wstr", $lpszVolumeName) Return $ret[0] EndFunc ;==>_SetVolumeMountPointHocam verdiginiz kodları düzenleyip calıstırdıgımda disk cıkartıldı filan diyor ama hic bi degisiklik olmuyor
-
nerdeki peki örnekleri simpson?
-
Autoit ile mümkün galiba, yapılabilir ama ben beceremedim
-
Mrb arkadaşlar , benim yapmak istedigim şey diyeliki bir f: diskim var bu diski bir hotkeye atayarak diyrelimki ctrl+l ye bastıgımda unmount olsun yani sistemden kaldırılsın, sonra başka bi hotkey ile tekrar sisteme gelsin, burdaki mantık sanırım autoit ile sürücü harfini siliyor gibi ben tam bilmiyorum ama örnek icin Bluelife hocanın Blue mount programındaki mount/unmount ozelligini diorum, fikirlerinizi bekliyorum tşkler
-
sorun pek açıklayıcı olmamış, burda iyi bilen arkadaşlar var biraz daha açıklayıcı olursan yardımcı olucaklardır
Comboboxta Kullanıcıları Listeleme
in AutoIT
Posted
Elimde böyle bişi var işine yarar mı bilmem.
#include <GUIConstants.au3> #Region ### START Koda GUI section ### $Form1 = GUICreate("X_FiLeS_X", 220, 220, 300, 260) GUISetBkColor(0x66ff00) $Checkbox1 = GUICtrlCreateCheckbox("IDM", 4, 40, 121, 25) $Checkbox2 = GUICtrlCreateCheckbox("Resource Tools", 4, 60, 121, 25) $Checkbox3 = GUICtrlCreateCheckbox("Smart Install Maker", 4, 80, 121, 25) $Checkbox4 = GUICtrlCreateCheckbox("AnaSayfa GoogLe Yap", 4, 100, 130, 25) $Checkbox5 = GUICtrlCreateCheckbox("Klasor ikon degiş", 4, 120, 121, 25) $Checkbox6 = GUICtrlCreateCheckbox("RegShoT", 4, 140, 121, 25) $Checkbox7 = GUICtrlCreateCheckbox("Msn Aç", 4, 160, 121, 25) $Checkbox8 = GUICtrlCreateCheckbox("7 Zip Kur", 4, 180, 121, 25) $Button1 = GUICtrlCreateButton("Tümünü Sec", 4, 4, 100, 17, 0) $Button2 = GUICtrlCreateButton("Calistir", 60,24, 75, 17, 0) $Button3 = GUICtrlCreateButton("Secme", 115,4, 100, 17, 0) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $Button1 GUICtrlSetState($Checkbox1,$GUI_CHECKED) GUICtrlSetState($Checkbox2,$GUI_CHECKED) case $Button2 If GUICtrlRead($Checkbox1)=1 then Run("Internet Download Manager.exe") If GUICtrlRead($Checkbox2)=1 then Run("Resource Tools.exe") If GUICtrlRead($Checkbox3)=1 then Run("Smart Install Maker.exe") If GUICtrlRead($Checkbox4)=1 then Run("ANASAYFA GOOGLE OLSUN.exe") If GUICtrlRead($Checkbox5)=1 then Run("Klasor ikon degiş.exe") If GUICtrlRead($Checkbox6)=1 then Run("Regshot.exe") If GUICtrlRead($Checkbox7)=1 then Run("MSN.exe") If GUICtrlRead($Checkbox8)=1 then Run("7ZiP.exe") Case $Button3 GUICtrlSetState($Checkbox1,$GUI_UNCHECKED) GUICtrlSetState($Checkbox2,$GUI_UNCHECKED) EndSwitch WEnd