0 Üye ve 1 Ziyaretçi Konuyu İncelemekte. Aşağı İn :)
Sayfa 1
Konu: Ekran Görüntüsü Yakalama  (Okunma Sayısı: 1189 Kere Okundu.)
« : Ağustos 11, 2009, 01:35:30 ÖÖ »
Avatar Yok

By.TuRuT
*
Üye No : 773
Nerden : Rize
Cinsiyet : Bay
Konu Sayısı : 19239
Mesaj Sayısı : 48 228
Karizma = 65220


'Açıklama:
'PrintScreen tuşu ile ekran görüntüsü panoya aktarılır.Bizim programımız ise
'bir timer yardımı ile panoda bir resim olup olmadığını kontrol edecek ve eğer bir resim
'varsa bunu kaydedecek.Biz timerı aktif hale getirip programı arka planda çalıştırdığımızda
'PrintScreen tuşuna basınca resim picture1'e alınacak daha sonra kaydedilecek ve ardından
'pano temizlenecek.Ancak dosya isimlerinde problem çıkmaması için programımız çalışmaya
'başladığı andan itibaren başka bir timer aracılığı ile bir textbox sürekli sayı olarak artacak
've dosya ismine bu sayı da eklenecek.Ve böylece programımız aktif iken biz PrintScreen
'yapıp resim alınca porgramımız bunu kaydedecek.

'Program için:
'2 Timer (birincisi ile panoyu kontrol edeceğiz.Bunu intervali 500 ayarlayın.böylece saniyede iki resim çekebiliriz.)
'(birincisinin aktifliğini 2 CommandButton ile kontrol edelim ve başlangıçta False olsun.)
'(ikincisi dosya isminde problem çıkmaması için text1'i sayısal olarak arttıracak
'(ikincisinin de interval=500 yapalım ve enabled=True olsun.)
'2 CommandButton ve 1 PictureBox
'1 textbox ancak text özelliğini 0 yapmayı unutmayın

'Not:ALT-PrintScreen kombinasyonu ile sadece aktif programın ekran görüntüsü alınabilir.
'Sendkeys ile printscreen komutu gönderilmiyor yani en azından böyle bir program yapılmıyor.

Private Sub Command1_Click() 'ekran görüntü yakalayıcıyı açmak için
Timer1.Enabled = True

End Sub

Private Sub Command2_Click() 'ekran görüntü yakalayıcıyı kapatmak için
Timer1.Enabled = False

End Sub

Private Sub Form_Load()
Text1.Text = "0" 'text'i sıfırladık
End Sub

Private Sub Timer1_Timer() 'burada clipboard(pano)'u izlemeye alıyoruz.Eğer clipboardda
'bmp türünde bir veri varsa bunu picture1'e aktaracağız.Daha sonra kaydedeceğiz.

If Clipboard.GetFormat(vbCFBitmap) Then 'bmp ise

Picture1.Picture = Clipboard.GetData 'panodan resimi al picture1de göster

Call SavePicture(Picture1.Picture, App.Path & "\" & "captured" & Text1.Text & ".bmp")
'üstteki satırda resmi kaydediyoruz ancak bu işlem hızlı olduğu içib dosya ismi + bir sayı kullanıyoruz

Clipboard.Clear 'panoyu temizliyoruz


End If
End Sub

Private Sub Timer2_Timer() 'bu ise sürekli text1deki sayıyı arttırıyor.
Text1.Text = Text1.Text + 1
End Sub

İstek & Öneri ve Şikayetlerinizi: WeBCaNaVaRi'na Üye Olmadan Link'leri ve Kod'ları Göremezsiniz.
Link'leri Görebilmek İçin. Üye Ol. veya Giriş Yap.
Adresine İletebiliriniz.
WeBCaNaVaRi Botu

Bu Site Mükemmel :)

*****

Çevrimİçi Çevrimİçi

Mesajlar: 222 194


View Profile
Re: Ekran Görüntüsü Yakalama
« Posted on: Mart 29, 2024, 02:57:03 ÖÖ »

 
      Üye Olunuz.!
Merhaba Ziyaretçi. Öncelikle Sitemize Hoş Geldiniz. Ben WeBCaNaVaRi Botu Olarak, Siteden Daha Fazla Yararlanmanız İçin Üye Olmanızı ŞİDDETLE Öneririm. Unutmayın ki; Üyelik Ücretsizdir. :)

Giriş Yap.  Kayıt Ol.
Anahtar Kelimeler: Ekran Görüntüsü Yakalama e-book, Ekran Görüntüsü Yakalama programı, Ekran Görüntüsü Yakalama oyunları, Ekran Görüntüsü Yakalama e-kitap, Ekran Görüntüsü Yakalama download, Ekran Görüntüsü Yakalama hikayeleri, Ekran Görüntüsü Yakalama resimleri, Ekran Görüntüsü Yakalama haberleri, Ekran Görüntüsü Yakalama yükle, Ekran Görüntüsü Yakalama videosu, Ekran Görüntüsü Yakalama şarkı sözleri, Ekran Görüntüsü Yakalama msn, Ekran Görüntüsü Yakalama hileleri, Ekran Görüntüsü Yakalama scripti, Ekran Görüntüsü Yakalama filmi, Ekran Görüntüsü Yakalama ödevleri, Ekran Görüntüsü Yakalama yemek tarifleri, Ekran Görüntüsü Yakalama driverları, Ekran Görüntüsü Yakalama smf, Ekran Görüntüsü Yakalama gsm
Yanıtla #1
« : Mayıs 04, 2010, 02:36:14 ÖS »

Anqel*
*
Üye No : 21465
Nerden : Yurt Dışı
Cinsiyet : Bayan
Konu Sayısı : 5208
Mesaj Sayısı : 17 796
Karizma = 50130


Bilgi için Teşekkür ettim..

WebCanavari
Sayfa 1
Yukarı Çık :)
Gitmek istediğiniz yer:  


Benzer Konular
Konu Başlığı Başlatan Yanıtlar Görüntü Son Mesaj
Yeni Prince Of Persia'nın Ilk Ekran Görüntüsü!
Oyun Haberleri
By.CeZa 3 1339 Son Mesaj Mayıs 07, 2008, 03:49:54 ÖS
Gönderen : mer_ve_g
Print Screen Ve Video Resmi Yakalama
Program Anlatımları
By.TuRuT 0 1169 Son Mesaj Aralık 08, 2009, 10:15:59 ÖS
Gönderen : By.TuRuT
Aldatan Erkeği Yakalama Yöntemleri...
Kadınca
Mavi_Kiyamet 0 835 Son Mesaj Aralık 21, 2011, 08:11:05 ÖS
Gönderen : Mavi_Kiyamet
#chromeselfie Ile Tarayıcının Selfie'li Ekran Görüntüsü Alın
Google ve Adsense Hakkında Herşey.
-minel- 0 812 Son Mesaj Nisan 01, 2015, 02:04:38 ÖS
Gönderen : -minel-
Bandicam Proğramı Ile Ekran Görüntüsü Alma
Her Telden.
xxmolinaxx 0 1013 Son Mesaj Mart 19, 2017, 01:34:52 ÖS
Gönderen : xxmolinaxx


Theme: WeBCaNaVaRi 2011 Copyright 2011 Simple Machines SiteMap | Arsiv | Wap | imode | Konular