AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Projekte Aktueller Sternhimmel

Aktueller Sternhimmel

Ein Thema von Mathematiker · begonnen am 15. Mär 2013 · letzter Beitrag vom 19. Mär 2013
Antwort Antwort
Seite 3 von 4     123 4   
Mathematiker
Hallo,

bisher war ich ausschließlich bei der "Konkurrenz" unterwegs, möchte aber nun auch hier ab und an etwas beitragen. Als erstes stelle ich mein Lieblingsprogramm vor.

Nach dem Programmstart wird der Sternhimmel für die aktuelle Zeit und den gewählten Beobachtungsort gezeichnet. Der Beobachtungsort kann rechts oben in einer Combobox gewählt werden. Ist Euer eigener Ort nicht enthalten, wählt bitte einen aus der Nähe. Datum und Uhrzeit können auch in aufklappbaren Listen eingestellt werden.

Gezeichnet werden die rund 1500 Sterne, die bei normalen Bedingungen, trotz Umweltverschmutzung, mit bloßem Auge zu sehen sind. Die Farbe gibt dabei deren Spektralklasse an.

Zusätzlich berechnet das Programm die aktuellen Ephemeriden (Orte) der Planeten, der Sonne und des Mondes. Weitere Darstellungsoptionen, z.B. Himmelsrichtung, Namen der hellsten Sterne, Sternbildbezeichnungen und deren Hilfslinien usw., können auch ausgewählt werden.

Besonders wichtig ist die Simulation (F2 oder Schalter). Dabei wird die Zeit kontinuierlich verändert und man sieht die Himmelskörper aufgehen, kulminieren und im Westen wieder untergehen. Die Geschwindigkeit kann in der linken Combobox geregelt werden.

Weitere Einstellungen sind:
1.Sterne können auch in Weiß gezeichnet werden.
2.Eine beliebige Himmelsrichtung (Azimut) kann eingestellt werden.
3.Ein Klick auf einen dargestellten Stern gibt für diesen Zusatzinformationen.
4.Sternbildgrenzen, Himmelsäquator und Tierkreiszeichen können dargestellt werden.
5.Die Lage der Galileischen Jupitermonde kann angezeigt werden.
6.Zusätzlich mit Ephemeridentabelle der Planeten.
7.Für den Mond und die Sonne werden zusätzliche Informationen angegeben, auch mit Mondphasenkalender.
8.Die Planetenbahnen und die Lage der Planeten werden in "Draufsicht" angezeigt.
9.Die aktuelle Venusphase, mit scheinbarem Durchmesser und Helligkeit kann ebenfalls angezeigt werden, außerdem die Darstellung der Tag- und Nachtgrenze auf der Erde.

Vielleicht gefällt das Programm ja dem einen oder anderen.

Beste Grüße
Mathematiker

Rev 1: Azimut kann mit der Maus schnell verändert werden.
Rev 2: Alle Einstellungen werden in einer ini-Datei gespeichert.
Rev 3: kleine Darstellungsfehler behoben.
Rev 4: bei Klick auf einen Planeten werden Zusatzinformationen angezeigt.
Rev 5: Zusatzinformationen auch bei Klick auf Mond und Sonne. Diverse Fehler entfernt.
Rev 6: Tierkreiszeichen werden beschriftet. Die Zusatzinformationen werden (hoffentlich) immer korrekt angezeigt. Die Ini wird jetzt im Anwenderverzeichnis gespeichert.
Miniaturansicht angehängter Grafiken
sternhimmel.png  
Angehängte Dateien
Dateityp: zip sternhimmel6.zip (720,0 KB, 40x aufgerufen)

Geändert von Mathematiker (19. Mär 2013 um 19:19 Uhr)
 
Mathematiker
 
#21
  Alt 18. Mär 2013, 17:03
