Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

An diesem Win rüttelt keiner mehr
Autor: unbekannt
Datum: 01.01.02 20:49
Hi Levis, so geht's   Private Declare Function SetWindowPos Lib "user32" _    (ByVal hwnd As Long, _     ByVal hWndInsertAfter As Long, _     ByVal x As Long, _     ByVal y As Long, _     ByVal cx As Long, _     ByVal cy As Long, _     ByVal wFlags As Long) As Long Private Type RECT         Left As Long         Top As Long         Right As Long         Bottom As Long End Type Dim frmRect As RECT Private Const SWP_NOZORDER = &H4 Private Const SWP_NOMOVE = &H2 Private Sub Form_Load()    With frmRect       .Top = Me.Top / Screen.TwipsPerPixelY       .Left = Me.Left / Screen.TwipsPerPixelX       .Right = Me.Width / Screen.TwipsPerPixelX       .Bottom = Me.Height / Screen.TwipsPerPixelY    End With End Sub Private Sub Form_Resize()    SetWindowPos Me.hwnd, 0, frmRect.Top, frmRect.Left, frmRect.Right, frmRect.Bottom, SWP_NOMOVE Or SWP_NOZORDER End Sub   cu Lordchen

Form: Vergrößern nicht erlauben	45	Levis	01.01.02 18:01
Re: Form: Vergrößern nicht erlauben	36	YuriPrime	01.01.02 19:22
Wie effektlos	1.637	unbekannt	01.01.02 19:27
Geht beides nicht...	33	Levis	01.01.02 19:34
Kommt gleich was	1.589	unbekannt	01.01.02 19:37
An diesem Win rüttelt keiner mehr	1.636	unbekannt	01.01.02 20:49
Danke!!	32	Levis	01.01.02 21: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