ABOUT Visual Basic Programmieren Programmierung Download Downloads Tips & Tricks Tipps & Tricks Know-How Praxis VB VBA Visual Basic for Applications VBS VBScript Scripting Windows ActiveX COM OLE API ComputerPC Microsoft Office Microsoft Office 97 Office 2000 Access Word Winword Excel Outlook Addins ASP Active Server Pages COMAddIns ActiveX-Controls OCX UserControl UserDocument Komponenten DLL EXE
Diese Seite wurde zuletzt aktualisiert am 16.01.2001

Diese Seite wurde zuletzt aktualisiert am 16.01.2001
Aktuell im ABOUT Visual Basic-MagazinGrundlagenwissen und TechnologienKnow How, Tipps und Tricks rund um Visual BasicActiveX-Komponenten, Controls, Klassen und mehr...AddIns für die Visual Basic-IDE und die VBA-IDEVBA-Programmierung in MS-Office und anderen AnwendungenScripting-Praxis für den Windows Scripting Host und das Scripting-ControlTools, Komponenten und Dienstleistungen des MarktesRessourcen für Programmierer (Bücher, Job-Börse)Dies&Das...

Themen und Stichwörter im ABOUT Visual Basic-Magazin
Code, Beispiele, Komponenten, Tools im Überblick, Shareware, Freeware
Ihre Service-Seite, Termine, Job-Börse
Melden Sie sich an, um in den vollen Genuss des ABOUT Visual Basic-Magazins zu kommen!
Informationen zum ABOUT Visual Basic-Magazin, Kontakt und Impressum

Zurück...

Optische Sperre

Zurück...


Anzeige

(-hg) mailto:hg_textboxvisuallock@aboutvb.de

Über die Eigenschaft Locked können Sie die Eingabe in eine TextBox bzw. deren Anwendung durch den Anwender sperren. Diese Sperrung ist jedoch etwas anderes als die Sperrung über die Enabled Eigenschaft. Während bei letzterer die TextBox wie jedes andere Steuerelement vollständig gesperrt wird, also dort auch keine Mausereignisse mehr ankommen und der Fokus-Erhalt verhindert wird, kann der Anwender den Textinhalt einer ge"lock"ten TextBox nach wie vor markieren und beispielsweise in die Zwischenablage kopieren.


Der Hintergrund einer TextBox sollte in der Hintergrundfarbe des Containers eingefärbt werden, wenn die Locked-Eigenschaft gesetzt ist

Damit der Anwender diesen Lock-Zustand erkennen kann, und zur Unterscheidung der Sperrung durch Enabled (bei der der Textinhalt einer Textbox in grauer Schriftfarbe dargestellt wird), sieht man oft, dass der Hintergrund der TextBox in der Hintergrundfarbe des Containers (bzw. Forms) dargestellt wird.

Die folgende Funktion TextBoxVisualLock vereinfacht diese Darstellungsweise und setzt zugleich den Locked-Zustand und die entsprechende Hintergrundfarbe. Sie können optional beliebige Schrift- und Hintergrundfarben angeben. Lassen Sie diese Parameter weg, wird als Schriftfarbe die Systemfarbe vbWindowText (Standard der TextBox) angenommen, und als Hintergrundfarbe bei Locked gleich False die Systemfarbe vbWindowBackground (Standard der TextBox) bzw. bei Locked gleich True die Systemfarbe vb3DFace (Standard bei Forms) angenommen.

Public Sub TextBoxVisualLock(TextBox As TextBox, _
 ByVal Locked As Boolean, _
 Optional ByVal ForeColor As Long = -1, _
 Optional ByVal BackColor As Long = -1)

  With TextBox
    .Locked = Locked
    Select Case Locked
      Case False
        If ForeColor = -1 Then
          .ForeColor = vbWindowText
        Else
          .ForeColor = ForeColor
        End If
        If BackColor = -1 Then
          .BackColor = vbWindowBackground
        Else
          .BackColor = BackColor
        End If
      Case True
        If ForeColor = -1 Then
          .ForeColor = vbWindowText
        Else
          .ForeColor = ForeColor
        End If
        If BackColor = -1 Then
          .BackColor = vb3DFace
        Else
          .BackColor = BackColor
        End If
    End Select
  End With
End Sub

Übrigens, wenn Sie die Eigenschaft BorderStyle der TextBox auf 0 setzen, und mittels dieser Funktion die TextBox sperren und die Hintergrundfarbe auf die Hintergrundfarbe des Containers setzen, erhalten Sie so ein Textanzeige-Element, das wie ein Label aussieht, dessen Text jedoch vom Anwender kopiert werden kann.


Modul modTextBoxVisualLock (modTextBoxVisualLock.bas - ca. 1,2 KB)


Artikel
Zum Download-Bereich dieses Artikel
Mail an den Autor dieses Artikels

KnowHow
Zur KnowHow-Übersicht

KnowHow-Themen
Themen - Allgemeines
Themen - Entwicklungsumgebung (VB-IDE)
Themen - Forms
Themen - Steuerelemente (Controls)
Themen - Grafik
Themen - Dateien
Themen - UserControls
Themen - Einsteiger-Tipps
Themen - Wussten Sie...?

Übersicht nach Titeln in alphabetischer Reihenfolge
Übersicht nach Erscheinungsdatum

Schnellsuche




Zum Seitenanfang

Copyright © 1999 - 2017 Harald M. Genauck, ip-pro gmbh  /  Impressum

Zum Seitenanfang

Zurück...

Zurück...

Download Internet Explorer