Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Software-Projekte der Mitglieder (https://www.delphipraxis.net/26-software-projekte-der-mitglieder/)
-   -   Leuchtbild Ver.: 1.0 Alpha (https://www.delphipraxis.net/114387-leuchtbild-ver-1-0-alpha.html)

Larsi 24. Mai 2008 13:52


Leuchtbild Ver.: 1.0 Alpha
 
Liste der Anhänge anzeigen (Anzahl: 1)
Hi,
hiermit stelle ich euch mein neustes Programm zur Verfügung: Leuchtbild Ver.: 1.0 Alpha. Ich weiß nicht ob Ihrs kennt aber es gibt für sehr viel Geld Leuchtbilder die man dann an die Wand hängen kann und die dann mit Farben ein ganz anderes Licht in den Raum bringen :) . Jetzt habe ich mir überlegt: Warum soll man das nicht auch für den Pc haben können und entstanden ist dieses Programm.

Es hat drei verschiedene "Leucht" Typen:

1. Typ (über linke Pfeiltaste erreichbar): Vier verschiedene Farben in jeder Ecke, die Ihre Farbe per Zufall ändern:


http://wiltfang.wi.funpic.de/Leuchtbild 1.Jpg

2. Typ (über rechte Pfeiltaste erreichbar): Eine Farbe über den ganzen Bildschirm, der sich per Zufall ändert:


http://wiltfang.wi.funpic.de/Leuchtbild 2.JPG

3. Typ (über obere Pfeiltaste erreichbar): Ein rotes Quadrat umgeben von Schwarzen, das erst oben links, dann oben rechts, dann unten links und dann unten rechts ist:


http://wiltfang.wi.funpic.de/Leuchtbild 3.JPG


Ihr könnt mir ja mal sagen wie ihr es findet. Ich weiß, sehr viel Arbeit steckt nicht dahinter aber schön finde ich es trotzdem. Werde es vielleicht auch irgendwann als Screensaver machen aber erstmal soll's so bleiben. Es werden noch mehr "Visualisierungen" dazukommen. Wenn man ein Tablet Laptop, sieht es natürlich am Meisten nach Leuchtbild aus. Das es von alleine die verschiedenen "Visualisierungen" aufnimmt ist auch schon geplant.

Flips 24. Mai 2008 13:56

Re: Leuchtbild Ver.: 1.0 Alpha
 
Hi,
lustiges Programm, funktioniert gut bei mir :-)
Wie wärs denn, wenn du die Farben nicht einfach "hart änderst", sondern wenn sie weich ineinander überlaufen?

Matze 24. Mai 2008 14:01

Re: Leuchtbild Ver.: 1.0 Alpha
 
Zitat:

Zitat von Larsi
Ich weiß nicht ob Ihrs kennt aber es gibt für sehr viel Geld Leuchtbilder die man dann an die Wand hängen kann und die dann mit Farben ein ganz anderes Licht in den Raum bringen :) .

Ich habe es noch nicht ganz verstanden. Was soll mir das bringen?
Und es gibt Programme, die das machen und sehr teuer sind?

Ich sehe 4 rechteckige Flächen, die fortlaufend die Farben ändern.

Grüße

Larsi 24. Mai 2008 14:14

Re: Leuchtbild Ver.: 1.0 Alpha
 
Zitat:

Hi,
lustiges Programm, funktioniert gut bei mir Smile
Wie wärs denn, wenn du die Farben nicht einfach "hart änderst", sondern wenn sie weich ineinander überlaufen?
Ok, ist auf der Todo. Danke, dass du es gut findest.
Zitat:

ch habe es noch nicht ganz verstanden. Was soll mir das bringen?
Und es gibt Programme, die das machen und sehr teuer sind?

Ich sehe 4 rechteckige Flächen, die fortlaufend die Farben ändern.

Grüße
Also Programme, die das machen habe ich noch nicht entdeckt. Ein Leuchtbild ist ein eigentlich ein Bildschirm der verschiedene Farben zeigt und das sieht halt ganz gut dann im Raum aus.
Das ist z.B. eins. Und das kostet schon über 100 Euro.
Das ganze habe ich halt für den Pc nachgebildet, jetzt verstanden? :-D

