AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Sprachen und Entwicklungsumgebungen Sonstige Fragen zu Delphi Delphi Wie kann man eine Farbe langsam ´ändern
Thema durchsuchen
Ansicht
Themen-Optionen

Wie kann man eine Farbe langsam ´ändern

Ein Thema von Nico1 · begonnen am 9. Feb 2004 · letzter Beitrag vom 10. Feb 2004
 
Benutzerbild von Treffnix
Treffnix

Registriert seit: 25. Jun 2003
Ort: AC
740 Beiträge
 
Delphi 7 Professional
 
#4

Re: Wie kann man eine Farbe langsam ´ändern

  Alt 9. Feb 2004, 14:49
Eine Möglichkeit wäre folgende:

Delphi-Quellcode:
Procedure Fade;
var col: TColor;
Begin
  for col:= clgreen downto clred do Begin
      Form1.Color := col;
      Application.Processmessages;
  End;
End;
Allerdings solltest du das nicht so übernehmen, da

1. eine riesige Menge Farben dazwischenliegen und das ganze ziemlich Rechenaufwendig wird.
2. auch sämtliche Schatierungen der Zwischenfarben dazugehören. Es würde also von Grün zu grau zu schwarz, vom nächsten Grünton zu grau zu schwarz, usw.

Du könntest alle Farben, die du als Zwischentöne haben möchtest in einem eigenen Typen zusammenfassen und dafür diese Schleife durchlaufen. Vielleicht liegen die Vollfarben auch in bestimmten Abständen voneinander, so dass du den nächsten Vollton errechnen kannst. Weiss aber nicht, ob das stimmt und wie dieser Abstand ist.
  Mit Zitat antworten Zitat
 


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 15:23 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz