WCM Forum - VisualBasic -> runder Button???

WCM Forum (http://www.wcm.at/forum/index.php)

- Programmierung (http://www.wcm.at/forum/forumdisplay.php?f=17)

- - VisualBasic -> runder Button??? (http://www.wcm.at/forum/showthread.php?t=37287)

VisualBasic -> runder Button???

Bitte bitte..... wie moch i erm?? Ich brings nicht mehr zam!!!

Danke :)

Ganz einfach. ;)

In einem Modul folgendes einfügen:

Code:

Public Declare Function SetWindowRgn Lib "user32" (ByVal hWnd As Long, ByVal hRgn As Long, ByVal bRedraw As Boolean) As Long

Public Declare Function CreateEllipticRgn Lib "gdi32" (ByVal X1 As Long, ByVal Y1 As Long, ByVal X2 As Long, ByVal Y2 As Long) As Long

Dann machst du eine Form mit einem Button (command1)
Und in Form_load folgendes eintrgaen:

Code:

SetWindowRgn Command1.hWnd, CreateEllipticRgn(5, 5, 195, 195), True

Hab ein kleines Beispiel angehängt.
Ich hoff das wars was du gesucht hast!

lg

und wanst des ganze ned public sondern als private deklarierst brauchst ned amal a extra modul dafür :)

Zitat:

Original geschrieben von Sesa_Mina
und wanst des ganze ned public sondern als private deklarierst brauchst ned amal a extra modul dafür :)

Stimmt, aber er wird es sicher für mehrere Forms brauchen! ;) :D

lg