[edit=Phoenix]Url korrigiert, die das Layout gesprengt hat. Mfg, Phoenix[/edit]

Die Muhkuh 24. Mai 2008 14:15

Re: Leuchtbild Ver.: 1.0 Alpha
 
Zitat:

Zitat von Matze
Ich sehe 4 rechteckige Flächen, die fortlaufend die Farben ändern.

Das ist auch Sinn und Zweck des Ganzen. :mrgreen:

Also ich könnte mir vorstellen, wenn man das ganze mit Chillout Moods Musik verknüpfen und je nach Stimmung nur bestimmte Farben anzeigen lassen kann, die natürlich weich überlaufen, könnte was draus werden. ;)

Larsi 24. Mai 2008 14:24

Re: Leuchtbild Ver.: 1.0 Alpha
 
Hat einer ne Idee wie ich das mit dem "weich übergehen" machen kann? Für die Zufalssfarben verwende ich folgenden Code:
Delphi-Quellcode:
function RandomColor():TColor;
begin
  Result := RGB(Random(256),Random(256),Random(256));
end;

Matze 24. Mai 2008 14:29

Re: Leuchtbild Ver.: 1.0 Alpha
 
Hallo,

ok, ich habe nun verstanden, was das soll. *g*

Wenn ich mir das recht überlege, dann darfst du die einzelnen Farbwerte nicht in großen Sprüngen ändern, sondern in kleineren. Also beispielsweise für einen der 3 RGB-Werte:

Delphi-Quellcode:
Random(40)+1 + AktuellerWert-20
// bzw: Random(40) + AktuellerWert-19
Das sind dann Werte zwischen dem aktuellen Wert - 20 und dem aktuellen Wert + 20, denke ich mal. :stupid:

Grüße

Larsi 24. Mai 2008 14:33

Re: Leuchtbild Ver.: 1.0 Alpha
 
Ok danke gibt dann bald ein Update :)

Matze 24. Mai 2008 14:42

Re: Leuchtbild Ver.: 1.0 Alpha
 
Nur noch zur Info: Die Grenzen musst du natürlich noch berücksichtigen. Meine Code kann auch Werte > 255 und < 0 liefern.

Flips 24. Mai 2008 15:35

Re: Leuchtbild Ver.: 1.0 Alpha
 
Was auch noch nett wäre:
- Man kann sich Farben aussuchen, die erscheinen sollen.
- Audio-Ausgang anzapfen und je nach Lautstärke-/VU-Level die Farben eher stark oder eher blass erscheinen lassen, quasi allen Vierecken ne Farbe vorgeben und je nachdem wie hoch das Level ist den Alpha-Wert eher groß oder eher klein machen :-)

Mikender 24. Mai 2008 15:43

Re: Leuchtbild Ver.: 1.0 Alpha
 
Was auch noch witzig wäre wäre wenn man den PC währenddessen noch benutzen könnte, also dass du kein Fenster hast sondern einfach die Ausgabe an den Bildschirm veränderst, so wie wenn man an einen Röhrenbildschirm ein starken Magneten an jede Ecke klebt (bitte nicht nachmachen)

Oder wenn das zu schwer ist (wenn es überhaupt geht) baue doch Alphablend und durchklickbarkeit ein (einfach mal hier suchen)

Gruß Mikender

everdream 24. Mai 2008 15:53

Re: Leuchtbild Ver.: 1.0 Alpha
 
Ich könnte mir vorstellen, dass die großen Flächen bei eine Farbübergang flimmern. Man müsste dann ja alle x Millisekunden einen neuen Farbwert setzen...

Die Idee finde ich aber gut ^.^

Die Muhkuh 24. Mai 2008 15:55

Re: Leuchtbild Ver.: 1.0 Alpha
 
Vielleicht sollte man auf DirectX oder OpenGL zurückgreifen, um das Flackern zu vermeiden.

DeddyH 24. Mai 2008 15:57

Re: Leuchtbild Ver.: 1.0 Alpha
 
Nicht, wenn man es richtig macht. Beeindruckt bin ich z.B. hiervon, das ist richtig schnell.

Matze 24. Mai 2008 15:58