Hallo,
Cool wäre noch ne kleine Beschreibung wenn man nen Doppelklick auf die Planten macht...
Dein Wunsch ist mir Befehl.
Bei einem Mausklick auf einen der angezeigten Planeten werden jetzt Zusatzinformationen (physische Eigenschaften, aktuelle Bahndaten und ein Bild) angezeigt.
Es war mehr Arbeit als ich zuerst dachte. Deshalb hat es etwas gedauert.

Beste Grüße
Mathematiker
  Mit Zitat antworten Zitat
Benutzerbild von Davidlocke13
Davidlocke13

 
Delphi 2010 Enterprise
 
#22
  Alt 18. Mär 2013, 17:37
2 Sachen sind mir aufgefallen ! Sag mal deinem Fenstern das sie in der Mitte von deinem Formular erscheinen soll und für Sonne und Mond währe auch cool
David
  Mit Zitat antworten Zitat
Mathematiker
 
#23
  Alt 18. Mär 2013, 17:40
Hallo,
Sag mal deinem Fenstern das sie in der Mitte von deinem Formular erscheinen soll
Gerade das war ja nicht beabsichtigt. Die Zusatzfenster sollten eigentlich unmittelbar neben dem Objekt erscheinen. Wenn es stört, kann ich das natürlich ändern.
und für Sonne und Mond währe auch cool
Wird auch noch, nur nicht mehr heute.

Beste Grüße
Mathematiker
  Mit Zitat antworten Zitat
Benutzerbild von Davidlocke13
Davidlocke13

 
Delphi 2010 Enterprise
 
#24
  Alt 18. Mär 2013, 18:03
