vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
Schützen Sie Ihre Software vor Software-Piraterie - mit sevLock 1.0 DLL!  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2024
 
zurück
Rubrik: Fenster09.05.01
GetWindowTextLength-Funktion

Diese Funktion ermittelt die Länge (Anzahl Zeichen) eines Titelleisten-Textes (Caption-Eigenschaft).

Betriebssystem:  Win95, Win98, WinNT, Win2000, WinMEViews:  14.522 

Beschreibung:
Diese Funktion ermittelt die Länge (Anzahl Zeichen) eines Titelleisten-Textes (Caption-Eigenschaft).

Deklaration:

Declare Function GetWindowTextLength Lib "user32" _
  Alias "GetWindowTextLengthA" ( _
  Byval hwnd As Long) As Long

Parameter:
hwndErwartet das Fensterhandle des Fensters, dessen Titelleistentext-Länge ermittelt werden soll.

Rückgabewert:
Ist die Funktion erfolgreich, wird die Länge (Anzahl Zeichen) der Titelleiste zurückgegeben. Tritt ein Fehler auf, oder existiert kein Fenster mit dem angegebenen Fenster-Handle wird 0 zurückgegeben.

Beispiel:

Private Declare Function GetWindowTextLength Lib "user32" _
  Alias "GetWindowTextLengthA" ( _
  Byval hwnd As Long) As Long 
Private Declare Function GetWindowText Lib "user32" _
  Alias "GetWindowTextA" ( _
  Byval hwnd As Long, _
  Byval lpString As String, _
  Byval cch As Long) As Long 
Private Declare Function SetWindowText Lib "user32" _
  Alias "SetWindowTextA" ( _
  Byval hwnd As Long, _
  Byval lpString As String) As Long
Private Sub Command1_Click () 
  Dim Pufferlänge As Long, Puffer As String 
 
  ' Länge des Captiontextes ermitteln
  Pufferlänge = GetWindowTextLength(Me.hwnd) + 1 
  Puffer =Space(Pufferlänge) 
 
  ' Alte Captioneigenschaft auslesen und ausgeben
  Pufferlänge = GetWindowText(Me.hwnd, Puffer, Pufferlänge) 
  Debug.Print "Alter Caption Text: " & Left$(Puffer$, Pufferlänge) 
 
  ' Setzt die neue Caption eigenschaft
  SetWindowText Me.hwnd, "www.VBApiHelpLine.x2.nu" 
End Sub

Diese Seite wurde bereits 14.522 mal aufgerufen.

nach obenzurück
 
   

Druckansicht Druckansicht 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