Re: Leuchtbild Ver.: 1.0 Alpha
 
Liste der Anhänge anzeigen (Anzahl: 1)
Zitat:

Zitat von everdream
Ich könnte mir vorstellen, dass die großen Flächen bei eine Farbübergang flimmern. Man müsste dann ja alle x Millisekunden einen neuen Farbwert setzen...

Das geht halbwegs flimmerfrei auch mit sanften Übergängen (s. Anhang).
Und das ganz simpel mittels Timer-Intervall von 50ms und aktiviertem DoubleBuffered.

Grüße

Edit: Natürlich "ruckelt" es so etwas.

Die Muhkuh 24. Mai 2008 16:02

Re: Leuchtbild Ver.: 1.0 Alpha
 
Geht nur ein bisschen zu schnell. Könnte man für die Disko verwenden. :stupid:

BullsEye 24. Mai 2008 16:25

Re: Leuchtbild Ver.: 1.0 Alpha
 
Das Prinzip habe ich ja verstanden, aber was ich so gar nicht verstehe ist, warum es 4 Vierecke sein müssen.
Ich finde, das gibt zu krasse farbübergänge. Besser wäre eine Fläche, so wie es im Beispiel von DeddyH zu sehen war...

Larsi 25. Mai 2008 07:23

Re: Leuchtbild Ver.: 1.0 Alpha
 
Zitat:

Zitat von BullsEye
Das Prinzip habe ich ja verstanden, aber was ich so gar nicht verstehe ist, warum es 4 Vierecke sein müssen.
Ich finde, das gibt zu krasse farbübergänge. Besser wäre eine Fläche, so wie es im Beispiel von DeddyH zu sehen war...

Drück mal die linke Pfeiltaste :)

turboPASCAL 25. Mai 2008 08:12

Re: Leuchtbild Ver.: 1.0 Alpha
 
:gruebel: 4 Panels und 6 Timer. 8)

Das klappt (funzt) auch einfacher! :stupid:

Larsi 25. Mai 2008 08:14

Re: Leuchtbild Ver.: 1.0 Alpha
 
Zitat:

Zitat von turboPASCAL
:gruebel: 4 Panels und 6 Timer. 8)

Das klappt (funzt) auch einfacher! :stupid:

Woher weißt du das?

Die Muhkuh 25. Mai 2008 08:57

Re: Leuchtbild Ver.: 1.0 Alpha
 
Delphi Decompiler angeworfen ;)

Larsi 25. Mai 2008 09:05

Re: Leuchtbild Ver.: 1.0 Alpha
 
Zitat:

Zitat von Die Muhkuh
Delphi Decompiler angeworfen ;)


Mit welchem Programm geht das?

Matze 25. Mai 2008 09:09

Re: Leuchtbild Ver.: 1.0 Alpha
 
Liste der Anhänge anzeigen (Anzahl: 1)
Zitat:

Zitat von Larsi
Mit welchem Programm geht das?

Google hätte dir schnell ein entsprechendes Ergebnis gebracht: DeDe Download.

Man kann aber nicht den Code in einer Hochsprache (Delphi) daraus erzeugen bzw. nur Bruchteile. Das meiste ist dann Assembler, aber man kann das Formular erzeugen und auch sehen, was so verwendet wurde.
Im Anhang siehst du das, was Matti vermutlich auch gesehen hat (links meine Demo, rechts dein Programm).

Grüße

Edit: "rechts" und "links" vertauscht.

turboPASCAL 25. Mai 2008 12:55

Re: Leuchtbild Ver.: 1.0 Alpha
 
Liste der Anhänge anzeigen (Anzahl: 1)
Ich habe mir die Form in Delphi angeguckt. :stupid:

( PS.: Meine Glaskugel ist super, der "XN Resource Editor" auch. :zwinker: )

zahor 25. Mai 2008 13:20

Re: Leuchtbild Ver.: 1.0 Alpha
 
ehm.... irgendwie funktionieren die bilder in deinem ersten post nicht. funpics hässliche nicht-vorhanden-warnung kommt. auch bei den meisten links auf deiner hompepage.


Alle Zeitangaben in WEZ +1. Es ist jetzt 04:43 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