Delphi-PRAXiS
Seite 1 von 3  1 23      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Sekunden an einen Timer übergeben (https://www.delphipraxis.net/28755-sekunden-einen-timer-uebergeben.html)

Tavik 29. Aug 2004 19:02


Sekunden an einen Timer übergeben
 
ich habe eine integer-variable "sekunde" und möchte diese an einen Timer im Format dd:hh:mm:ss
übergeben! leider komme ich mit der timerroutine überhaupt nicht klar und auch das übersetzen ins richtige Format bereitet mir Probleme!

Danke im voraus

Sascha :coder2:

p.s.: wie kann ich das Fenster der Dateneingabe schließen und gleichzeit ein neues Fenster für den Timer aufpoppen lassen?

Sanchez 29. Aug 2004 19:18

Re: Sekunden an einen Timer übergeben
 
Hallo und willkommen in der DP (ich wollte das immer schon mal schreiben :mrgreen:)

Leider verstehe ich deine Frage nicht.
Willst du den Intervall eines Timer setzen? Wenn ja, dann verstehe ich nicht, was du mit dem Format meinst.
Das Datumsformat ist doch nur interessant, wenn du den Wert in einen String umwandelst (oder umgekehrt).

grüße, daniel

alcaeus 29. Aug 2004 19:33

Re: Sekunden an einen Timer übergeben
 
Hi Tavik!

Zitat:

Zitat von Tavik
ich habe eine integer-variable "sekunde" und möchte diese an einen Timer im Format dd:hh:mm:ss übergeben! leider komme ich mit der timerroutine überhaupt nicht klar und auch das übersetzen ins richtige Format bereitet mir Probleme!

Die Interval-Eigenschaft des Timers verlangt eine Zeitangabe in Millisekunden. Ist die Enabled-Eigenschaft des Timers auf True, so wird nach dieser Zeitspanne das OnTimer-Ereignis ausgelöst.


Zitat:

Zitat von Tavik
p.s.: wie kann ich das Fenster der Dateneingabe schließen und gleichzeit ein neues Fenster für den Timer aufpoppen lassen?

:arrow: Neue Frage, neuer Thread :dp:
Und außerdem verstehe ich diese Frage nicht :wiejetzt:

Greetz
alcaeus

glkgereon 29. Aug 2004 19:37

Re: Sekunden an einen Timer übergeben
 
ich glaube folgendes:
du meinst du hast eine art edit oder so wo du die zeit drin anzeigen willst....

an dieses editfeld (den "timer") willst du eine integer-uhrzeit (Tdatetime?) übergeben und anzeige lassen...

so, wenn das soweit richtig war machst du dies:

Delphi-Quellcode:
var
zeit:TDateTime;
begin
zeit:=now;
Edit1.Text:=DateTimetostr(zeit);//der Timer
so, dann die zweite frage: da wo du close; sagst sagst du direkt danach Form_Timer.Show/Showmodal...

so, EDIT:

deine variable hat die sekunden drin, daher:
Delphi-Quellcode:
var
sekunden, minuten, stunden, tage:integer;
begin
minuten:=sekunden div 60;
sekunden:=sekunden mod 60;
stunden:=minuten div 60;
minuten:=minuten mod 60;
tage:=stunden div 24;
stunden:=stunden mod 24;
Edit1.Text:=inttostr(tage)+':'+inttostr(stunden)+':'+inttostr(minuten)+':'+inttostr(sekunden);//der Timer
das mit 01 beim ersten tag und so weiss ich so spontan auch nicht

Tavik 29. Aug 2004 19:51

Re: Sekunden an einen Timer übergeben
 
hallo! ersteinmal danke für die schnellen hilfeversuche...ich werd mal etwas weiter ausholen!

ich habe auf der integervariable sekunde den Wert (s:= 268457) (nur so als beispiel!)

jetzt möchte ich mehrere Schritte abarbeiten (vielleicht gibts aber auch einen Befehl der das alles auf einmal erledigt!)


1. umrechnung in das Format 3Tage, 2Stunden, 34 Minuten, 17 Sekunden
2. übergabe dieses Ausgangswertes an einen Timer
3. Timer starten
4. wie der Timer angezeigt wird (Editbox oder Label) ist egal!



danke für die hilfe
Tavik

p.s.: bin für jede idiotensichere beschreibung/quelltext dankbar*g*

Tavik 29. Aug 2004 19:55

Re: Sekunden an einen Timer übergeben
 
@glkbkk


dein vorschlag hilt mir schon sehr weiter...jetzt soll dieses Edit feld nur noch jede Sekunde runtergezählt werden!

daran scheitert es!

gruss
Tavik

glkgereon 29. Aug 2004 19:59

Re: Sekunden an einen Timer übergeben
 
dazu nimmst du jetzt den richtigen timer...

in der leiste system ist eine kompo timer...
intervall auf 1000 (=1 sek)
die variable sekunde bei jedem timer-ereignis 1 runter und meine procedure wieder machen...

achso, am anfang timer disablen und dann wenn er initialisiert wird enablen

hoffe du kommst damit zurecht

Nikolas 29. Aug 2004 20:00

Re: Sekunden an einen Timer übergeben
 
nimm einen (anderen) Timer, setze das Intervall auf 1000 (ms). Dann schreib in die onTimer-Procedure
Delphi-Quellcode:
dec(sekunden);
// und die ganzen Befehle von glkbkk

Tavik 29. Aug 2004 20:08

Re: Sekunden an einen Timer übergeben
 
ahhhhh!

jungs jungs! ich bin blutiger anfänger!
enablen vor und nachher? nich so fix! ich bin ja willig aber ....

kann jemand die 5 minuten für eine ausführliche erklärung erübrigen?


ich bin euch schon jetzt sehr sehr dankbar....


gute nacht
sasch

Nikolas 29. Aug 2004 20:13

Re: Sekunden an einen Timer übergeben
 
Mit dem Enablen startest du einfach den Timer. Deswegen würde ich vorschlagen, ihn zur Entwicklungszeit auf disabled zu stellen und ihn dann zu starten, sobald was angezeigt werden soll. Das Intervall kannst du auch schon vorher auf 1000 stellen.
So sollte es gehen.


Alle Zeitangaben in WEZ +1. Es ist jetzt 21:52 Uhr.
Seite 1 von 3  1 23      

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz