Print Page | Close Window

SOLVED: FixedRowHeight

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=11175
Printed Date: 21 November 2024 at 4:32pm
Software Version: Web Wiz Forums 12.04 - http://www.webwizforums.com


Topic: SOLVED: FixedRowHeight
Posted By: braian87b
Subject: SOLVED: FixedRowHeight
Date Posted: 23 June 2008 at 7:22pm
Hi!
 
(im using version 10.1)
 
i have a problem when i use the the FixedRowHeight property like:
 
ReportControl.PaintManager.FixedRowHeight = False
 
and then:
 
            Set Column = rcRC.Columns.Add(i, "name", 20, True)
that line produces an error descripted as :
"
Error '-2147417848 (80010108)' in runtime:
Error in the method 'add' of the object 'IReportColumns'
"
This occurs after i use the deleteall method from columns and i try to add a new column
 
does any know the reason of the error? or a tip to resolve or fix?
note : i need to use the "autoheight of the row" feature.
 
Thanks in advance.
 
 
 
code for reproduce this hint:
(put in a command button and press a few times until error shows)
 
    Dim registro As ReportRecord
    Dim Item As ReportRecordItem
    Dim Column As ReportColumn
    Dim i As Integer
    Dim j As Integer
 
    ReportControl1.columns.DeleteAll
    ReportControl1.Records.DeleteAll
    ReportControl1.Populate > this line fixes the problem!
    ReportControl1.PaintManager.FixedRowHeight = False 'this performs the error
   
    '***************************************************************************
    Dim columns As Integer
    columns = (Rnd - 1) + 6
   
    Debug.Print "Im using " & columns & " columns now"
   
    For i = 0 To columns
       
        Set Column = ReportControl1.columns.Add(i, "asd", 20, True)
        Column.Alignment = xtpAlignmentWordBreak 'if i use this is irrelevant
 
    Next i
    '***************************************************************************
    For j = 0 To 8
        Set registro = ReportControl1.Records.Add()
 
        With registro
 
            For i = 0 To columns
                Set Item = .AddItem("asdasd" & Rnd)
            Next i
 
        End With
 

    Next j
    '***************************************************************************
    ReportControl1.Populate
    '***************************************************************************
    Set registro = Nothing
    Set Item = Nothing
    Set Column = Nothing


-------------
Product: Xtreme SuitePro (ActiveX) version 11.
Platform: Windows XP (32bit) - SP 3
Language: Visual Basic 6.0 SP 6
Spanish, Espaņol, English.
Argentina



Replies:
Posted By: Aaron
Date Posted: 24 June 2008 at 1:30am
Hi,
 
Nothing wrong with your code, works OK. I'm using V12.0
Ask supportteam to take a look at this, maybe a version problem?
 
 


-------------
Product: Xtreme SuitePro (ActiveX) version 15.0.2
Platform: Windows XP (32bit) - SP 2
Language: Visual Basic 6.0

Zero replies is not an option....


Posted By: braian87b
Date Posted: 24 June 2008 at 11:29am
Aaron, please, if i sent you the ocx version 10.1 demo version can you try again?
 
i need to be sure.
 
thanks a lot!


Posted By: braian87b
Date Posted: 24 June 2008 at 11:31am
Originally posted by braian87b braian87b wrote:

Aaron, please, if i sent you the ocx version 10.1 demo version can you try again?
 
i need to be sure.
 
thanks a lot!
 
postdata: i been trying uploading files with the "upload file" icon when posting but the files does not appears in the list in the server.
 
can i send you trougt an email?
 


Posted By: Aaron
Date Posted: 24 June 2008 at 11:34am
Hi,
 
Yes you can, just add a sample project and the ocx and I will see what I can do.


-------------
Product: Xtreme SuitePro (ActiveX) version 15.0.2
Platform: Windows XP (32bit) - SP 2
Language: Visual Basic 6.0

Zero replies is not an option....


Posted By: Aaron
Date Posted: 24 June 2008 at 3:23pm
Hi Braian
 
Please add SOLVED to the topic description, so users will know


-------------
Product: Xtreme SuitePro (ActiveX) version 15.0.2
Platform: Windows XP (32bit) - SP 2
Language: Visual Basic 6.0

Zero replies is not an option....



Print Page | Close Window

Forum Software by Web Wiz Forums® version 12.04 - http://www.webwizforums.com
Copyright ©2001-2021 Web Wiz Ltd. - https://www.webwiz.net