Skip to content

Commit

Permalink
Browse files Browse the repository at this point in the history
  • Loading branch information
XusinboyBekchanov committed Mar 18, 2022
2 parents 285152b + 60810e4 commit d963a5e
Showing 1 changed file with 2 additions and 1 deletion.
3 changes: 2 additions & 1 deletion src/TabWindow.bas
Original file line number Diff line number Diff line change
Expand Up @@ -1350,11 +1350,12 @@ End Sub

Sub DesignerChangeSelection(ByRef Sender As Designer, Ctrl As Any Ptr, iLeft As Integer = -1, iTop As Integer = -1, iWidth As Integer = -1, iHeight As Integer = -1)
Static SelectedCtrl As Any Ptr
Static SelectedCount As Integer
If Ctrl = 0 Then Exit Sub
Dim tb As TabWindow Ptr = Cast(TabWindow Ptr, pTabCode->SelectedTab)
If tb = 0 Then Exit Sub
If tb->Des = 0 Then Exit Sub
If SelectedCtrl = Ctrl AndAlso tb->cboClass.ItemIndex <> 0 AndAlso lvProperties.Nodes.Count <> 0 Then Exit Sub
If SelectedCtrl = Ctrl AndAlso SelectedCount = Sender.SelectedControls.Count AndAlso tb->cboClass.ItemIndex <> 0 AndAlso lvProperties.Nodes.Count <> 0 Then Exit Sub
'tb->Des->SelectedControl = Ctrl
SelectedCtrl = Ctrl
bNotFunctionChange = True
Expand Down

0 comments on commit d963a5e

Please sign in to comment.