AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Projekte [OS] Metaballs-About Preview

[OS] Metaballs-About Preview

Ein Thema von turboPASCAL · begonnen am 25. Apr 2010 · letzter Beitrag vom 10. Aug 2010
Antwort Antwort
Seite 1 von 2  1 2   
Benutzerbild von turboPASCAL
turboPASCAL
Registriert seit: 8. Mai 2005
Aus diesem Thread: Metaballs (opengl) !? entstand ein kleines Projekt.
Miniaturansicht angehängter Grafiken
vorschau_349.jpg  
Angehängte Dateien
Dateityp: exe metaballsdemo_nonvcl_121.exe (54,0 KB, 113x aufgerufen)
Dateityp: zip metaballsdemovcl_v2.exe_source_131.zip (315,0 KB, 77x aufgerufen)
Meine Software-Projekte - Homepage - Grüße vom Rüsselmops -Mops Mopser
 
Benutzerbild von Valle
Valle
 
#2
  Alt 26. Apr 2010, 05:35
Hi!

Coole Animation, sehr interessant was man so aus Canvas rausholen kann. (Zumindest wenn du noch Canvas verwendest, wie du es im verlinkten Thread getan hast) Sieht wirklich klasse aus! Btw: "Autor" schreibt man "author" im Englischen - und klein in dem Kontext.

Liebe Grüße,
Valle *gäähhn*
Valentin Voigt
  Mit Zitat antworten Zitat
Benutzerbild von lbccaleb
lbccaleb

 
Delphi 7 Enterprise
 
#3
  Alt 26. Apr 2010, 06:14
Zitat von Valle:
Btw: "Autor" schreibt man "author" im Englischen - und klein in dem Kontext.
Wenn wir schon bei Rechtchreibfehler sind, dann solltest vllt. "witeout" in "without" umändern


Aber schicker About dialog....
Martin
  Mit Zitat antworten Zitat
TUX_der_Pinguin

 
Delphi 10.4 Sydney
 
#4
  Alt 26. Apr 2010, 07:20
Hi,

ich wollte mir gerade mal dein Projekt ansehen und dazu wollte ich die Anhänge herunterladen, bei der Datei
"MetaballsDemo nonVCL.exe" hat mein Viren Scanner angeschlagen folgendes wurde gemeldet.

http://www2.spackenz.de/~schwabbel/download/GDATA.JPG

www.virustotal.com Ergebnis

Ich vermute mal es liegt eine Falschmeldung vor, aber sicher ist sicher. Bei der 2. Datei wird nichts gemeldet.

mfg

TUX
Miniaturansicht angehängter Grafiken
gdata_795.jpg  
  Mit Zitat antworten Zitat
Benutzerbild von Matze
Matze

 
Turbo Delphi für Win32
 
#5
  Alt 26. Apr 2010, 07:54
Irgendwie fasziniert mich das Dingens.

Edit: Hier gibt's das ganze übrigens auch in einer 3D-Version (Delphi + OpenGL)
  Mit Zitat antworten Zitat
Benutzerbild von turboPASCAL
turboPASCAL

 
Delphi 6 Personal
 
#6
  Alt 26. Apr 2010, 16:22
@Valle, lbccaleb
ja, alles Schlechtschreibungsfehler...

@TUX_der_Pinguin,
GData meldet einen Verdacht der aber nicht Wahr ist.
Das liegt am Aufbau der nonVCL-Exe.

Die "Animation" läuft über Bitmaps und Canvas, bzw. direktem Zugriff auf den Pointer der
Bitmappixel.

Per Opengl wollt ich es nicht machen. Wo wäre denn dann der Spass geblieben...

@DP,
Zitat:
Allgemeiner Fehler
Ran into problems sending Mail. Response: 535 5.7.0 Error: authentication failed
Huch, authentication failed ?
Matti
  Mit Zitat antworten Zitat
Benutzerbild von lbccaleb
lbccaleb

 
Delphi 7 Enterprise
 
#7
  Alt 26. Apr 2010, 17:47
Ahh, das ja alles Nebensache, Hauptsache ist doch, dass die Metaballs gut aussehen, und das tun Sie. Für mich könnten Sie nur noch nen bissel schneller sein.
Martin
  Mit Zitat antworten Zitat
Dracoon
 
#8
  Alt 7. Mai 2010, 22:29
Danke dir " turboPASCAL " =)

@lbccaleb kannst du bei zeile 89 anpassen.

Delphi-Quellcode:
{Richtung * Geschwindigkeit}
FMetaball[i].vx := (Random(2) * 2 - 1) + (Random * 0.5 + 0.5);
FMetaball[i].vy := (Random(2) * 2 - 1) + (Random * 0.5 + 0.5);
und bei zeile 196, kannst du einstellen wie nah die metaballs an den rand des fensters kommen.
Delphi-Quellcode:
procedure TForm1.TimerMetaballTimer(Sender: TObject);
const
  bx = 80;
  by = 40;
var
  i: Integer;
gibts da die möglichkeit die metaballs auch in größe und farbe anzupassen? für ein about window sind die 3 doch recht groß
farbe z.b über einen timer der alle paar sekunden selbst wechselt.
  Mit Zitat antworten Zitat
blackfin
 
#9
  Alt 7. Mai 2010, 23:38
Das ist ja mal der Hammer!

Echt cooles Teil! Und die Musik ist auch toll!

Hut ab!
  Mit Zitat antworten Zitat
Dracoon
 
#10
  Alt 16. Mai 2010, 11:29
ein prob hab ich damit aber noch.
da ich das als aboutwindow mit einbinden möchte,
sollte der text und die animation auch erst dann starten wenn das about fenster aufgerufen wird.

aber der text und die animation laufen im hintergrund mit sobald du das programm startest.
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 1 von 2  1 2   

Themen-Optionen Thema durchsuchen
Thema durchsuchen:

Erweiterte Suche
Ansicht

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