Forum: Win32/Win64 API (native code)
Delphi
by Jackie1983,
5. Aug 2009
Habe es jetzt so umgestellt das die Sockets per Event die Verbindung steuern. Als Connect und Error.
Wieso hat das nichts in einem Dienst zusuchen?
Gruß
Forum: Win32/Win64 API (native code)
Delphi
by Jackie1983,
3. Aug 2009
Glaube nicht, da ich diese habe.
while GetMessage(Msg, 0, 0, 0) do
DispatchMessage(Msg)
Forum: Win32/Win64 API (native code)
Delphi
by Jackie1983,
3. Aug 2009
Ein Thread mit einem Timer.
Lol ok, dachte jetzt die von Windows. Das sollte ich noch hinbekommen :)
Forum: Win32/Win64 API (native code)
Delphi
by Jackie1983,
3. Aug 2009
Aber wenn der Server nicht erreichbar ist soll der Client es ja wieder versuchen solange bis die Verbindung steht.
Es ist aber ein Timer.
Das ist eigentlich der wichtige Teil, da wo die Verbindung aufgebaut wird.
Weil, wenn die Verbindung aufgebaut wird, so wie es FaTaLGuiLLoTiNe oben geschrieben hat, wollte ich damit die Verbindung komplett schließen so das im System auch nichts...
Forum: Win32/Win64 API (native code)
Delphi
by Jackie1983,
3. Aug 2009
Servus,
diese Meldung kommt erst seit ich meinen Dienst installiert habe.
Der Dienst versucht alle 100ms eine Verbindung zum Server aufzubauen.
Hier mal der Timer.
//Noch Online?
if not fClient.Active then begin
Synchronize(SetClientOnline); //-> fClient.Active := true;