Fotograf cekme programi

Arkadaslar ben fotograf cekme programi yapmak istiyorum kod lar ve videolu anlatim.

Resim cekme kodu=?
vsvs

maşşlah sen işi iyice iletrleşmissin

Evet


[Tarih hayal edenleri değil gerçekleştirenleri yazar.]
[Kankam Aliden Alıntıdır.]

KOnu hala guncel yardımlarınızı bekliyorum....

http://www.turkhackteam.net/visual-b...-secenegi.html bunun gibimi

Evet !! Tam istediğim.Yani çek buton kodu falan.

Çek Butonunun Kod Bölümüne bunu ekle

Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)

Private Sub Command1_Click()
Call keybd_event(vbKeySnapshot, 0, 0, 0)


End Sub



Fotoğrafı Göster Butonunun Kod Bölümüne

Private Sub Command2_Click()
Picture1.Picture = Clipboard.GetData

End Sub


Fotoğrafı Kaydet Buton Bölümüne (Programın bulunduğu bölüme kaydeder)

SavePicture Form1.Picture1.Picture, App.Path & "\" & Text1.Text & ".jpg"

Not : Kaydetme butonuna bu kodu ekleyip 1 tanede textbox ekle textboxa yazılan yazı adında kaydeder fotoğrafı örneğin textboxta alperen yazıyorsa butona tıklandığında fotoğraf programın bulunduğu bölüme alperen.jpg olarak kaydolur

Tesekkurler !

Ne demek

Yazın yarım kaldı heralde

Konu iyice hortlamadan kilitlenmeli bence.