-
Forum: Programmieren allgemein
by stahli,
19. Jun 2010
1) Form und Taskar ausblenden
Ok, dafür reicht (unter Win7) offenbar ein Eintrag im Projektquelltext:
Application.Initialize;
Application.MainFormOnTaskbar := True;
Application.CreateForm(TFormXYZ, FormXYZ);
Application.ShowMainForm := False; // <---
Application.Run;
2) ShowMessage
-
Forum: Programmieren allgemein
by stahli,
19. Jun 2010
Ok, ich habe es jetzt doch mit einer normalen Anwendung gelöst, die nur in den Prozessen zu sehen ist.
Caption der MainForm habe ich auf '' gesetzt. Die Anwendung wird im Autostart-Ordner aufgenommen.
OnCreate der MainForm sieht folgendermaßen aus:
procedure TFormJC.FormCreate(Sender: TObject);
var
BreakFlag: Boolean;
begin
BreakFlag := False;
-
Forum: Programmieren allgemein
by stahli,
19. Jun 2010
Aha!
Ich habe die units SysUtils und Dialogs entfernt und alle ShowMessage und Beeps.
Jetzt lässt sich der Service starten, wobei ich halt keine "Einblicke" habe.
Jetzt muss ich noch einen zyklischen Website-Abruf regeln:
- Internet-Komponente (muss ich mich damit beschäftigen)
- Pausen (sollte sicher Sleep in der Schleife reichen)
und vor allem:
- eine AUSGABE, wenn die Website einen...
-
Forum: Programmieren allgemein
by stahli,
19. Jun 2010
ShowMessage funktioniert beim Installieren und Deinstallieren.
Zur Dienst-Laufzeit habe ich testweise nur einen Beep verwendent. Ich werde mal noch ohne den Beep testen, ob der Dienst dann gestartet werden kann (der Dienst heisst übrigens "ServiceJ").
Wie kann man denn dann Nachrichten ausgeben? Dienste blenden ja unter Vista/Win7 immer kleine Fenster über der Symbolleiste ein.
-
Forum: Programmieren allgemein
by stahli,
18. Jun 2010
Ich komme einfach nicht weiter und lade mal eine kleine j.exe hoch.
Vielleicht kann es ja mal jemand testen, das als Service zu installieren und zu starten.
Die Installation wird mit Nachrichten porotokolliert und beim starten und ausführen sollten beep erzeugt werden, der Dienst lässt sich aber bei mir nicht starten.
Der komplette Quelltext:
unit sj;
interface
uses
-
Forum: Programmieren allgemein
by stahli,
16. Jun 2010
@SirThornberry: Ich nutze Win7 und für die Ausgabe ShowMessage. Während der Installation/Deinstallation funktionieren die Nachrichten. Ob ShowMessage in der OnStart-Behandlung stört, kann ich heute Abend mal testen.
@Bummi: Sollte denn meine Anforderung "zyklischer Beep" nun eigentlich mit einem nackigen TService, der von Hand installiert und gestartet wird möglich sein oder nicht?
Du hast...
-
Forum: Programmieren allgemein
by stahli,
15. Jun 2010
Beim Starten des Dienstes gibt es eine Progressbar und nach ein paar Sekunden erscheint die Fehlernachricht:
"Der Dienst xy auf LokalerComputer konnte nicht gestartet werden.
Fehler 1053: Der Dienst antwortete nicht rechtzeitig auf die Start- oder Steuerungsanforderung."
Die OnStart-Behandlung wird offenbar nicht ausgeführt, da ich meine dort auszugebende Message nicht erhalte.
-
Forum: Programmieren allgemein
by stahli,
15. Jun 2010
Das mit dem Timer stimmt. Der war in der "Form" zur Designzeit aktiviert.
Ich habe dann einen Test ohne Timer versucht und in den Ereignissen Nachrichten ausgegeben (habe ich weiter oben aufgeführt).
OnInstall usw werden durchgeführt.
In der Systemüberwachung/Dienste starte ich dann den Service, was nach einer Weile mit einer Fehlermeldung abbricht.
OnExecute wird nicht erreicht.
-
Forum: Programmieren allgemein
by stahli,
15. Jun 2010
Ja klar, muss man sich beschäftigen. Aber man sollte immer den günstigsten/einfachsten Weg wählen.
Ich verstehe das immer noch so, dass für diese Zwecke EIGENTLICH der TService vorgesehen ist und dass die MainSchleife in der OnExecute-Behandlung läuft.
Entsprechende Beispiele habe ich im Netz gefunden, bei mir funktioniert das aber nicht.
Verstehe ich das völlig falsch? Kann das gar nicht...
-
Forum: Programmieren allgemein
by stahli,
14. Jun 2010
Hmm, das wird mir zu kompliziert. Das Tut ist ja auch aus 2001.
Soll es nicht möglich sein, so einen einfachen "Dienst" (z.B. Beep jede Minute) mit D2009 und dem TService unter Windows7 komfortabel zu realisieren?
Das kann ich mir eigentlich nicht vorstellen...
-
Forum: Programmieren allgemein
by stahli,
13. Jun 2010
Ich habe jetzt noch einmal einen neuen Service erstellt, aber bekomme das auch nicht hin.
In den Service-Ereignissen lasse ich mir Nachrichten ausgeben:
* Beim Installieren: create, beforeinstall, afterinstall, "wurde installiert", destroy
* Starten des Dienstes bricht nach einigen Sekunden mit einer Fehlermeldung ab (Dienst antwortet nicht rechtzeitig)
(Das Ereignis Execute wird gar...
-
Forum: Programmieren allgemein
by stahli,
13. Jun 2010
Ja klar, aber mir geht es auch um´s Prinzip.
Es sollte doch gehen, einen solchen Dienst zu realisieren - und das möchte ich mal testen.
Vielleicht können ja auch andere mal von dem Thread profitieren.
-
Forum: Programmieren allgemein
by stahli,
13. Jun 2010
Ich komme noch nicht klar damit und finde auch im Netz sehr Widersprüchliches :-(
Vielleicht können wir das ja mal hier Stück für Stück nachvollziehbar aufarbeiten:
unit sju;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, SvcMgr, Dialogs,
ExtCtrls;
-
Forum: Programmieren allgemein
by stahli,
12. Jun 2010
Ok, danke erst mal für die Hilfen.
Momentan kriege ich wohl nicht mal das googeln richtig hin ;-(
Ich werde mal ein bischen testen...
-
Forum: Programmieren allgemein
by stahli,
12. Jun 2010
Es sollte halt unauffällig im Hintergrund laufen und vor allem wollte ich mich mit dem Thema einmal beschäftigen.
Ich dachte, das wäre gut lösbar, ich habe nur eben keinen Ansatz gefunden, wie...
Ich habe mal testweise eine "Service-Anwendung" erstellt, die jede Sekunde einen Beep erzeugt, weiß aber schon nicht, ob das der richtige Weg ist und wie man diesen "Dienst" im Windows automatisch im...
-
Forum: Programmieren allgemein
by stahli,
12. Jun 2010
Gibt es ein Tutorial, wie man so einen Windowsdienst erstellt und automatisch starten lässt? Ich finde keinen Einstieg dazu.
-
Forum: Programmieren allgemein
by stahli,
12. Jun 2010
Hallo zusammen,
ich möchte täglich/stündlich eine php-WebSite abrufen und auf einen bestimmten Inhalt (enthaltenen Text) prüfen.
Mit einem Formular und WebBrowser könnte ich das lösen.
Ich möchte das aber gern mit einemm Dienst im Hintergrund realisieren, finde aber passenden Informationen.
Die Fragen sind:
Wie kann ich solch einen Dienst erstellen und automatisch täglich starten?
Wie...