Hi,
jedesmal wenn ich z.B. ein Textfeld erzeuge, ist die Schriftart"MS Sans serif" eingestellt. Da ich aber lieber alles in „Arial“ habe, muss ich jedes Textfeld neu einstellen.
Gibt es die Möglichkeit, Textgröße/art, Raster ein/aus u.ä. voreinzustellen?
Schon vorab vielen Dank
Gruß Stefan
Hi Stefan!
Da das TextBox-Steuerelement ein ActiveX-Programm. oder eigentlich ein Teil einer ActiveX-DLL mit mehreren Steuerelementen ist und der Quellcode Microsoft gehört, hast Du wohl keine Chance, die Eigenschaft Font auf einen anderen Standardwert zu stellen.
Du kannst das TextBox-Steuerelement aber schachteln, indem Du selber ein ActiceX-Steuerelement programmierst. Dazu erstellst Du ein neues VB-Projekt, nach der
Vorlage „ActiveX-Steuerelement“. Dort wird standardmäßig ein Benutzersteuerelement
hinzugefügt, worin Du nun ein TextBox-Steuerelement (Text1) platzierst. Die Font-Property stellst Du auf den gewünschten Wert ein und schon hast du ein TextBox-Steuerelement mit Deiner gewünschten Schrift „Arial“ o.ä.
Der Code ist schon etwas umfangreicher. Du mußt die ganzen Eigenschaften (Properties),
Methoden (Methods, Functions) und Ereignisse (Events) des TextBox-Steuerelements (Control) nachbilden.
1) Properties:
1.2) Public Properties:
Public Property Get Enabled() As Boolean
Enabled = Text1.Enabled
End Property
Public Property Let Enabled(bEnabled As Boolean)
Text1.Enabled = Enabled
End Property
...
2) Events:
2.1) Deklaration der Events:
Public Event Change()
Public Event KeyUp(KeyCode As Integer, Shift As Integer)
...
2.2) Aufruf der Events
Private Sub Text1\_Change()
RaiseEvent Change
End Sub
Private Sub Text1\_Change(KeyCode As Integer, Shift As Integer)
RaiseEvent KeyUp(KeyCode, Shift)
Ed Sub
...
3) Methods
3.1) Public Subs oder Functions
Public Sub Refresh()
Text1.Refresh
End Sub
Public Sub ZOrder(Position As Integer)
Text1.ZOrder Position
End Sub
...
Am Ende erstellst Du die ActiveX-DLL und fügst diese als Steuerelement der Toolbox der Visual Studio-Umbgebung hinzu.
Alles klar?
LG, Stefan.
[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]