|  | 
| RibbonGroup Fixed Size | 
| Post Reply   | 
| Author | |
| TShriver   Groupie     Joined: 27 July 2008 Location: United States Status: Offline Points: 34 |  Post Options  Thanks(0)  Quote  Reply  Topic: RibbonGroup Fixed Size Posted: 05 March 2009 at 7:25pm | 
| Hello, I'm trying to accomplish the same effect as demostrated in the RibbonSample whereby the RibbonGroup "Paragraph" shown below does not expand is size when the form is enlarged.  As you can see from my attempt below in the RibbonGroup "Alerts" the size of the group is fine until the form is resized.  When I enlarge the form, the RibbonGroup expands to fill the extra space available.  I'd like it to remain as above.  Thank you! Tim | |
|  | |
| Oleg   Senior Member   Joined: 21 May 2003 Location: United States Status: Offline Points: 11234 |  Post Options  Thanks(0)  Quote  Reply  Posted: 06 March 2009 at 2:01am | 
| 
   Hi,
 Add pControl->SetStyle(xtpButtonCaption); for top labels. | |
| 
     Oleg, Support Team CODEJOCK SOFTWARE SOLUTIONS | |
|  | |
| TShriver   Groupie     Joined: 27 July 2008 Location: United States Status: Offline Points: 34 |  Post Options  Thanks(0)  Quote  Reply  Posted: 09 March 2009 at 2:48pm | 
| 
   When will the previous post be made public? 
 "thank you, but I have the control style set "Control.Style = xtpButtonCaption" which is just as in the RibbonSample App.  Here is my code: 
 174    Set GroupAlerts = TabHome.Groups.AddGroup("Alerts", ID_GROUP_ALERT) 176 Set Control = GroupAlerts.Add(xtpControlLabel, 0, "KWH") 178 Control.Style = xtpButtonCaption           Dim ControlEdit As CommandBarEdit 180 Set ControlEdit = GroupAlerts.Add(xtpControlEdit, ID_KWH_ALERT_UP, " Up:") 182 ControlEdit.Width = 120 184 ControlEdit.ShowSpinButtons = True 186 ControlEdit.Text = g_lKWHAlert_up 188 Set ControlEdit = GroupAlerts.Add(xtpControlEdit, ID_KWH_ALERT_DOWN, "Down:") 190 ControlEdit.Width = 120 192 ControlEdit.ShowSpinButtons = True 194 ControlEdit.Text = g_lKWHAlert_down 196    Set Control = GroupAlerts.Add(xtpControlLabel, 0, "Voltage") 198 Control.Style = xtpButtonCaption 200 Control.BeginGroup = True 202 Set ControlEdit = GroupAlerts.Add(xtpControlEdit, ID_VOLTAGE_ALERT_UP, " Up:") 204 ControlEdit.Width = 120 206 ControlEdit.ShowSpinButtons = True 208 ControlEdit.Text = g_lVoltageAlert_up 210 Set ControlEdit = GroupAlerts.Add(xtpControlEdit, ID_VOLTAGE_ALERT_DOWN, "Down:") 212 ControlEdit.Width = 120 214 ControlEdit.ShowSpinButtons = True 216 ControlEdit.Text = g_lVoltageAlert_down" | |
|  | |
| Oleg   Senior Member   Joined: 21 May 2003 Location: United States Status: Offline Points: 11234 |  Post Options  Thanks(0)  Quote  Reply  Posted: 10 March 2009 at 1:57am | 
| 
   Hi,
 Then add Control.Style = xtpButtonIconAndCaption for all Edit. | |
| 
     Oleg, Support Team CODEJOCK SOFTWARE SOLUTIONS | |
|  | |
| TShriver   Groupie     Joined: 27 July 2008 Location: United States Status: Offline Points: 34 |  Post Options  Thanks(0)  Quote  Reply  Posted: 10 March 2009 at 9:43am | 
| 
   Oleg,
 Thank you!  That was the solution.  ControlEdit.Style = xtpButtonIconAndCaption for all items. Best, Tim | |
|  | |
| Post Reply   | |
| Tweet | 
| Forum Jump | Forum Permissions  You cannot post new topics in this forum You cannot reply to topics in this forum You cannot delete your posts in this forum You cannot edit your posts in this forum You cannot create polls in this forum You cannot vote in polls in this forum |