Systemfarbe zur Laufzeit ändern

[MaOfDe]

-->Systemfarbe zur Laufzeit nur für's eigene Prog ändern?<--

Hallo,
weiss einer, wie man die Systemfarben nur fuer sein eigenes Programm aendern kann??
Also praktisch die Informationen ueber die Farben abfangen, bearbeiten und weiterleiten..

Waere ganz praktisch, da das eigne Prog ziemlich behaemmert aussehen kann mit anderen Farbeinstellungen, z.B. die Raender von einzelnen Komponenten...

Theoretisch auch ganz einfach, wenn man nur wuesste, wo, wie und wann die Info gesogen wird.

[edit=FuckRacism]Titel geändert. Mfg, FuckRacism[/edit]

[MaOfDe]

Zitat:

Systemfarbe zur Laufzeit ändern

Autsch!! Da is die Farbeinstellung verschwunden... Hoppla!

[Jens Schumann]

Hallo,
such mal im MSDN oder in der Win32 Refrenz nach SystemParametersInfo.
Evt. hilft das ja. Ich habe mir die endlose Parameterliste nicht durchgelesen.

[MaOfDe]

Hab mir mal SystemParametersInfo angeguckt, aber leider ist nichts dabei, aber ick hab'n Plan!!!

Auszüge aus Graphics.pas von Delphi 3 Pro:

Code:

uses Windows, ..;

:
type
  TColor = $80000000..$7FFFFFFF;

const
  clScrollBar = TColor(COLOR_SCROLLBAR or $80000000);
  clBackground = TColor(COLOR_BACKGROUND or $80000000);
  clActiveCaption = TColor(COLOR_ACTIVECAPTION or $80000000);
  :
  clMaroon = TColor($000080);
  clGreen = TColor($008000);
  :

Es ist von daher nicht möglich die Systemfarben über das Windows API zu verändern, ... jedoch... könnte man die Unit Graphics.pas etwas abändern, indem man die Konstanten für die Systemfarben alle auf 0 setzt und im initialization-Teil übergibt man den Konstanten die Werte {TColor(COLOR_SCROLLBAR or $80000000),...}(mit ASM).
Dann nur noch 'ne Methode, die die einzelnen Farben bzw. die Konstanten beliebig einstellt und fertsch... aba leider hab ich nur die D3-Graphics.pas... und die compilt men D6 nicht und D3 will ich nicht installieren, da men PC n pa unzuordbare Fehler produziert...

Graphics.pas gibt's bei D6 Personal nicht... hätte einer von euch die Güte, diese Unit zum Download freizustellen? (befindet sich irgenwo im Source-Ordner) Et en plus diese auch gleich zu bearbeiten :-D ?
thx

Allerdings könnte auch diese Unit in D6 pro so(*.pas) nicht vorliegen...
det wär dann wirklich sch****!!!

[Luckie]

Autsch. Schon mal an Skins gedacht?

[MaOfDe]

:? Zu einfach... Der Gedanke ist mir spontan gekommen...
Aber bei einem Skin würden noch immer die Ränder von z.B. Edits, Forms..(in Systemfarbe)

Eigentlich brauch ich das auch net... ICH tue es im Namen der WISSENSCHAFT :-D !!!

[MaOfDe]

Es war einer so freundlich und hat mir die Units geschickt... doch leider kann ich meinen meisterhaften Plan voll vergessen...
mir ist total entgangen :wall: :wall: :wall:, dass die Unit Graphics.pas ja auch in anderen Units compilt ist, wie z.B. die Unit Forms.pas... Das wird dann ja leider nix, weil Borland, die ja leider nicht zur Verfügung stellt. Wenn die dann nicht auch geändert wird, kann man seine App nicht compilen. *schande* Voll verpeilt!!!

[Luckie]

Zitat:

Zitat von MaOfDe

Es war einer so freundlich und hat mir die Units geschickt...

und hat sich damit strafbar gemacht. :roll:

[MaOfDe]

Hab eh (noch) keine Verwendung dafür... In wie fern spielt das ne Rolle?? Würde mich als Hersteller nicht kratzen.