Report Control - AddComboButton & Constraints.Add

Print Page | Close Window

AddComboButton & Constraints.Add

Printed From: Codejock Forums
Category: Codejock Products
Forum Name: Report Control
Forum Description: Topics Related to Codejock Report Control
URL: http://forum.codejock.com/forum_posts.asp?TID=15199
Printed Date: 12 July 2025 at 5:45pm
Software Version: Web Wiz Forums 12.04 - http://www.webwizforums.com

Topic: AddComboButton & Constraints.Add

Posted By: McKloony
Subject: AddComboButton & Constraints.Add
Date Posted: 17 September 2009 at 6:25am

if a Column has a ComboBox Button, is it anyhow possible to set different Constraints to each Row?

-------------
Product: Xtreme SuitePro (ActiveX) 16.2.5

Platform: XP / Windows 7

Language: Visual Basic 6.0 SP6

Replies:

Posted By: mdoubson
Date Posted: 17 September 2009 at 7:31am

Sure. For each item essentially. You can use ComboBox Button (Picklist) based on Column - in this case all items under this column will use same picklist OR ComboBox Button (Picklist) NOT based on Column

-------------
Mark Doubson, Ph.D.

Posted By: McKloony
Date Posted: 17 September 2009 at 8:05am

And how can I use Picklist) NOT based on Column? Is there an sample in the CodeJock samples?

-------------
Product: Xtreme SuitePro (ActiveX) 16.2.5

Platform: XP / Windows 7

Language: Visual Basic 6.0 SP6

Posted By: mdoubson
Date Posted: 17 September 2009 at 8:13am

read post https://forum.codejock.com/forum_posts.asp?TID=14664 - https://forum.codejock.com/forum_posts.asp?TID=14664 please

-------------
Mark Doubson, Ph.D.

Posted By: Fabian
Date Posted: 17 September 2009 at 8:52am

Hi McKloony

Look at this:

Dim RecordItem As ReportRecordItem

Dim i As Integer

...

Set RecordItem=Record.AddItem("")

RecordItem.CreateEditOptions

For i=0 to 4

RecordItem.EditOptions.Constraints.Add Cstr(i),i

Next i

RecordItem.EditOptions.AddComboButton

RecordItem.Value=2

...

Hope this helps...

-------------
Product: Xtreme SuitePro (ActiveX) version 16.2.3

Platform: Windows 7 (32bit)

Language: Visual Basic 6.0 / SP6

Posted By: mdoubson
Date Posted: 17 September 2009 at 8:55am

Right, Fabian. Thanks for simple VB sample

-------------
Mark Doubson, Ph.D.

Posted By: McKloony
Date Posted: 21 September 2009 at 6:08am

Great! Is it also possible to set different row hight?

-------------
Product: Xtreme SuitePro (ActiveX) 16.2.5

Platform: XP / Windows 7

Language: Visual Basic 6.0 SP6

Posted By: mdoubson
Date Posted: 21 September 2009 at 11:10am

Did you tried to use this:

Private Sub ReportControl1_MeasureRow(ByVal Row As XtremeReportControl.IReportRow, ByVal hDC As stdole.OLE_HANDLE, ByVal Width As Long, Height As Long)
Height = ....
End Sub

in Form Load you need to set

ReportControl1.SetCustomDraw xtpCustomMeasureRow

ReportControl1.SetCustomDraw xtpCustomMeasureRow + xtpCustomBeforeDrawRow

-------------
Mark Doubson, Ph.D.