Autor Beitrag
Socci
Hält's aus hier
Beiträge: 5



BeitragVerfasst: Do 31.05.07 15:45 
[highlight]Hallo zusammen!

Ich habe zur Zeit ein Projekt an dem ich arbeite und muss den Teil, für den ich zuständig bin in 2 wochen fertig bekommen. Und ich bin keine gute Programmiererin=)

Ich hoffe ihr könnt mir helfen!

Also.. wir progammieren ein Spiel..so eine art Rungame. Zwei spieler rennen um die Wette bis ans Ziel und es soll sich ein Fenster öffnen in dem die zeit drinne steht. Und ich bin für die Zeitausgabe zuständig. Bloß ich weis nicht wo ich anfangen soll. Könnt ihr mir helfen eine einfache digitale uhr zu erstellen die für das Programm geeigenet ist?

Wäre echt nett!

Liebe Grüße,

Socci
ZeitGeist87
ontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic star
Beiträge: 1593
Erhaltene Danke: 20

Win95-Win10
Delphi 10 Seattle, Rad Studio 2007, Delphi 7 Prof., C++, WSH, Turbo Pascal, PHP, Delphi X2
BeitragVerfasst: Do 31.05.07 15:51 
Hallo und willkommen!

Alles was du brauchst sind 2 Variablen:

ausblenden Delphi-Quelltext
1:
var startzeit, endzeit: TDateTime;					


Startzeit jetzt du, sobald sie loslaufen und Endzeit, sobald sie im Ziel sind.

und über

ausblenden Delphi-Quelltext
1:
formatdatetime('hh:nn:ss:zzz', endzeit - startzeit);					


kannst du ausgeben, wie viele Stunden, Minuten, Sekunden und Millisekunden sie benötigt haben (Zumindest ein davon).

Hast du mehrer Spieler, würd sich ein dyn. Array eignen.

Nähere dazu findest du im Forum :)

Hoffe dir einen kleinen Denkanstoss gegeben zu haben.

LG
Stefan

_________________
Wer Provokationen, Ironie, Sarkasmus oder Zynismus herauslesen kann soll sie ignorieren um den Inhalt meiner Beiträge ungetrübt erfassen zu können.
Socci Threadstarter
Hält's aus hier
Beiträge: 5



BeitragVerfasst: Do 31.05.07 15:55 
Titel: Digitale Uhr
Ok vielen Dank :D
Das ging ja schnell! dann werd ich mal gleich los proggen^^

Danke nochmal!
Jakob_Ullmann
ontopic starontopic starontopic starontopic starontopic starontopic starofftopic starofftopic star
Beiträge: 1747
Erhaltene Danke: 15

Win 7, *Ubuntu GNU/Linux*
*Anjuta* (C, C++, Python), Geany (Vala), Lazarus (Pascal), Eclipse (Java)
BeitragVerfasst: Do 31.05.07 16:05 
Oder du nimmst ein [/delphi]Label.
Da schreibst du drauf '00:00:00'.
Dann definierst du die Variablen:
ausblenden Delphi-Quelltext
1:
var m,s,ms: Integer;					

In TForm1.FormCreate(Sender: TObjet); schreibst du:
ausblenden Delphi-Quelltext
1:
2:
3:
m := 0;
s := 0;
ms := 0;

Nimm nen Timer mit dem der Einstellung Intervall := 100;
In dessen Ereignis OnTimer schreibst du:
ausblenden Delphi-Quelltext
1:
2:
inc(ms);
Label1.Caption := IntToStr(m)+':'+IntToStr(s)+':'+IntToStr(ms);


Nimm noch einen mit Intervall := 1000;
On Timer: inc(s);

Und noch einen mit Intervall := 60000;
On Timer: inc(m);

Bei Label1.Font.Name würde ich dann "Quarz" oder "LCD" nehmen. - Sind aber nicht auf allen Systemen - "System" wäre auch passend.
Socci Threadstarter
Hält's aus hier
Beiträge: 5



BeitragVerfasst: Do 31.05.07 16:08 
Ach ich hatte noch etwas vergessen. kann man in delphi die Zeit grafisch anders darstellen? damit meine ich formatierung.

Vielleicht kann man ein Image benutzen, dass dann die Funktion einer Uhr bekommt.

