fix(resource): 展开上个页面已展开的卡片功能不生效
This commit is contained in:
@@ -90,7 +90,6 @@
|
|||||||
If Card.Title <> "" AndAlso Not Card.IsSwapped Then Titles.Add(Card.Title)
|
If Card.Title <> "" AndAlso Not Card.IsSwapped Then Titles.Add(Card.Title)
|
||||||
Next
|
Next
|
||||||
Logger.Info($"记录当前已展开的卡片:{String.Join("、", Titles)}")
|
Logger.Info($"记录当前已展开的卡片:{String.Join("、", Titles)}")
|
||||||
FrmMain.PageCurrent.Additional(1) = Titles
|
|
||||||
End If
|
End If
|
||||||
'打开详情页
|
'打开详情页
|
||||||
Dim TargetType As ResourceTypes
|
Dim TargetType As ResourceTypes
|
||||||
@@ -123,7 +122,7 @@
|
|||||||
TargetLoader = FrmMain.PageCurrent.Additional(3)
|
TargetLoader = FrmMain.PageCurrent.Additional(3)
|
||||||
End If
|
End If
|
||||||
FrmMain.PageChange(New FormMain.PageStackData With {.Page = FormMain.PageType.ResourceDetail,
|
FrmMain.PageChange(New FormMain.PageStackData With {.Page = FormMain.PageType.ResourceDetail,
|
||||||
.Additional = {sender.Tag, New List(Of String), TargetInstance, TargetLoader, TargetType}})
|
.Additional = {sender.Tag, Titles, TargetInstance, TargetLoader, TargetType}})
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
'鼠标点击判定
|
'鼠标点击判定
|
||||||
|
|||||||
Reference in New Issue
Block a user