Jump to content

Autoit Ile Screen Capture Hotkey Mümkün Mü?


x_files_x
 Share

Recommended Posts

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?

Link to comment
Share on other sites

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?

#include <ScreenCapture.au3>
_ScreenCapture_Capture([$sFileName = "" [, $iLeft = 0 [, $iTop = 0 [, $iRight = -1 [, $iBottom = -1 [, $fCursor = True]]]]]])



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?

#include <ScreenCapture.au3>

; Full ekran için
_ScreenCapture_Capture(@MyDocumentsDir & "\GDIPlus_Image1.jpg")

; Belirli bölge için
_ScreenCapture_Capture(@MyDocumentsDir & "\GDIPlus_Image2.jpg", 0, 0, 796, 596)

Link to comment
Share on other sites

Tabi ki de mümkün. Ekranın resmini alan fonksiyonu HotKeySet() komutu ile herhangi bir kısa yola bağlaman yeterli.

#include <ScreenCapture.au3>

Global $SavePath = @DesktopDir

HotKeySet("+t", "_Capture_MaxCoor") ; Shift+t

Func _Capture_MaxCoor()
	_ScreenCapture_Capture($SavePath & "\" & Random(0, 2500, 1) & ".jpg")
EndFunc   ;==>_Capture_MaxCoor

While 1

Sleep(100)

WEnd

Link to comment
Share on other sites

Evet yukarıda verdiğim programcık veri kaybına neden olabilir. Zaten ufak bir örnek  olsun diye vermiştim.

#RequireAdmin
#include <ScreenCapture.au3>
#include <date.au3>
Global $SavePath = @DesktopDir

HotKeySet("+t", "_Capture_MaxCoor") ; Shift+t

Func _Capture_MaxCoor()
	Local $FileLaterName = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\SCapture", "FileLaterName")
	If $FileLaterName = "" Then
		$FileLaterName = 1
	Else
		$FileLaterName += 1
	EndIf
	RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\SCapture", "FileLaterName", "REG_SZ", $FileLaterName)
	_ScreenCapture_Capture($SavePath & "\" & $FileLaterName & ".jpg")
EndFunc   ;==>_Capture_MaxCoor

While 1

	Sleep(100)

WEnd

Daha da çeşitlendirilebilir. Saygılar.

Link to comment
Share on other sites

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.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

 Share

  • Recently Browsing   0 members

    No registered users viewing this page.

×
×
  • Create New...