[code]Private Sub Form_Load()
Dim hr&, dl&
Dim usew&, useh&
usew& = Me.Width / Screen.TwipsPerPixelX
useh& = Me.Height / Screen.TwipsPerPixelY
' Olusturuluyor...
hr& = CreateEllipticRgn(55, -20, usew, useh) 'Bu sayilari degistirerek pencere ile oynayabilirsiniz..
' Gosteriliyor...
dl& = SetWindowRgn(Me.hWnd, hr, True)
End Sub[/code] :8:

Beğeniler: 0
Favoriler: 0
İzlenmeler: 795
favori
like
share
onrozcn Tarih: 14.06.2006 08:36
tesekkurler...
SempaticH Tarih: 10.06.2006 11:05
çok teşekkürler ellerine sağlık
vampir4518 Tarih: 08.06.2006 21:20
saolasın arkadasım yuvarlak nasıl olcek acep :20:
dr.stear Tarih: 08.06.2006 15:45
ellerine sağlık kardeşim!
hayrullahkara Tarih: 19.05.2006 23:08
saol :20:
halaskar_41 Tarih: 10.05.2006 15:29
yuvarlak?
BlueLive Tarih: 09.05.2006 18:50
ilgin.vee güzeel bir şey gibi..denemektee fayda war...tşk