[Screen Saver] Snowfall Greetings V1.2c

[Sunlight7]

Moin zusammen!

Was man so beim Aufräumen nicht alles findet... :shock:
Ein kleines, schon ganz vergessenes Programm, was es schneien lässt, passt ja genau zur Jahreszeit.
Dazu kann man Grüße oder anderen Text Einstellen, auf dem der Schnee liegen bleibt.
Ab und an kommt eine Schneeraupe vorbei und räumt den angehäuften Schnee am Boden wieder weg.

Also schnell entstaubt und hochgeladen. :-D

Viel Spaß, zurücklehnen und beim beobachten entspannen :wink:

Grüßle!

PS: Das Programm schreibt seine Einstellungen nach "HKEY_CURRENT_USER\Control Panel\Screen Saver.Snowfall Greetings"
Du kannst diesen Schlüssel selbst löschen, oder die Datei "Snowfall Greetings.scr" mit der rechten Taste anklicken, "Konfigurieren" wählen und im Dialogfeld auf "Deinstallieren" klicken.
Danach nur mehr "Snowfall Greetings.scr" löschen - fertig.

Edit: Kleine Fehler behoben.
Edit: Es wurde mehr Schnee bestellt :wink:
Edit: Log & Licht hinzugefügt

[turboPASCAL]

Der ist ja schen. :thumb:

Hat aber einen kleinen Fehler, am rechten Rand entsteht ein weisser Streifen aus Schnee.

In der Windows Bildschirmschoner Einstellung kömmt keine Vorschau und der Knopf "Einstellungen" zeigt keine Wirkung. :gruebel:


Was interessant ist der "abrutschende Schnee"...


// Edit:

Du kannst dir hier mal den Aufbau eines Screensavers angucken. (nonVLC)

[joel93]

such mal in der DP, da hatten wir schonmal was, du muss nur nen pa Parameter einfügen


//Edit
Fröhlich Weihnacht! :-D :-D

[joel93]

:shock: Das ding is von 2006, aber n och mit D 2.0 kompiliert!
Steht in der Snow.log die er beim Konfigurieren im Ordner Ablegt.

Snow.log:

DLS Info Log

Kompiliert mit Delphi: 2.0

Es wird die unabhängige DLS-Version verwendet.
Unit "SRegistry.pas" eingebunden.
Unit "SClasses.pas" eingebunden.
Unit "SColors.pas" eingebunden.
Unit "SThrBitmap.pas" eingebunden.
Unit "SGraphics.bmp" eingebunden.
Unit "SGraphics.pas" eingebunden.
Unit "SStrings.pas" eingebunden.
Unit "SFlatButton.pas" eingebunden.
Unit "SFlatButtonEx.pas" eingebunden.

Fröhliche Weihnachten! :-D :-D

[Balu der Bär]

Zitat:

Hat aber einen kleinen Fehler, am rechten Rand entsteht ein weisser Streifen aus Schnee.

Ist bei mir nicht, sieht gut aus.

Ganz nett dein Screensaver. :-)

[joel93]

@Balu hast du gewartet bis der Schneeflug weg war?

[Balu der Bär]

Stimmt, auf den ersten Blick sah alles i.O. aus. :mrgreen:

[Sunlight7]

Hallo zusammen!

:shock: Auf einem Rechner geht das mit den Einstellungen, beim anderen net :gruebel:
Hmm, das mit den Parametern hab' ich drinnen :gruebel:
Das kein Vorschaubild kommt weiß ich, damals kannte ich die Callback noch net :stupid:
Und das Ding is net von 2006, der is von 2000, ich hab nur schnell den Start um 1000% schneller gemacht und ihn durch den Compiler gejagt :mrgreen:

Weißer streifen :gruebel:
Oh tatsächlich :shock:
Da muss ich ein Update schreiben, so gehts net...

Grüßle!

[Delphi Star]

Bei mir startet er nicht. Er taucht nur kurz in der Taskbar auf und ist sofort wieder weg.
Das erinnert mich ein bisschen an das hier.

[Sunlight7]

Hast Du die Maus um mehr als 10 Pixel bewegt? :mrgreen:

Wie erstartet nicht, in den Windows Bildschirmschonereinstellungen oder direkt vom Explorer?

[xZise]

