Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: Runde Fenster???
Autor: EXPOSITION
Datum: 14.09.02 22:01
Probiers mal so: ___________________________________________________________ Private Declare Function CreateRoundRectRgn Lib "gdi32" _ (ByVal X1 As Long, ByVal Y1 As Long, _ ByVal X2 As Long, ByVal Y2 As Long, _ ByVal X3 As Long, ByVal Y3 As Long) As Long Private Declare Function SetWindowRgn Lib "user32" _ (ByVal hWnd As Long, ByVal hRgn As Long, _ ByVal bRedraw As Boolean) As Long Private Sub Form_Load() ' Ecken abrunden Dim x As Long Dim y As Long Dim n As Long x = Me.Width / Screen.TwipsPerPixelX y = Me.Height / Screen.TwipsPerPixelY n = 80 SetWindowRgn Me.hWnd, _ CreateRoundRectRgn(0, 0, x, y, n, n), True End Sub ____________________________________________________________ Gruss EXPOSITION [Switzerland!]

Runde Fenster???	354	Sniper-K	14.09.02 21:38
Re: Runde Fenster???	206	EXPOSITION	14.09.02 22:01
Re: Runde Fenster???	538	E7	17.11.02 19:03
Zum Beispiel?	473	unbekannt	17.11.02 19:09
Re: Zum Beispiel?	552	E7	17.11.02 19:59
Re: Zum Beispiel?	499	unbekannt	17.11.02 20:04
Re: Runde Fenster???	527	E7	17.11.02 20:08

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen