Rubrik: Controls · Sonstiges | VB-Versionen: VB6 | 15.09.10 |
Farbauswahl mit Vorgabe der Auswahlfarbe im CommonDialog-Control Dieser Tipp zeigt, wie man dem Microsoft CommonDialog Control für die Farbauswahl eine Anfangsfarbe übergibt. | ||
Autor: Dieter Otter | Bewertung: | Views: 9.845 |
www.tools4vb.de | System: Win9x, WinNT, Win2k, WinXP, Win7, Win8, Win10, Win11 | Beispielprojekt auf CD |
Durch Setzen eines bestimmten Flags lässt sich ganz leicht die Auswahlfarbe bei Verwendung des Farbauswahldialogs vorbelegen:
On Error Resume Next With Me.CommonDialog1 .CancelError = True ' Anfnagsfarbe .Color = vbRed ' Wichtig: Flag cdlCCRGBInit muss hierzu gesetzt werden! .Flags = cdlCCFullOpen Or cdlCCRGBInit .ShowColor If Err.Number = 0 Then ' Neue ausgewählte Farbe Label1.BackColor = .Color End If End With On Error Goto 0