Direkt über den Explorer und über den Anzeigeeinstellungen:
Er bricht einfach ab.. Ein kurzes Flackern aber sonst nichts...

[Sunlight7]

@joel93: Danke, das Du mir das Log vorgehalten hast, da is mir aufgefallen, das ic vergessen hatte ne Unit mit einzubinden :wall:

Den Fehler mit dem weißen Streifen hab ich auch behoben.
Nur das Vorschaubild muß ich erst machen, dazu muß ich erst meine Kompo umschreiben :coder:
Das mit dem Einstellungen müsste jetzt funktionieren :-D
Danke an alle, schön, das es Euch gefällt. :corky:

Edit: Nicht vorhandener roter Kasten (Luckie): Das sollte auch behoben sein (hoff' ich)

[Luckie]

Zitat:

Zitat von xZise

Er bricht einfach ab.. Ein kurzes Flackern aber sonst nichts...

Dito. Windows XP Professional SP2 alle Updates und Patches.

[Florian H]

Zitat:

Zitat von Luckie

Zitat:

Zitat von xZise

Er bricht einfach ab.. Ein kurzes Flackern aber sonst nichts...

Dito. Windows XP Professional SP2 alle Updates und Patches.

dito.. nur WinXP Home..

[Sunlight7]

Wie, das Update funkt auch net? :shock:

[Luckie]

Oh, da shab eich nicht mitbekommen. Ich rede noch von deiner ursprünglichen Version. Das Update hab eich noch nicht ausprobiert. Ich müsste mich dazu auch erst als Administrator anmelden, um den Bildschrimschoner installieren zu können. Derzeit schreibe ich aber gerade einen Artikel für meine Homepage, aber ich denke, ich werde das nachher mal ausprobieren.

[Zacherl]

Bei mir startet das PRogramm nicht ... klicke ich auf Testen kommt kurz ein schwarzes Fenster, und das Programm wird sofort wieder geschlossen.

[Sunlight7]

So, jetzt hab ich die Maussensibilität etwas verringert, bzw. wird erst 2 Sekunden nach dem start drauf reagiert.
Wenns also an der Maus liegt, was ich vermute, dann sollte es behoben sein.

Zusätzlich gibt es jetzt das Vorschaufenster in den Bildschirmschoner Menu in der Anzeige :-D

Grüßle!

[xZise]

Also auf dem Lapi funktioniert er... Woanders habe ich noch nicht geguckt ;)

2 Fragen:
-> Wann kommt der Flug?
-> Wo hast du die Einstellungen gespeichert?

[TonyR]

Ich hab auch 2 Fragen:

1. Mit was hast du's programmiert? (DirectX, OpneGL, DelphiX)
2. Ist es möglich noch mehr Schnee auf einmal herabrieseln zu lassen, als im Moment? (Die derzeitige Einstellung: maximal ist mir eigentlich zu lasch)

Ich hab nämlich mal gewartet bis der ganze Bildschirm voll ist, das hat bei mir ca. 1,75 h ( :-D ) gedauert!

Achso, noch was: Kannst du mir mal erklären, wie man das mit dem abrutschenden Schnee hinkriegt?
Welche Bedingung nimmt man da am besten???

So.... also alles in Allen hast du uns da ein Wunderschönes :stupid: Weihnachtsgeschenk geamacht!!!! *gg*

[Sunlight7]

Schön das er Euch gefällt :-D

Hmm, mehr Schnee wäre Theoretisch möglich, derzeit sinds 1280 mögliche Schneeflocken, nur dann würde der Speicherverbrauch noch mehr steigen.

Zitat:

Zitat von TonyR

Achso, noch was: Kannst du mir mal erklären, wie man das mit dem abrutschenden Schnee hinkriegt?
Welche Bedingung nimmt man da am besten???

Willst Du mir das nachmachen? :gruebel: :mrgreen:
Also im Jahre 2000 bin ich da länger dran gesessen, raus kam dabei eine ziemlich kaputte Struktur von If abfragen...

Grafisch programmiert ist das ganze mit DIBs.

Zitat:

Zitat von xZise

-> Wann kommt der Flug?

Wenn der Pflug eingeschaltet is, sobald irgendwo mehr als die hälfte der höhe der Schneeschaufel mit Schnee bedeckt is.

Zitat:

Zitat von xZise

-> Wo hast du die Einstellungen gespeichert?

Willst Du wieder Hacken? :mrgreen:
Setz' Deine Brille auf, und lies Dir den 1. Beitrag durch :nerd: :mrgreen:

Grüßle!

[Sunlight7]

Es wurde mehr Schnee bestellt, bitte sehr, ich hoffe Euer Rechner ist schnell genug :mrgreen:

[xZise]

Zitat:

Zitat von Sunlight7

Zitat:

Zitat von xZise

-> Wo hast du die Einstellungen gespeichert?

Willst Du wieder Hacken? :mrgreen:

lol ;)
Ich habe auch einen Screensaver, und wollte einfach mal wissen, wo ihr es abspeichert ;)

PS: Und ich will gucken, ob ich vielleicht mehr Schneeflocken hinbekomme ^^

[arbu man]

Wirklich ein schöner Bildschirmschioner :) Da kommt doch wirklich winterliche Stimmung auf, auch wenn daußen kein Schnee ist :(

[Goldesel]

Erstmal vielen Dank für diesen tollen Screensaver ... da kommt man doch so richtig in Winterstimmung. :-D

Vielleicht noch ne kleine Anregung: Wie wärs denn, wenn der Schneepflug den Schnee vor sich herschieben würde? :mrgreen:

Außerdem hab ich immer noch einen Streifen bei den Schneepflug. Ist auf dem Screenshot nicht sehr stark zu sehen, aber im Screensaver ist es doch sehr deutlich zu sehen.

[Sunlight7]

Hallo zusammen!

@xZise: "HKEY_CURRENT_USER\Control Panel\Screen Saver.Name des Bildschirmschoners"
Da speichern die von MS auch Ihre Einstellungen hin :wink:
Mehr Schnee geht net :mrgreen:
Die Max. Schneemenge wird von der Bildschirmauflösung * Benutzereinstellung * 4 (Jetzt * 8 ) berechnet.

Zitat:

Zitat von Goldesel

Vielleicht noch ne kleine Anregung: Wie wärs denn, wenn der Schneepflug den Schnee vor sich herschieben würde? :mrgreen:

Viel zu schön, um wahr zu sein :mrgreen:
Damals hab ich mir dran die Zähne ausgebissen :stupid:
Mal sehen, vielleicht setz' ich mich nochmal dran. :gruebel:

Edit: Streifen :gruebel:

[Chrissi91]

Hi,

sehr schön geworden. Bei mir klappt alles einwandfrei.

Win XP SP 2 aktuellste Version von Snowfall Greetings

Nur:

Nach 5 Minnuten hörte das Schneien plötzlich auf. Keine Fehlermeldung, nichts ... Durch Bewegen der MAus kam ich nicht raus, nur mit Esc.

Grüße aus Berlin

Chrissi91

[Sko]

Zitat:

Zitat von Chrissi91

...
Nur:

Nach 5 Minnuten hörte das Schneien plötzlich auf. Keine Fehlermeldung, nichts ... Durch Bewegen der MAus kam ich nicht raus, nur mit Esc. ...

Bei mir das gleiche, sonst sehr schön.

[Edit]es kommt anscheinend doch eine Fehlermeldung, zumindest der Ton davon, das Fenster ist nicht zu sehen[/Edit]

[jakobwenzel]

Bei mir auch

[Chrissi91]

Hi,

ja. Der Ton bei mir kam auch. Da ich aber keine Fehlermeldung gesehen habe, dachte ich, ich hätte es mir eingebildet. xD

Du kannst deinen Bildschirmschoner ja mal mit Breakpoints testen, falls das überhaupt geht. ^^ :cyclops:

Ich wünsche dir dann viel Spaß beim Warten, bis die paar Minuten um sind. xD

Aber dass keine Fehlermeldung kommt, wundert mich doch ...

Grüße aus Berlin

Chrissi91

[Sunlight7]

Hmm :gruebel:

Bei mir läuft der über Stunden...

Nach jeweils 5 Minuten kommt eine Schneefallpause, das ist normal, aber sollte gleich wieder zu schneien beginnen :gruebel:
Ich werde da mal ein Log einbauen...
Welche Einstellungen hattet Ihr?
Schneemenge, Schneepflug, Bildschirmauflösung?

Zitat:

Zitat von Chrissi91

Du kannst deinen Bildschirmschoner ja mal mit Breakpoints testen, falls das überhaupt geht. ^^

Ich brauch' nur die CloseTriggers von meiner Kompo auf [] setzen :cyclops:

Grüßle!

Edit: Wenn Ihr mit der linken Maustaste klickt (natürlich ohne sie zu bewegen) wird sofort eine Schneefallpause gemacht, kommt da das Problem dann auch?

[Sko]

Zitat:

Zitat von Sunlight7

Hmm :gruebel:

...
Welche Einstellungen hattet Ihr?
Schneemenge, Schneepflug, Bildschirmauflösung?
...

Edit: Wenn Ihr mit der linken Maustaste klickt (natürlich ohne sie zu bewegen) wird sofort eine Schneefallpause gemacht, kommt da das Problem dann auch?

Ich hatte Schneemenge auf Maximal und auf großer Schneesturm ausprobiert, Schneepflug war an und meine Bildschirmauflösung ist 1280x1024.

[Edit]wenn ich mit der linken Maustaste klicke passiert garnichts[/Edit]

[Sunlight7]

Also jetzt hab ich probiert und probiert, aber es gelang mir net einen Fehler zu provozieren...
Deshalb hab ich das jetzt mal mit nem Log hochgladen und wenn eine Fehlermeldung auftaucht ist die Meldung jetzt sichtbar und wird ins Log geschrieben :)

