Formunuz yuvarlak olsun

Son güncelleme: 14.06.2006 07:36
  • 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
#03.03.2006 21:19 0 0 0
  • ilgin.vee güzeel bir şey gibi..denemektee fayda war...tşk
#09.05.2006 17:50 0 0 0
  • yuvarlak?
#10.05.2006 14:29 0 0 0
  • saol
#19.05.2006 22:08 0 0 0
  • ellerine sağlık kardeşim!
#08.06.2006 14:45 0 0 0
  • saolasın arkadasım yuvarlak nasıl olcek acep
#08.06.2006 20:20 0 0 0
  • çok teşekkürler ellerine sağlık
#10.06.2006 10:05 0 0 0
  • tesekkurler...
#14.06.2006 07:36 0 0 0