title image


Smiley Re: Bildschirmauflösung
Wie wäre es, in Abhängigkeit derAuflösung die Buttonsentsprechend darzustellen (Größe, Fontsize)Private Declare Function GetSystemMetrics Lib "User32" _ (ByVal nIndex As Long) As LongPublic Sub Auflösung()   'horizontal   h = GetSystemMetrics(0)  'vertikal  v = GetSystemMetrics(1)  Select Case h     Case 640     '...     Case 800     '...     Case 1024     '...     Case 1280     '...   End SelectEnd Sub

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: