Codejock Developer Community : Getting the value of column 1 when doubleclicking

Getting the value of column 1 when doubleclicking : You don't need the CInt/CStr-Conversion,...

Tue, 30 Oct 2007 06:06:53 +0000

Author: Baldur
Subject: 7175
Posted: 30 October 2007 at 6:06am

You don't need the CInt/CStr-Conversion, because you put the Fieldobject to the Item and not the default-property.

Expand your Code with

Set Item = Record.AddItem(rsTable.Fields!CustomerNUmber.Value)

This save time and also the content-type stays there (eg. Date/Str/Double/int/...)

Getting the value of column 1 when doubleclicking : Cool... I actually thought about...

Sat, 19 May 2007 15:40:59 +0000

Author: Zach
Subject: 7175
Posted: 19 May 2007 at 3:40pm

Cool... I actually thought about adding CInt, CStr... but then just didnt.. my bad :(

Getting the value of column 1 when doubleclicking : Hi again Zach Thank you very...

Sat, 19 May 2007 04:26:04 +0000

Author: Soren
Subject: 7175
Posted: 19 May 2007 at 4:26am

Hi again Zach

Thank you very much for your help.

You really got me right on track.

At first, I did:

Set Item = Record.AddItem(rsTable.Fields!CustomerNUmber)

but the List stayed empty

Then I started thinking about what you said about formatting.

So, now I do this:

Set Item = Record.AddItem(CInt(rsTable.Fields!CustomerNUmber))

Set Item = Record.AddItem(CStr(rsTable.Fields!CompanyName))

And everything is pure happiness

Getting the value of column 1 when doubleclicking : I never use the format part of...

Sat, 19 May 2007 00:33:52 +0000

Author: Zach
Subject: 7175
Posted: 19 May 2007 at 12:33am

I never use the format part of the Report Control... but I just realized.. you did just post your actual code :)

You are formatting each cell to look like your result... hum... interesting... might be an interesting trick to use sometime... but... uh.. why?

Set Record = CustomerList.Records.Add

Set Item = Record.AddItem(rsTable.Fields!CustomerNUmber)

Set Item = Record.AddItem(rsTable.Fields!CompanyName)

Set Item = Record.AddItem(rsTable.Fields!Address)
Set Item = Record.AddItem(rsTable.Fields!ZIP)

... That I think will get you what you want... sorry I missed that the first time... as I said.. I do not use the format property and I have never used the Microsoft way of pulling in fields from a table so I just ignored that part in my mind at first

Getting the value of column 1 when doubleclicking : Soren wrote:Hi Zack This...

Sat, 19 May 2007 00:27:33 +0000

Author: Zach
Subject: 7175
Posted: 19 May 2007 at 12:27am

Soren wrote:

Hi Zack

This is what I do:

First, I create the headers

    frmKontakter.CustomerList.Columns.Add 0, "Customer Number", 25, True
    frmKontakter.CustomerList.Columns.Column(0).Groupable = False
    frmKontakter.CustomerList.Columns.Add 1, "Company name", 100, True
    frmKontakter.CustomerList.Columns.Add 2, "Address", 100, True
    frmKontakter.CustomerList.Columns.Add 3, "ZIP", 50, True

Then I add the data:

aCount = rsTable.RecordCount
rsTable.MoveFirst
a = 0

While a < aCount

Set Record = CustomerList.Records.Add

Set Item = Record.AddItem(a)
Item.Format = rsTable.Fields!CustomerNUmber

Set Item = Record.AddItem(Str)
Item.Format = rsTable.Fields!CompanyName

        Set Item = Record.AddItem(Str)
        Item.Format = rsTable.Fields!Address
        Set Item = Record.AddItem(Str)
        Item.Format = rsTable.Fields!ZIP

        a = a + 1
        rsTable.MoveNext
Wend
CustomerList.Populate

If that is in someway is close to your exact code... uh... what did you expect?

You are placing a count into the first column?

I also assume you define a value for Str elsewhere.. but this:

Set Item = Record.AddItem(a)

listed like that .. when the others are listed like:

Set Item = Record.AddItem(Str)

Would as I said... make me think that you are assigning the value to Str elsewhere... and just used that for filler... but the first one.. it really looks like you put in "a" there... or its value anyway... which would make it so that when you double click on it... you are going to get what looks like a row number...

... if you post the actual code... from the select statement to the end of the loop of the results... I can probably have a better clue what is wrong...

Getting the value of column 1 when doubleclicking : Hi Zac I used the same code...

Fri, 18 May 2007 20:21:21 +0000

Author: moe188
Subject: 7175
Posted: 18 May 2007 at 8:21pm

Hi Zac

I used the same code with the SelectionChanged events to get the value of the first column with no problems. then when I double click on reportcontrol (RowDblClick events), I check for the value of the first column, if the value is empty I don't do nothing otherwise I do whatever I want to do base on the value of column 1.

good luck.

Getting the value of column 1 when doubleclicking : Hi Zack This is what I do: First,...

Fri, 18 May 2007 19:35:00 +0000

Author: Soren
Subject: 7175
Posted: 18 May 2007 at 7:35pm

Hi Zack

This is what I do:

First, I create the headers

Then I add the data:

aCount = rsTable.RecordCount
rsTable.MoveFirst
a = 0

While a < aCount

Set Record = CustomerList.Records.Add

Set Item = Record.AddItem(a)
Item.Format = rsTable.Fields!CustomerNUmber

Set Item = Record.AddItem(Str)
Item.Format = rsTable.Fields!CompanyName

Getting the value of column 1 when doubleclicking : Dont know what to tell you.. I...

Fri, 18 May 2007 19:18:34 +0000

Author: Zach
Subject: 7175
Posted: 18 May 2007 at 7:18pm

Dont know what to tell you..

I have a RowDblClick even that looksl ike this... in VB6 ... and works perfectly

Private Sub Data_RowDblClick(ByVal Row As XtremeReportControl.IReportRow, _
ByVal Item As XtremeReportControl.IReportRecordItem)

MsgBox Row.Record(4).Value

End Sub

You can also try Row.Record(4).Caption ... depending on what you are doing... you may need to do that.

Getting the value of column 1 when doubleclicking : I think there is something wrong. I've...

Fri, 18 May 2007 18:06:20 +0000

Author: Soren
Subject: 7175
Posted: 18 May 2007 at 6:06pm

I think there is something wrong.

I've tried

       If Not wndview.FocusedRow.GroupRow Then
            CustomeNumber = wndview.FocusedRow.Record(Col1).Value
        end if

and it returns the row number

And if I do this:

       If Not wndview.FocusedRow.GroupRow Then
            CustomeNumber = wndview.FocusedRow.Record(SOME_RUBBISH).Value
        end if

the row number is returned too.

Could there be som settings missing in the report control?

Getting the value of column 1 when doubleclicking : hi, try thiswith reprotcontrol...

Fri, 18 May 2007 17:51:54 +0000

Author: moe188
Subject: 7175
Posted: 18 May 2007 at 5:51pm

hi,

try this with reprotcontrol selection changed or rowdoublclick

        If Not wndview.FocusedRow.GroupRow Then
            CustomeNumber = wndview.FocusedRow.Record(Col1).Value
        end if

I hope that will work for you