Sag mal deinem Fenstern das sie in der Mitte von deinem Formular erscheinen soll
[QUOTE=Mathematiker Gerade das war ja nicht beabsichtigt. Die Zusatzfenster sollten eigentlich unmittelbar neben dem Objekt erscheinen. Wenn es stört, kann ich das natürlich ändern.[/QUOTE]

Ok dann würde ich das neue Fenster aber ohne Rand machen und dafür nen kleinen Schließen Button in die Ecke

form.jpg

Edit: Jetzt nach ein par weiteren Benutzungen muss ich sagen eigentlich ist das auch so recht in Ortung hatte mich nur bei ersten mal irritiert da es so halb aus meinem Bildschirm raus war und dolle hervorgehhoben wirkte!
David

Geändert von Davidlocke13 (18. Mär 2013 um 23:07 Uhr)
  Mit Zitat antworten Zitat
Benutzerbild von Davidlocke13
Davidlocke13

 
Delphi 2010 Enterprise
 
#25
  Alt 18. Mär 2013, 22:44
So ich teste gerade noch was an deinem Programm rum

Mir ist z.B. aufgefallen das bei 100% die Simulation still steht !
Es währe auch schön wenn bei den Tierkreiszeichen beim mit der Maus drüber gehen die Namen angezeigt werden

Beim Anklicken des Saturns tritt folgender Fehler bei mir auf: saturn.jpg

Liebe Grüße
David
  Mit Zitat antworten Zitat
Mathematiker
 
#26
  Alt 18. Mär 2013, 23:00
Hallo,
solche Fehler sind ärgerlich.
Mir ist z.B. aufgefallen das bei 100% die Simulation still steht !
Ist in der Rev 5 behoben.
Beim Anklicken des Saturns tritt folgender Fehler bei mir auf:
Bei mir leider nicht. Ich habe dennoch etwas geändert und hoffe, dass der Fehler behoben ist.
Es währe auch schön wenn bei den Tierkreiszeichen beim mit der Maus drüber gehen die Namen angezeigt werden
Danke für die Idee. Wird aber definitiv erst morgen.

Im Übrigen werden in der Rev 5 auch zusätzliche Informationen zu Sonne und Mond beim Mausklick angezeigt.

Beste Grüße
Mathematiker
  Mit Zitat antworten Zitat
ASM

 
Delphi 7 Enterprise
 
#27
  Alt 18. Mär 2013, 23:40
Ein exzellent ausgearbeitetes Programm! Sehr beeindruckend.

Die Beobachtung
Beim Anklicken des Saturns tritt folgender Fehler bei mir auf:
kann ich übrigens ebenfalls so nicht bestätigen (Release 4).

Mich verwundert nur etwas, dass die INI-Datei im Temp-Folder der "Lokalen Einstellungen" des aktuellen Accounts abgelegt wird, wo sie doch mehr oder weniger häufig (bei mir jedenfalls sehr häufig, nämlich routinemäßig durch eine Reinigung mit ClearProg beim Schließen von Windows) gelöscht werden dürfte. Besser geeignet wäre wohl sicherlich die Ablage entweder im Folder "Anwendungsdaten" (Stichwort: CSIDL_APPDATA) oder aber unmittelbar im Folder "Eigene Dateien" (Stichwort: CSIDL_PERSONAL).
  Mit Zitat antworten Zitat
Benutzerbild von Davidlocke13
Davidlocke13

 
Delphi 2010 Enterprise
 
#28
  Alt 19. Mär 2013, 10:30
Mir ist aufgefallen das beim Mond ein Stück Text abgeschnitten ist

mond.jpg
David
  Mit Zitat antworten Zitat
Benutzerbild von stahli
stahli

 
Delphi 11 Alexandria
 
#29
  Alt 19. Mär 2013, 12:42
Danke für die Idee. Wird aber definitiv erst morgen.
[OT]Du baust ab!? Aber es ist beruhigend, dass Du auch menschlich zu sein scheinst... [/OT]
  Mit Zitat antworten Zitat
Mathematiker
 
#30
  Alt 19. Mär 2013, 13:40
Hallo,
Besser geeignet wäre wohl sicherlich die Ablage entweder im Folder "Anwendungsdaten" (Stichwort: CSIDL_APPDATA) oder aber unmittelbar im Folder "Eigene Dateien" (Stichwort: CSIDL_PERSONAL).
Werde ich mir anschauen. Bisher hab ich solche Einstellungen immer in das temporäre Verzeichnis geschoben, damit ich eben den Rechner nicht "zumülle".
Mir ist aufgefallen das beim Mond ein Stück Text abgeschnitten ist
Muss ich testen. Irgendwie sind die Schriftarten doch nicht gleich breit oder ich habe wieder etwas übersehen.
Du baust ab!? Aber es ist beruhigend, dass Du auch menschlich zu sein scheinst...
Das ist das Alter! Aber ich habe ja noch einen "richtigen" Beruf. Und schlafen muss man ja auch mal.
Die Änderungen werden erst heute abend möglich.

Beste Grüße
Mathematiker

Nachtrag: Das mit dem Mond ist schon geklärt. Das Formular war auf Scaled=True eingestellt. Bei einer anderen Auflösung kann dann Schrift "gezoomt" werden.

Nachtrag 2: Bisher speichere ich die Ini-Datei entweder im Programmverzeichnis (bei Administratorrechten) oder im temporären Verzeichnis mit:
Delphi-Quellcode:
function tempstring:string;
var verzeichnis:string;
procedure backslash(var k:string);
begin
    if k[length(k)]<>'\then k:=k+'\';
end;
begin
  if isadmin then
  begin
    verzeichnis:=extractfilepath(application.exename);
    backslash(verzeichnis);
    tempstring:=verzeichnis;
  end
  else
  begin
    SetLength(Result,MAX_PATH + 1);
    SetLength(Result,GetTempPath(length(Result),@Result[1]));
  end;
end;
Weiß jemand, wie ich die von ASM genannten Ordner mit Delphi 5(!) finden kann?

Geändert von Mathematiker (19. Mär 2013 um 14:18 Uhr)
  Mit Zitat antworten Zitat
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 03:02 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