WebBrowserdan PictureBox’a direk resim aktarmak

Private Sub Command1_Click()
Dim O as Object
Set O = WebBrowser1.Document.body.createControlRange()
Call O.Add(WebBrowser1.Document.All("verificationImg"))
Call O.execCommand("Copy")
Set Picture1.Picture = Clipboard.GetData
End Sub

Private Sub Form_Load()
WebBrowser1.Navigate "https://adslkota.turktelekom.com.tr/adslkota/login_tr.jsp"
End Sub

Delphi.Net ile Fotoğraf gösterme programı

Diyelimki bir klasörde sakladığınız resimleriniz var. Bu programla o klasöre erişip oradan bir resim seçtiğinizde o klasör altındaki bütün resimler, programınızın formuna 45*45 boyutunda diziliyor. Ve bu resimlerden herhangi birine bir kez tıkladığınızda o resim başka bir form yoluyla orjinal olarak gösteriliyor…

Yapmanız gereken delphide bir form açmak (form1), arkasına yeni bir form daha açmak(form2) dir…

(ben bu programı delphi.net ile yazdım)