AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Win32/Win64 API (native code) Delphi Windows Darstellungsschema laden
Thema durchsuchen
Ansicht
Themen-Optionen

Windows Darstellungsschema laden

Ein Thema von winkel57 · begonnen am 16. Nov 2005 · letzter Beitrag vom 16. Nov 2005
Antwort Antwort
winkel57

Registriert seit: 1. Nov 2005
9 Beiträge
 
Delphi 7 Personal
 
#1

Windows Darstellungsschema laden

  Alt 16. Nov 2005, 11:32
Moin aus dem Norden,

habe schon viel gesucht, aber bin da auf keine Lösung gestossen. Ich möchte beim Aufruf meiner Software eine eigenes Darstellungsschema laden (Eigenschaften von Anzeige > Schema), und nach verlassen auf das alte zurückkehren.

Hat jemand da eine Idee?

Tausend Dank!

Detlef
  Mit Zitat antworten Zitat
NicoDE
(Gast)

n/a Beiträge
 
#2

Re: Windows Darstellungsschema laden

  Alt 16. Nov 2005, 11:38
Zitat von winkel57:
(Eigenschaften von Anzeige > Schema)
Gibt's bei mir nicht. Vielleicht meinst Du
- Anzeige / Designs / Design
und/oder
- Anzeige / Darstellung / Farbschema
(wobei der Inhalt des letzteren davon abhängig ist, ob der Dienst 'Designs' läuft und ein Design mit 'Visuellen Stilen für Windows XP' aktiviert ist...)

off-topic: warum sollte der Benutzer wollen, dass sein System verstellt wird (vielleicht hat er es mühsam konfiguriert...).
  Mit Zitat antworten Zitat
Benutzerbild von Bernhard Geyer
Bernhard Geyer

Registriert seit: 13. Aug 2002
17.201 Beiträge
 
Delphi 10.4 Sydney
 
#3

Re: Windows Darstellungsschema laden

  Alt 16. Nov 2005, 11:45
Meinst Du das was das ElPack ab der Version 4 mittels Support for Windows XP themes on other Windows versions kann.
Sprich XP-Themes-DLL unabhängig von Windows laden und darstellen.
Windows Vista - Eine neue Erfahrung in Fehlern.
  Mit Zitat antworten Zitat
winkel57

Registriert seit: 1. Nov 2005
9 Beiträge
 
Delphi 7 Personal
 
#4

Re: Windows Darstellungsschema laden

  Alt 16. Nov 2005, 11:48
Danke noch einmal...
Ich benutze einen Touchscreen für eine Videoshow und möchte alle Touchflächen so groß wie möglich machen (Scrollbar) und da es meisstens dunkel beim Mixer ist will ich die Kontraste anpassen, Die Buttons in grau stören da ein wenig... Sonst soll es natürlich ein "normales" Erscheinungsbild haben. Ach ja, bei Win2000 / Deutsch heisst es nun einmal so

Danke für die schnelle Antwort.

Detlef

Bernhard: deine Frage verstehe ich nicht - bin kein Profi - aber eben Win2000.
  Mit Zitat antworten Zitat
Benutzerbild von Daniel Schuhmann
Daniel Schuhmann

Registriert seit: 16. Jul 2005
Ort: München
391 Beiträge
 
Turbo Delphi für Win32
 
#5

Re: Windows Darstellungsschema laden

  Alt 16. Nov 2005, 12:09
Schau dir mal die Windows-API-Funktionen MSDN-Library durchsuchenGetSysColor und MSDN-Library durchsuchenSetSysColors sowie MSDN-Library durchsuchenSystemParametersInfo an. Eine Funktion, mit der man ein komplettes Schema laden kann, hab ich aber noch nicht gefunden.
Daniel Schuhmann
  Mit Zitat antworten Zitat
winkel57

Registriert seit: 1. Nov 2005
9 Beiträge
 
Delphi 7 Personal
 
#6

Re: Windows Darstellungsschema laden

  Alt 16. Nov 2005, 12:17
Hmm, vielen Dank für den Tipp. Da habe ich ja erst einmal was zu lesen, aber ich befürchte (ich war da schon) da komme ich gerade mit der Breite des Scrollbalkens bei einer ListBox nicht weiter.

Detlef
  Mit Zitat antworten Zitat
Benutzerbild von Daniel Schuhmann
Daniel Schuhmann

Registriert seit: 16. Jul 2005
Ort: München
391 Beiträge
 
Turbo Delphi für Win32
 
#7

Re: Windows Darstellungsschema laden

  Alt 16. Nov 2005, 12:43
Microsoft schreibt im MSDN-Artikel "About Scroll Bars" (ganz unten):

Zitat von Mircosoft:
Scroll Bar Colors and Metrics
The system-defined color value, COLOR_SCROLLBAR, controls the color within a scroll bar shaft. Use the GetSysColor function to determine the color of the scroll bar shaft and the SetSysColors function to set the color of the scroll bar shaft. Note, however, that this change of color affects all scroll bars in the system.

You can get the dimensions of the bitmaps that the system uses in standard scroll bars by calling the GetSystemMetrics function. Following are the system metric values associated with scroll bars.

System metric Description
SM_CXHSCROLL Width of arrow bitmap on horizontal scroll bar
SM_CXHTHUMB Width of scroll box on horizontal scroll bar. This value retrieves the width a scroll bar that has a page size of zero.
SM_CXVSCROLL Width of arrow bitmap on vertical scroll bar
SM_CYHSCROLL Height of arrow bitmap on horizontal scroll bar
SM_CYVSCROLL Height of arrow bitmap on vertical scroll bar
SM_CYVTHUMB Height of scroll box on vertical scroll bar. This value retrieves the height of a scroll bar that has a page size of zero.
Eine Funktion SetSystemMetrics gibt's leider nicht, aber vielleicht hilft das beim Suchen.

Daniel,
den die Lösung auch brennend interessieren würde
Daniel Schuhmann
  Mit Zitat antworten Zitat
winkel57

Registriert seit: 1. Nov 2005
9 Beiträge
 
Delphi 7 Personal
 
#8

Re: Windows Darstellungsschema laden

  Alt 16. Nov 2005, 13:09
hmmm, stellt sich nur noch die Frage wie ich das einsetzte. Bin so dicht an WIndows leider nicht der Crack..

Habe es einmal mit:

SendMessage(MeineListe.Handle,SM_CXHTHUMB,500,Card inal(0));

probiert, was natürlich nicht klappt. Um es erste einmal zu probieren habe ich es auf ein Button ausprobiert (OnClick)

Es sieht immer so einfach aus...

Detlef
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 02:13 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz