Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Procedure zur Abrage ob InterbaseServer läuft... (https://www.delphipraxis.net/109046-procedure-zur-abrage-ob-interbaseserver-laeuft.html)

daredd 23. Feb 2008 11:59


Procedure zur Abrage ob InterbaseServer läuft...
 
Guten Morgen Leute! :lol:

Ich habe mal wieder eine Frage, mein Programm arbeitet ja mit gdbs zusammen also Datenbanken. Nun beim Start des Programms werden die Daten banken über den InterbaseServer geladen.

Wenn ich nun aber den rechner gerade erst hochgefahren habe kommt beim Laden der Datenbanken eine Fehlermeldung, dass das Programm er die Datenbank nicht finden/öffnen kann. Das kommt daher das der Computer zu lahm ist und den InterbaseServer noch nicht als Dienst gestartet hat, weil wenn ich 1-2 Minuten warte (nach dem Hochfahren) gehts das Programm gleich beim ersten mal auf.

Nun wollte ich in meiner Source an der Stelle wo das Programm die Datenbanken lädt, eine while-Schleife einbauen. Die erst dann die Datenbank lädt wenn der InterbaseServer gestartet ist. Sonst kommt diese bekloppte Fehlermeldung und man muss das Programm noch mal neustarten.

Meine Frage ist, kennt einer von euch eine Procedure zur Abfrage ob der InterbaseServer schon gestartet ist?????



Greetz
DaRedd

Jelly 23. Feb 2008 12:04

Re: Procedure zur Abrage ob InterbaseServer läuft...
 
Mal zum besseren Verständnis: Dein Programm lädt keine Datenbank, sondern du verbindest dich lediglich zu einem DB server, der dir die gewünschten Daten auf ein Request hin liefert.

Wie verbindest du zur DB. Über localhost? Der Dienst sollte eigentlich gestartet sein, lange bevor du dich überhaupt am Rechner anmelden kannst. Du hast wonöglich eher ein Netzproblem, dass eine Adresse nicht sofort aufgelöst werden kann.

mkinzler 23. Feb 2008 12:15

Re: Procedure zur Abrage ob InterbaseServer läuft...
 
Läuft der IB-Server wirklich als Dienst?
Du könntest auf einen direkten Connect auf den Port (3050) warten.

daredd 23. Feb 2008 12:51

Re: Procedure zur Abrage ob InterbaseServer läuft...
 
Ja der InterbaseServer läuft als dienst. Und ich ferbinde mich über Remote unter der IP-Adresse 127.0.0.1:C:\Programme...

Aber woran kann das sonst liegen. Wenn ich nach dem Hochfahren auf dem Desktop bin und gleich ohne zu warten das Programm starte verbindet er sich nicht. Wenn ich aber 1 min. Warte und dann das Programm öffne verbindet er sich sofort.
Ausser dem ist der Benutzer mit dem ich Hochfahre nicht Admin.

daredd 23. Feb 2008 13:36

Re: Procedure zur Abrage ob InterbaseServer läuft...
 
Also man muss ja Irgendwie ein Dienst abfragen können. Wie macht man sowas? Über die PID ist sinnlos weil jeder Rechner legt seine eigenen PIDs für die Dienste zu, oder? Man muss das irgendwie über den Dienstnamen hinbekommen.


Alle Zeitangaben in WEZ +1. Es ist jetzt 17:37 Uhr.

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