Service & on Execute

[Bummi]

Du hast etliche Möglichkeiten, was gefällt Dir den nicht an dem Beispiel von Rollstuhlfahrer?

[value is NULL]

Nun ja soweit ich das probiert habe komme ich mit sleep nicht weiter. Ich muss praktisch ein sleep von 5 Minuten einbauen dh der dienst ist ja zu diesem Zeitpunkt, also wenn er sich im sleep befindet, nicht zu bedienen besser gesagt nicht zu stoppen.

Die timer variante dürfte anscheinend die beste sein nur fehlt mir hierzu das Verständnis! Schliesslich muss ich den timer ja in der on execute procedure abfragen und das verstehe ich nicht ganz.

Nur mal damit ich das verstehe:
• timer := ttimer.create(Nil)
• Timer.enanled := TRUE
• und die Milisekunden
Muss ich in der on Start procedure einbauen

Beim on execute muss ich dann bei
While not terminated das on time einbauen und dann in eine von mir definierte procedure übergehen oder?!

Wäre die Möglichkeit welche ich oben beschrieben habe nicht auch möglich oder belaste ich den CPU zu sehr wenn ich im on execute Event meine startzeit variable permanent mit der aktuellen zeit vergleiche?!

Lg

[DeddyH]

Nimm doch einfach eine globale Variable oder besser ein privates Feld Deines Dienstes und zähle es hoch. Du kannst dann sowohl aus dem Timer-Event als auch aus der Execute-Methode darauf zugreifen. Genau so wurde das in den Beispielen auch gemacht. Wo hapert es denn noch?

[value is NULL]

OMG jetzt kapier ich's, dh das zu machende wird dann in der procedure zb timer1time also die, die angelegt wird wenn ich doppelt drauf klicke.

Das heisst im on execute steht eigentlich nur timer.ontime := angelegte pricedure??!!

Bitte sag das ich's kapiert habe

[DeddyH]

Wenn Du das per Objektinspektor machst, ist die Methode bereits dem Event zugewiesen. Eine händische Zuweisung ist normalerweise nur dann nötig, wenn man die Komponente erst zur Laufzeit erzeugt oder Methoden dynamisch (d.h. situationsabhängig) zuweisen möchte.

[generic]

Timer & Dienst keine gute Idee.
Wie wäre es mit Thread-Synchronistationstechniken.

z.B. mit waitevent und einen Timeout?
Bei beenden des Dienstes wird das Event geschickt, ansonsten lässt du das warten einfach in das Timeout laufen.
So kann der Thread/Service sofort beendet werden oder er läuft einfach weiter.

[value is NULL]

@alfold

Unbeholfen bin ich nur in den dingen die ich noch nie gemacht habe! Ich habe ja vorhin gesagt das ich mir eigentlich das ganze selbst beibringe. Bis dato habe ich Konsolen apps gebastelt und viel mit XML und Datenbanken zu tun gehabt das geht schon ziemlich easy! Einen dienst habe ich bis dato noch nie erstellt, gut wenn das die Aufgabenstellung gewesen wäre dann hätte ich keinen thread eröffnen müssen den das schaffe ich auch so aber das das mit dem timer brauchte ich noch nie! Wenn ich soetwas ähnliches gebraucht habe, habe ich mir immer die aktuelle zeit ausgelesen, 5 Minuten adiert, und in einer while schleife die aktuelle zeit verglichen. ABER wenn ich das bei einem Service mache geht mir die Maschine in die knie!

Deswegen kommt es euch vielleicht so vor als ob ich euch nerven möchte aber ich Hab Delphi weser gelernt noch sonst was

Tut mir leid falls ich Unruhe in dieses Forum bringe

[alfold]

Zitat von value is NULL:

...Tut mir leid falls ich Unruhe in dieses Forum bringe

ne ist es ja nicht
Nur wenn ich lese was Du schon alles gemacht hast(Programiert hast) und dann stollperst du über einen simplen Timer, den man nur draufpacken muss und doppelcklick dadrauf schon steht die Procedure, den rest da rein schreiben fertig. Dies haben die meisten Komponenten so ansich, mh...

Egal, nun weist Du ja wie man es macht

Gruss alfold

[Bummi]

Du musst gar nichts machen, hast Du Dir das Beispiel mal angeschaut, es ausprobiert?
Einfacher geht es kaum.
Der Timer liegt auf dem "Form"
Über Intervall im Objektinspektor legst Du die Millisekunden fest, nach denen der Timer selbsttätig die Methode aufruft die Du im Objektinspektor unter Ereignisse/OnTimer siehst.

Wenn Du einen neuen Timer drauflegst auf
Ereignisse/OnTimer doppelklicken und Du bist in der Quelltextansicht der neu erstellten Methode.

Hier schreibst Du das rein was jedesmal nach Ablauf des Timerintervalls passieren soll.....

[alfold]

@value is NULL : irgendwas macht mich stutzig
Habe mir mal ein paar anderen Post von Dir angschaut.
Also so unbeholfen kannst Du ja nicht sein, das Du nicht mit dieser simplen Aufgabe klar kommst. Oder wie soll man sonst dieses vertsehen 'Du weist nicht wie ein timer funct/ wo soll ich was hinschreiben' etc.

Hast du dafür ne Erklärung?