Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Ist keine Höllenmaschine!!!
Autor: FlyerMario
Datum: 29.05.02 21:47
Hi CyberLord! Also wie soll ich das verstehen, mit der Höllenmaschine! Diesen Code für das umprogrammieren der Titelleistenfarbe habe ich im Netz gefunden. Jetzt könnt ihr euch mal dran probieren, ob ihr das hinbekommt! Also wenn das Programm läuft in der Taskleiste in ein anderes wechseln, und schon sind dort die Titelleisten auch andersfarbig! ----------------------------------------------------------------------- Option Explicit Private Const COLOR_ACTIVECAPTION = 2 Private Declare Function GetSysColor Lib _ "user32" (ByVal nIndex As Long) As Long Private Declare Function SetSysColors Lib _ "user32" (ByVal nChanges As Long, _ lpSysColor As Long, _ lpColorValues As Long) As Long Dim backup As Long Dim l As Long ----------------------------------------------------------------------- Public Function TitelZeilenFarbeErmitteln() As Long TitelZeilenFarbeErmitteln = _ GetSysColor(COLOR_ACTIVECAPTION) End Function ----------------------------------------------------------------------- Public Function TitelZeilenFarbeTauschen(NewColor _ As Long) As Boolean Dim ant As Long ant = SetSysColors(1, COLOR_ACTIVECAPTION, NewColor) TitelZeilenFarbeTauschen = ant > 0 End Function ----------------------------------------------------------------------- Private Sub Command1_Click() l = TitelZeilenFarbeErmitteln backup = TitelZeilenFarbeErmitteln TitelZeilenFarbeTauschen RGB(148, 111, 177) End Sub ----------------------------------------------------------------------- Private Sub Form_Unload(Cancel As Integer) TitelZeilenFarbeTauschen backup End Sub ----------------------------------------------------------------------- Viel Spass... Mario

Welches Ereignis bei Formular verlassen?	63	FlyerMario	27.05.02 15:08
Re: Welches Ereignis bei Formular verlassen?	47	Master	27.05.02 16:22
Re: Welches Ereignis bei Formular verlassen?	42	FlyerMario	27.05.02 16:42
Re: Welches Ereignis bei Formular verlassen?	38	Master	27.05.02 16:56
Jesus, was für eine Höllenmaschine hast Du da geproggt ...	279	unbekannt	27.05.02 18:44
Ist keine Höllenmaschine!!!	65	FlyerMario	29.05.02 21:47
Gaukle eine Titelleiste vor...	46	Lumo	27.05.02 22:33

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

Suchen