wie würdet ihr das machen?

Grüße,

Socci
Marc.
ontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic star
Beiträge: 1876
Erhaltene Danke: 129

Win 8.1, Xubuntu 15.10

BeitragVerfasst: Do 31.05.07 16:11 
Eine analoge oder digitale Uhr?
Socci Threadstarter
Hält's aus hier
Beiträge: 5



BeitragVerfasst: Do 31.05.07 16:16 
Eine digitale. Was wäre denn einfacher?
Jakob_Ullmann
ontopic starontopic starontopic starontopic starontopic starontopic starofftopic starofftopic star
Beiträge: 1747
Erhaltene Danke: 15

Win 7, *Ubuntu GNU/Linux*
*Anjuta* (C, C++, Python), Geany (Vala), Lazarus (Pascal), Eclipse (Java)
BeitragVerfasst: Do 31.05.07 16:31 
Digital ist einfacher.

Ich hatte vergessen, bei dem 1000-er Timer den ms-Wert auf 0 zu setzen.

Aber wenn du TChart hast - das kann neuerdings(oder nicht) eine analoge Uhr darstellen.

Oder - ganz tricky - nimm einen TWebbrowser und schreibe:
ausblenden Delphi-Quelltext
1:
Webbrowser1.Navigate('http://88.198.45.22/designs/clock.swf?color=0xFF0000');					

- zu Beginn des Rennens. 0xFF0000 kannst durch 0xFARBE nach dem RGB-Muster verändern.

Sonst kannst du dir eine Seite einrichten, auf die du verweist, mit dem Code im Body-Teil:
<!-- Kopieren //-->
<object
classid="clsid:d27cdb6e-ae6d-11cf-96b8-444553540000"
codebase="fpdownload.macromedi.../flash/swflash.cab#v
ersion=8,0,0,0" width="150" height="150" id="clock"
align="middle">

<param
name="allowScriptAccess" value="sameDomain"
/>

<param name="movie"
value="http://88.198.45.22/designs/clock.swf?color=0xAAAAAA" /><param
name="quality" value="high" /><param name="bgcolor"
value="#000000" /><embed
src="http://88.198.45.22/designs/clock.swf?color=0xDDDDDD"
quality="high" bgcolor="#000000" width="150"
height="150" name="clock" align="middle"
allowScriptAccess="sameDomain" type="application/x-shockwave-flash"
pluginspage="http://www.macromedia.com/go/getflashplayer"
/>

</object>
<!-- Bis hier //-->

Aber das hat jetzt schon nichts mehr mit Delphi zu tun.


Aber die Uhr kann ich nur empfehlen, da das Design auch cool ist.
Socci Threadstarter
Hält's aus hier
Beiträge: 5



BeitragVerfasst: Do 31.05.07 16:35 
ok ich danke euch allen=)

dann wollen wir mal gucken ob ich das hinbekomme^^
Marc.
ontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic star
Beiträge: 1876
Erhaltene Danke: 129

Win 8.1, Xubuntu 15.10

BeitragVerfasst: Do 31.05.07 16:39 
user profile iconJakob_Ullmann hat folgendes geschrieben:
[...]
Oder - ganz tricky - nimm einen TWebbrowser und schreiben
[...]
Aber die Uhr kann ich nur empfehlen, da das Design auch cool ist.

Ja, aber was machst du dann, wenn der User kein Inet hat? :P
Ich würde dir diese Lösung daher nicht empfehlen.
Jakob_Ullmann
ontopic starontopic starontopic starontopic starontopic starontopic starofftopic starofftopic star
Beiträge: 1747
Erhaltene Danke: 15

Win 7, *Ubuntu GNU/Linux*
*Anjuta* (C, C++, Python), Geany (Vala), Lazarus (Pascal), Eclipse (Java)
BeitragVerfasst: Do 31.05.07 16:51 
Dann setzt er den Link auf eine lokale HTML-Datei, die denselben Code enthält. :D
Marc.
ontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic star
Beiträge: 1876
Erhaltene Danke: 129

Win 8.1, Xubuntu 15.10

BeitragVerfasst: Do 31.05.07 17:11 
Ja, wär auch ne Möglichkeit. :)