Commit caac660a authored by Benoît Minisini's avatar Benoît Minisini
Browse files

Workspace: Activating an unknown window is nw silently ignored.

[GB.FORM.MDI]
* BUG: Workspace: The Add() method now can safely move a window from a workspace to another workspace.
* BUG: Workspace: Activating an unknown window is nw silently ignored.
parent ce788ab5
Pipeline #346773758 passed with stage
in 23 minutes and 38 seconds
[Component]
Key=gb.form.mdi
Version=3.16.0
Version=3.16.90
Authors=Benoît Minisini
Needs=Form
Requires=gb.form,gb.settings
......@@ -2,7 +2,7 @@
Title=Multiple document interface management
Startup=FMain
Icon=.hidden/control/workspace.png
Version=3.16.0
Version=3.16.90
VersionFile=1
Component=gb.image
Component=gb.gui
......
......@@ -83,7 +83,7 @@ Public Sub Add(hWin As Window, Optional bResize As Boolean, Optional iGrid As In
If GetIndex(hWin) >= 0 Then Return
hPrev = GetWorkspace(hWin)
If hPrev Then RemoveWindow(hWin)
If hPrev Then hPrev.Remove(hWin)
If bResize Then
hWin.Reparent(dwgBorder)
......@@ -424,6 +424,7 @@ Public Sub ActivateWindow(Optional hWindow As Window)
If hWindow Then
iInd = GetIndex(hWindow)
If iInd < 0 Then Return
If Not $aWindow[iInd].Detached Then
Try tabWorkspace.Index = iInd
Return
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment