Delphi-PRAXiS
Seite 1 von 10  1 23     Letzte »    

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Software-Projekte der Mitglieder (https://www.delphipraxis.net/26-software-projekte-der-mitglieder/)
-   -   Bounce for Sakura v1.0 (https://www.delphipraxis.net/53648-bounce-sakura-v1-0-a.html)

MaBuSE 20. Sep 2005 16:58


Bounce for Sakura v1.0
 
Liste der Anhänge anzeigen (Anzahl: 4)
Achtung neue Version v2.0 Final ;-)
sakura schrieb in http://www.delphipraxis.net/internal_redirect.php?p=430814#430814
ich finde die Smileys süß, welche auf den Wellen "hüpfen".

Hallo,
da Sakura hüfende Smiley süß findet, hier ein kleines Freewareprogramm:

Bounce.exe und nun Bounce2.exe

Funktion:
  • Es wird ein hüfender Smiley dargestellt (:bounce1:)
  • Linksklick zum verschieben
  • Rechtsklick für Menü
Falls jemand wissen will wie das funktioniert, kann ich ja auch noch den Quellcode veröffentlichen ;-)

Viel Spaß
MaBuSE

Es gibt nun eine Version 1.1 mit folgender Funktionserweiterung:
  • Im Popup gibts nun "Einstellungen..."
  • dort kann man StayOnTop an oder ausstellen
  • dort kann man auch angeben, das die Position gespeichert werden soll
Es gibt aber folgende Einschränkung:
Beim Start wird die Registry ausgelesen, beim Beenden werden die Infos geschrieben.
Es ist nicht möglich Einstellungen für mehrere Instanzen zu speichern.

Es gibt nun eine Version 2.0 mit folgender Funktionserweiterung:
  • Es werden mehere Smiles unterstützt. (Beim 1. Start 5 Smiles)
  • Die einzelnen Smiles können verschoben werden
  • Dialog Einstellungen funktioniert nun wieder
  • Dialog Einstellungen akzeptiert nun keine Anzahl <0 oder >100
    (wegen den Wahnsinnigen :mrgreen:)
  • Es kann das Smile über den Optionen Dialog verändert werden
  • Die Positionen der einzelnen Smiles werden nun alle gespeichert.
  • Ach ja ich habe auch noch ein paar Smiles hinzugefügt :mrgreen:
  • für die Fans der Eingabeaufforderung gibt es nun auch 4 Parameter:
    • bounce2.exe /load Dateiname.bounce: Es wird eine .bounce Datei geladen und die darin festgelegte Formation dargestellt.
    • bounce2.exe /save Dateiname.bounce: Es wird die aktuelle Formation gespeichert.
    • bounce2.exe /RegClean: entfernt alle angelegten Registry Einträge. (Extra für Matze eingebaut)
    • bounce2.exe /install: muß noch gemacht werden. Da soll später mal die Dateiverknüpfung rein (HKEY_CLASSES_ROOT)
  • Laden und Speichern geht natürlich auf via PopUp Menü
  • ...
Also ausprobieren.
bekannte Bugs:
  • Die StayOnTop funktioniert noch nicht so wie sie soll :-(
  • kleiner Grafikfehler beim OptionenDialog
    (danke Faux, den hatte ich vergessen, tritt bei mir auch auf)
  • Beim Auslesen der .bounce Dateien ist noch keine Fehlerbehandlung enthalten
    (Die Wahninnigen können so also doch versuchen 500 Smileys auf den Schirm zu zaubern)
  • bei zu vielen Smileys gibts jedem Menge Fehlermeldungen
Viel Spaß beim testen.[/quote]



ps: Info zu verwendeten Komponenten ist in der Unit1.pas enthalten (s.u.):
Delphi-Quellcode:
////////////////////////////////////////////////////////////////////////////////
// Bounce for Sakura v2.0
//
// Spaßprogramm zum Anzeigen eines hüpfenden Smileys
//
// Download des neusten Quelltextes und Executables auf [url]www.delphipraxis.net[/url]
// URL: [url]http://www.delphipraxis.net/topic63933_bounce+for+sakura+v10.html[/url]
//
// verwendete 3rd party Komponenten:
//   - Anders Melander's TGIFImage (Unit GIFImage)
//     das ist ein Filter zur Anzeige von animierten Gif Dateien in TImage
//
// sonstige verwendete Dateien, die nicht Bestandteil von Delphi sind:
//   - [url]http://www.delphipraxis.net/images/smiles/bounce.gif[/url]
//   - und viele andere Smileys, die auf [url]www.delphipraxis.com[/url] verwendet werden
//
////////////////////////////////////////////////////////////////////////////////
// Das Programm ist Freeware und darf beliebig benutzt und erweitert werden.
// Es wäre nett, wenn dann auch der geänderte Quelltext in obiges URL-Adresse
// gesendet wird. Dann haben alle was davon.
// Es wäre auch nett wenn mein (unser) Name in den Dateien enthalten bleibt.
// Das Programm wird von Ihnen auf eigenes Risiko eingesetzt. Ich übernehme
// keine Haftung für Schäden die durch das Programm oder die Benutzung des
// Programms entstanden sind bzw. entstehen.
////////////////////////////////////////////////////////////////////////////////
// (C) 2005, MaBuSE, member of DelphiPraxis.net
////////////////////////////////////////////////////////////////////////////////
// ReleaseNotes:
// v1.0 - 20.09.2005 - MaBuSE:     Erste Version war in 5 - 10 min programmiert
// v1.1 - 20.09.2005 - MaBuSE:     Ein paar Erweiterungen in 20 min dazugepackt
// v1.2 - 21.09.2005 - turboPASCAL: von RxTools auf GifImage umgestellt
//                                  Auswahlmöglichkeit des Smilies eingebaut.
// v2.0 - 22.09.2005 - MaBuSE:     bounce komplett neu geschrieben
//                                  Funktionen der v1.2 Übernommen
////////////////////////////////////////////////////////////////////////////////

Assun 20. Sep 2005 17:00

Re: Bounce for Sakura v1.0
 
:shock: wow das is ja mal cool !

also ich wäre brennend am Source interssiert :-)

PierreB 20. Sep 2005 17:03

Re: Bounce for Sakura v1.0
 
Cool ! :thumb:

Wär schön wenn man die Anzahl der Smileys & deren Position einstellen könnte. ;)
Außerdem ist der eine manchmal schwer zu treffen wenn man das Programm beenden will.

Sonst: :thumb:

hanselmansel 20. Sep 2005 17:04

Re: Bounce for Sakura v1.0
 
Jetzt musst du nur noch die Alphatransparenz richtig hinkriegen! (Moment! Jetzt wo ich's schreibe, fällt mir ein, dass ich den Wechselbutton noch frisieren wollte...)

Luckie 20. Sep 2005 17:08

Re: Bounce for Sakura v1.0
 
Zitat:

Zitat von Assun
also ich wäre brennend am Source interssiert :-)

Wozu? TImage auf die Form, TGifImage installieren, Gif Bildchen reinladen, Form auf Alwaysontop stllen und die Größe des TIMages anpassen, fertig. Dazu braucht man keinen Quellcode. ;)

MaBuSE 20. Sep 2005 17:09

Re: Bounce for Sakura v1.0
 
Zitat:

Zitat von hanselmansel
Jetzt musst du nur noch die Alphatransparenz richtig hinkriegen! (Moment! Jetzt wo ich's schreibe, fällt mir ein, dass ich den Wechselbutton noch frisieren wollte...)

Ich habe ja gar kein AlphaBlending benutzt.
Ist nur eine einfache Transparenz.

Das Programm wurde in 10 Min geschrieben.
(War ja nur als kleiner Gag gedacht.)

sakura 20. Sep 2005 17:09

Re: Bounce for Sakura v1.0
 
Wenn das Progrämmchen sich jetzt noch merken würde wo es starten soll, dann würde es beim Booten automatisch starten dürfen :mrgreen:

...:cat:...

BenjaminH 20. Sep 2005 17:09

Re: Bounce for Sakura v1.0
 
Genial!
Sieht echt klasse aus(Wenn man den Smiley dann findet^^)

MaBuSE 20. Sep 2005 17:10

Re: Bounce for Sakura v1.0
 
Zitat:

Zitat von sakura
Wenn das Progrämmchen sich jetzt noch merken würde wo es starten soll, dann würde es beim Booten automatisch starten dürfen :mrgreen:

Das bau ich Dir noch ein, und dann gibts Morgen eine neue Version.

Tschuess...

Lillebrohr 20. Sep 2005 18:01

Re: Bounce for Sakura v1.0
 
Hi,

und eventuell noch ne option das man andere smileys auswählen kann. Sollte ja kein Problem sein.

Außerdem wäre es noch nett wenn man das süsse kleine teil nicht über den bildschirmrand schieben kann.

Und vielleicht die Griffweite einstellen, denn ich hab schon manchmal problem das kleine kerlchen fassen zu können.


Bye


Alle Zeitangaben in WEZ +1. Es ist jetzt 13:18 Uhr.
Seite 1 von 10  1 23     Letzte »    

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