|
|
|
Größenanpassung unter MS-Access Hier wird gezeigt, wie sich das sevOutBar-Control unter MS-Access an die Formulargröße anpassen lässt.
|
Produktversionen: | sevOutBar 3.0 |
VB-Versionen: | MS-Access |
Autor: | Thomas Mauritz |
Datum: | 20.11.06 |
Views: | 7143 |
|
|
|
  |
|
Nachfolgender Code zeigt, wie sich die Größe des sevOutbar-Controls bei Grössenänderung des Formulars in ACCESS anpassen lässt.
Private Sub Form_Resize()
Static h As Long
Static w As Long
If h = Me.InsideHeight And w = Me.Width Then
' keine Änderung der Formulargröße
Exit Sub
Else
h = Me.InsideHeight
w = Me.Width
' Outbar in der Höhe anpassen
Me.OutBar0.Height = h
End If
End Sub
Dieser Tip wurde von Michel Walsh am 29.12.1999 in das Forum bei microsoft (microsoft.public.access.forms) geschrieben und den habe ich an das Control angepasst. So lassen sich z.B.
auch diverse Objekte (z.B. Buttons) immer am unteren Rand des Fensters dynamisch dastellen:
' 100 entspricht der Abstand vom unteren Rand zur Unterkante des Buttons
Me.btnStart.Top = h - Me.btnStart.Height - 100
Zurück zur Übersichtsseite
|