Bug? beginers guide bug..

[Tomas Petrus]

Gave me headache but just for while : )

12 User interfaces 256 B4i Beginner's Guide
Source code:

Dim: in Sub Process_Globals
Private ashTest1 As ActionSheet

Initialize: in Sub Application_Start
ashTest1.Initialize("ashTest2", "", "Cancel", "Delete", Array As String("Add", "Edit",
"Insert"))

Show the ActionSheet: in Sub Page2_BarButtonClick
ashTest1.Show(Page2.RootPanel)

last line there should be ashTest2.Show ...
at least thats how I make it work.

 

[klaus]

Thank you for the bug report.
This line is wrong:
ashTest1.Initialize("ashTest2", "", "Cancel", "Delete", Array As String("Add", "Edit", "Insert"))
It should be:
ashTest1.Initialize("ashTest1", "", "Cancel", "Delete", Array As String("Add", "Edit", "Insert"))