Be sure the telescope can send coordinates

pchev · Mar 3, 2019 · dd9d752 · dd9d752
1 parent d40624b
commit dd9d752
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/skychart/pu_indiclient.lfm b/skychart/pu_indiclient.lfm
@@ -278,7 +278,7 @@ object pop_indi: Tpop_indi
   end
   object InitTimer: TTimer
     Enabled = False
-    Interval = 30000
+    Interval = 20000
     OnTimer = InitTimerTimer
     left = 232
   end

diff --git a/skychart/pu_indiclient.pas b/skychart/pu_indiclient.pas
@@ -803,7 +803,7 @@ procedure Tpop_indi.InitTimerTimer(Sender: TObject);
   ok: boolean;
 begin
   InitTimer.Enabled := False;
-  if TelescopeDevice = nil then
+  if (TelescopeDevice = nil) or (coord_prop = nil) then
   begin
     ScopeDisconnect(ok);
     if csc.IndiAutostart then