Zusätzlich kann man jetzt beim Schneepflug das Licht einschalten :idea: :-D

Grüßle!

[jakobwenzel]

Hmm, jetzt klappts.

PS: Dualmonitor-Support (auch wenns grad des gleiche is) wär schön (momentan wird der 2. monitor frei gelassen)

[Sunlight7]

Seltsam, ich hab gar nix verändert :gruebel:

Für Dualmonitor Support brauch' erst ich Support :stupid:
Damit hab ich mich noch net beschäftigt.

[joel93]

Muss man das Verstehen, Sunlight's Avatar in Verbindung mit diesem Thema??? :-D

:party: Frohes Neues

[Light]

Hi Sunlight7,

der Schoner ist einfach klasse!

Dickes Lob!

Ok Zwei-Schirm-Unterstützung wäre nett :)

Schnee reicht auch (mehr würde mein PC nich mehr mit machen....)

Mich würde ja auch irgendwie mal der QuellCode interessieren.. nur ich glaub da gilt:
"Mit Code ist es wie mit Kunst - Hauptsache der Künstler versteht es"
(weiß grad nicht mehr wo ich den Spruch gelesen hab bzw. in welcher Signatur er steht...)

Leuchtende Grüße

Stefan

[Sunlight7]

@joel93: Steht ja auf dem Avator: "Schön wär's doch"...
Da is net so kalt wie bei uns :wink:

@Light: Danke!

Das hat irgendein Modi in der Sign stehen, ich mein Grad SirThornberry.
Aber es stimmt net ganz, das hab zwar ich mal geschrieben, aber ich verstehs selber net mehr :mrgreen:
Es is ne Wind Engine drinnen, aber die hab ich damals deaktiviert, weil se viele Fehler machte, jetzt hätt' ich probiert, diese Fehler zu beheben, aber ich kapiers' gar net :stupid:
Naja, wenn ich mal genug Zeit hätte mich da wieder rein zu Studieren würds mein ich gehen.

Werd' mich mal umgucken für Dual-Monitor, aber ob das mit Delphi 2 was wird?
Blöd, der Quellcode läuft nur mit D2 :(

Sonnige Grüße!

Guten Rutsch und frohe Ostern :mrgreen:

[xZise]

Also wegen Multimonitorbetrieb könnte ich das "Konkurrenzprodukt" empfehlen (ich meine wegen den Quellcode).

Ist zwar nicht von mir, sondern vom "Erfinder" (ich glaub "Hador").

Und dann könntest du es so modifizieren, dass sie Schrift irgendwie zwischen den Monitoren angezeigt wird. Oder dass der Schneeflug in den 2. Monitor weiterfährt.

[Sunlight7]

Zitat:

Zitat von xZise

Also wegen Multimonitorbetrieb könnte ich das "Konkurrenzprodukt" empfehlen...

Ich dachte, Du siehst mich net als Konkurrenz? :mrgreen: