Delphi-PRAXiS
Seite 3 von 3     123   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Application.CreateForm hängt (https://www.delphipraxis.net/208210-application-createform-haengt.html)

lxo 28. Jun 2021 13:14

AW: Application.CreateForm hängt
 
Ich versteh nur nicht ganz, beim ersten mal dauert das ewig bis er bei FileExists ein Ergebnis liefert, wenn man es nochmal versucht kommt direkt ein Ergebnis. Nach einiger Zeit dauert es wieder lange.
Hat da evtl. noch jemand ein Tipp wie man schnell kontrollieren kann ob der Pfad(Netzwerk) erreichbar ist oder nicht?

TiGü 28. Jun 2021 13:41

AW: Application.CreateForm hängt
 
Zitat:

Zitat von lxo (Beitrag 1491597)
Ich versteh nur nicht ganz, beim ersten mal dauert das ewig bis er bei FileExists ein Ergebnis liefert, wenn man es nochmal versucht kommt direkt ein Ergebnis. Nach einiger Zeit dauert es wieder lange.
Hat da evtl. noch jemand ein Tipp wie man schnell kontrollieren kann ob der Pfad(Netzwerk) erreichbar ist oder nicht?

Da wird wohl das File Caching zuschlagen und darum beim zweiten Mal schneller gehen: https://docs.microsoft.com/en-us/win...o/file-caching

Ansonsten könntest du vielleicht den Server des Netzlaufwerks anpingen.
Also wenn dein Pfad lautet: \\Mein_lustiger_UNC_Root\Mein_Pfad
Dann kannst du
Code:
ping Mein_lustiger_UNC_Root
machen.
Wenn der UNC-Pfad auf einen Laufwerksbuchstaben gemappt ist, dann musst du noch etwas weiter ausholen:
https://superuser.com/questions/1034...ows-10/1034654

stifflersmom 28. Jun 2021 13:49

AW: Application.CreateForm hängt
 
Wenn der Server keine Pings beantworten will, dann bringt das Pingen auf den Server im UNC-Pfad gar nichts...
Von daher kann man auch gleich prüfen, ob eine bestimmte Datei im gemapten Laufwerk existiert und das Ergebnis dann halt nutzen.

jaenicke 28. Jun 2021 21:04

AW: Application.CreateForm hängt
 
In solchen Fällen macht es Sinn das asynchron im Thread zu prüfen, damit der Rest der Anwendung nicht blockiert bzw. am Start gehindert wird.

himitsu 28. Jun 2021 23:25

AW: Application.CreateForm hängt
 
Der einzige Vorteil vom PING:
* dort ist das mit dem Timeout besser/sicherer geregelt ... der direkte Zugriff auf die Freigabe kann schlimm (nie) enden

Nachteil:
* nur weil der PING geht, heißt es nicht, dass die Freigabe auch erreichbar ist
* * nicht da
* * keine Zugriffsrechte
* aber, wie schon gesagt, nur weil der PING nicht geht, heißt es auch nicht, dass die Freigabe weg ist (PING ist ein Service/Dienst und wenn nicht aktiv, dann gibt es keine Antwortauf die PING-Anfrage)

dummzeuch 29. Jun 2021 08:29

AW: Application.CreateForm hängt
 
Zitat:

Zitat von himitsu (Beitrag 1491624)
Der einzige Vorteil vom PING:

Auf neueren Windows ist die Antwort auf Ping standardmäßig abgeschaltet. Da bringt das absolut gar nichts mehr. Wenn ich mich recht erinnere, ist das seit Windows 7 so, kann aber auch schon länger sein.


Alle Zeitangaben in WEZ +1. Es ist jetzt 20:47 Uhr.
Seite 3 von 3     123   

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