Fix VoltorbFlip ChooseBox bug
This commit is contained in:
parent
402fc4d64c
commit
5f826a799a
|
@ -26,7 +26,7 @@
|
||||||
|
|
||||||
Dim Entities() As Entity
|
Dim Entities() As Entity
|
||||||
|
|
||||||
Dim ResultFunction As ChooseBox.DoAnswer = Nothing
|
Public ResultFunction As ChooseBox.DoAnswer = Nothing
|
||||||
|
|
||||||
Public Delegate Sub FollowUpDelegate()
|
Public Delegate Sub FollowUpDelegate()
|
||||||
Public FollowUp As FollowUpDelegate = Nothing
|
Public FollowUp As FollowUpDelegate = Nothing
|
||||||
|
|
|
@ -97,6 +97,8 @@ Namespace VoltorbFlip
|
||||||
Me.MouseVisible = True
|
Me.MouseVisible = True
|
||||||
Me.CanChat = Me.PreScreen.CanChat
|
Me.CanChat = Me.PreScreen.CanChat
|
||||||
Me.CanBePaused = Me.PreScreen.CanBePaused
|
Me.CanBePaused = Me.PreScreen.CanBePaused
|
||||||
|
ChooseBox.readyForResult = False
|
||||||
|
TextBox.ResultFunction = Nothing
|
||||||
|
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue