vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
 vb@rchiv Offline-Reader - exklusiv auf der vb@rchiv CD Vol.4  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2024
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Fragen & Antworten rund um sev-Komponenten
sev Coolbar Breite ermitteln 
Autor: CioTec
Datum: 28.12.15 12:00
Hallo!

Durch Änderungen im Programmaufruf (andere Caption oder Visible Eigenschaft) ändert sich die 'notwendige' Breite der Coolbar. Da rechts daneben weitere Controls angezeigt werden sollen, wäre es schön, die notwendige Breite ermitteln zu können, oder gar so etwas wie eine AutoResize Eigenschaft zu erhlaten.

Martin Domian

CioTec Ltd
F37 Waterfront Studios 1 Dock Road
London E16 1AH United Kingdom

Tel.: +44 7810 255482
Mail: MDomian@ciotec.de
URL: http://www.ciotec.de

UTR 64446 15259 (Unique Taxpayer Reference) Company No 10914665

Themenbaum einblendenGesamtübersicht  |  Zum Thema  |  Suchen

Re: sev Coolbar Breite ermitteln 
Autor: ModeratorDieter (Moderator)
Datum: 28.12.15 12:04
Eine solche Funktion ist nicht vorgesehen.

_________________________
Professionelle Entwicklerkomponenten
www.tools4vb.de

Themenbaum einblendenGesamtübersicht  |  Zum Thema  |  Suchen

Re: sev Coolbar Breite ermitteln 
Autor: CioTec
Datum: 28.12.15 12:19
gut, dann weiß ich Bescheid und werde es mal manuell versuchen
Danke

Martin Domian

CioTec Ltd
F37 Waterfront Studios 1 Dock Road
London E16 1AH United Kingdom

Tel.: +44 7810 255482
Mail: MDomian@ciotec.de
URL: http://www.ciotec.de

UTR 64446 15259 (Unique Taxpayer Reference) Company No 10914665

Themenbaum einblendenGesamtübersicht  |  Zum Thema  |  Suchen

Re: sev Coolbar Breite ermitteln 
Autor: CioTec
Datum: 28.12.15 16:22
Die Lösung ist denkbar einfach und scheint zu funktionieren.
Ein Button vom Typ Placeholder wird allerdings mit 0 zurück gegeben, da könnte man die Funktion bei Bedarf erweitern. Ob es auf allen Betriebssystemen funktioniert, werden wir dann merken 

Private Function CoolbarRealWidth() As Long
 
  Dim mOUT As Long
  Dim i As Integer
 
  mOUT = 0
 
  For i = 1 To myCoolbar.ButtonCount
    With myCoolbar.Buttons(i)
      If .Visible = True Then
        mOUT = mOUT + .Width
      End If
    End With
  Next i
 
  CoolbarRealWidth = mOUT
 
End Function

Martin Domian

CioTec Ltd
F37 Waterfront Studios 1 Dock Road
London E16 1AH United Kingdom

Tel.: +44 7810 255482
Mail: MDomian@ciotec.de
URL: http://www.ciotec.de

UTR 64446 15259 (Unique Taxpayer Reference) Company No 10914665

Beitrag wurde zuletzt am 28.12.15 um 16:25:11 editiert.

Themenbaum einblendenGesamtübersicht  |  Zum Thema  |  Suchen

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übersichtSuchen 

nach obenzurück
  
   

Copyright ©2000-2024 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel