Here is my code to create some buttons :
Include "icons.def"
Declare Sub Main
Declare Sub button_prompt
Sub Main
Create ButtonPad "Providers" As
PushButton
Icon MI_ICON_ZOOM_QUESTION
Calling button_prompt
HelpMsg "client"
fixed
Alter ButtonPad "Providers"
Add Separator
Add PushButton
Icon MI_ICON_GRABBER
Calling button_prompt
HelpMsg "client2"
fixed
Create ButtonPad "SiteType" As
PushButton
Icon MI_ICON_ZOOM_QUESTION
Calling button_prompt
HelpMsg "site1"
fixed
Alter ButtonPad "SiteType"
Add Separator
Add PushButton
Icon MI_ICON_GRABBER
Calling button_prompt
HelpMsg "site2"
fixed
Alter ButtonPad "SiteType"
Add Separator
Add PushButton
Icon MI_ICON_GRABBER
Calling button_prompt
HelpMsg "site3"
fixed
End Sub
Sub button_prompt
End Sub
This code does bring the bottons but it's kind of crazy that it is scattered :(