Hi,
I try create button at run time but I having trouble to set the click
action.
here my code
DIM m_MaxCol AS Integer = 5
DIM m_button AS Button
DIM m_MaxBut AS Integer = 18
DIM m_Colcnt AS Integer = 0
DIM m_Rowcnt AS Integer = 0
DIM m_butcnt AS Integer = 0
DIM m_Colgap AS Integer = 2
DIM
kobolds wrote:
Hi,
I try create button at run time but I having trouble to set the click
action.
here my code
DIM m_MaxCol AS Integer = 5
DIM m_button AS Button
DIM m_MaxBut AS Integer = 18
DIM m_Colcnt AS Integer = 0
DIM m_Rowcnt AS Integer = 0
DIM m_butcnt AS Integer = 0
DIM
Ron Klinkien wrote:
kobolds wrote:
Hi,
I try create button at run time but I having trouble to set the click
action.
here my code
DIM m_MaxCol AS Integer = 5
DIM m_button AS Button
DIM m_MaxBut AS Integer = 18
DIM m_Colcnt AS Integer = 0
DIM m_Rowcnt AS Integer = 0
DIM m_butcnt
Ron Klinkien wrote:
kobolds wrote:
Hi,
I try create button at run time but I having trouble to set the click
action.
here my code
DIM m_MaxCol AS Integer = 5
DIM m_button AS Button
DIM m_MaxBut AS Integer = 18
DIM m_Colcnt AS Integer = 0
DIM m_Rowcnt AS Integer = 0
DIM m_butcnt
my problem now is how to set the click action and how to know which
button
is clicking
Use this instead:
m_button = NEW Button(ScrollView1) AS MyButton
Set the .Tag property to something unique:
.Tag = iUnique
And then catch the clicks with:
PUBLIC SUB MyButton_Click()
Ron Klinkien wrote:
my problem now is how to set the click action and how to know which
button
is clicking
Use this instead:
m_button = NEW Button(ScrollView1) AS MyButton
Set the .Tag property to something unique:
.Tag = iUnique
And then catch the clicks with: