mirror of
https://github.com/mRemoteNG/mRemoteNG.git
synced 2026-02-25 11:18:37 +08:00
Compare commits
4 Commits
| Author | SHA1 | Date | |
|---|---|---|---|
|
|
fb68ed099e | ||
|
|
01133b3d9f | ||
|
|
52461b758b | ||
|
|
3bc5ceede4 |
@@ -1,4 +1,9 @@
|
||||
1.70 (2013-02-22):
|
||||
1.70 (2013-02-25):
|
||||
Fixed issue MR-332 - Can't select different tab with one click after disconnecting existing tab
|
||||
Fixed issue MR-338 - PuTTYNG crashing on fresh install of mRemoteNG
|
||||
Re-enabled PuTTYNG integration enhancements on Windows 8
|
||||
|
||||
1.70 Release Candidate 1 (2013-02-22):
|
||||
Fixed issue MR-183 - Error trying to save connections when using SQL - Invalid column name _parentConstantId
|
||||
Fixed issue MR-225 - Tabs do not open in a panel until multiple panels are displayed.
|
||||
Fixed issue MR-229 - Integrated PuTTY doesn't work in Windows 8 RP
|
||||
|
||||
Binary file not shown.
BIN
Installer/Dependencies/PuTTYNG.pdb
Normal file
BIN
Installer/Dependencies/PuTTYNG.pdb
Normal file
Binary file not shown.
@@ -266,9 +266,6 @@ Namespace Connection
|
||||
End Function
|
||||
|
||||
Public Shared Function IsFilePuttyNg(file As String) As Boolean
|
||||
' PuTTYNG enhancements are not yet compatible with Windows 8
|
||||
If Environment.OSVersion.Version.CompareTo(New Version(6, 2)) >= 0 Then Return False
|
||||
|
||||
Dim isPuttyNg As Boolean
|
||||
Try
|
||||
isPuttyNg = FileVersionInfo.GetVersionInfo(file).InternalName.Contains("PuTTYNG")
|
||||
|
||||
@@ -276,6 +276,7 @@ Namespace UI
|
||||
End If
|
||||
|
||||
nTab.Selected = True
|
||||
_ignoreChangeSelectedTabClick = False
|
||||
|
||||
Return nTab
|
||||
Catch ex As Exception
|
||||
@@ -762,6 +763,7 @@ Namespace UI
|
||||
Dim IC As mRemoteNG.Connection.InterfaceControl = Me.TabController.SelectedTab.Tag
|
||||
|
||||
App.Runtime.OpenConnection(IC.Info, mRemoteNG.Connection.Info.Force.DoNotJump)
|
||||
_ignoreChangeSelectedTabClick = False
|
||||
End If
|
||||
End If
|
||||
Catch ex As Exception
|
||||
@@ -822,6 +824,7 @@ Namespace UI
|
||||
Else
|
||||
Try
|
||||
Me.TabController.TabPages.Remove(TabToBeClosed)
|
||||
_ignoreChangeSelectedTabClick = False
|
||||
Catch comEx As System.Runtime.InteropServices.COMException
|
||||
CloseTab(TabToBeClosed)
|
||||
Catch ex As Exception
|
||||
@@ -834,23 +837,25 @@ Namespace UI
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private _selectedTabChanged As Boolean = False
|
||||
Private _ignoreChangeSelectedTabClick As Boolean = False
|
||||
Private Sub TabController_SelectionChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles TabController.SelectionChanged
|
||||
_selectedTabChanged = True
|
||||
_ignoreChangeSelectedTabClick = True
|
||||
FocusIC()
|
||||
RefreshIC()
|
||||
End Sub
|
||||
|
||||
Private Sub TabController_MouseUp(ByVal sender As Object, ByVal e As MouseEventArgs) Handles TabController.MouseUp
|
||||
Debug.Print("TabController_MouseUp()")
|
||||
Debug.Print("_ignoreChangeSelectedTabClick = {0}", _ignoreChangeSelectedTabClick)
|
||||
Try
|
||||
If Not Native.GetForegroundWindow() = frmMain.Handle And Not _selectedTabChanged Then
|
||||
If Not Native.GetForegroundWindow() = frmMain.Handle And Not _ignoreChangeSelectedTabClick Then
|
||||
Dim clickedTab As Magic.Controls.TabPage = TabController.TabPageFromPoint(e.Location)
|
||||
If clickedTab IsNot Nothing And TabController.SelectedTab IsNot clickedTab Then
|
||||
Native.SetForegroundWindow(Handle)
|
||||
TabController.SelectedTab = clickedTab
|
||||
End If
|
||||
End If
|
||||
_selectedTabChanged = False
|
||||
_ignoreChangeSelectedTabClick = False
|
||||
|
||||
Select Case e.Button
|
||||
Case MouseButtons.Left
|
||||
|
||||
Reference in New Issue
Block a user