Display network type in tooltip over server status panel. See http://…

…www.heidisql.com/forum.php?t=21556
HeidiSQL · Jun 9, 2016 · 67a30de · 67a30de
1 parent 45d74f2
commit 67a30de
Showing 1 changed file with 3 additions and 1 deletion.
diff --git a/source/dbconnection.pas b/source/dbconnection.pas
@@ -4738,8 +4738,10 @@ function TDBConnection.ConnectionInfo: TStringList;
 begin
   Log(lcDebug, 'Get connection details ...');
   Result := TStringList.Create;
-  if Assigned(Parameters) then
+  if Assigned(Parameters) then begin
     Result.Values[_('Host')] := Parameters.Hostname;
+    Result.Values[_('Network type')] := Parameters.NetTypeName(Parameters.NetType, True);
+  end;
   Ping(False);
   Result.Values[_('Connected')] := EvalBool(FActive);
   if FActive then begin