Can' get MSHFlexGrid Clip Property to work [RESOLVED]

[chshiba]

I had the clip property working fine on a Win2K machine but as soon as I ran the code on a different machine running XP I was unable to return data from a flex grid using the clip property. I can still fill the grid using the clip property, I just cant read data from the grid anymore using the clip property. I downloaded all the updates from microsoft but am still unable to get it to return data. Does the OS have anything to do with this? Am I still missing a download?

I would really appreciate any help in this matter. Thank you.

[Hack]

I had the clip property working fine on a Win2K machine but as soon as I ran the code on a different machine running XP I was unable to return data from a flex grid using the clip property. I can still fill the grid using the clip property, I just cant read data from the grid anymore using the clip property. I downloaded all the updates from microsoft but am still unable to get it to return data. Does the OS have anything to do with this? Am I still missing a download?

I would really appreciate any help in this matter. Thank you.

Welcome to the forums.

My initial reaction to your question about a missing download is No. You probably have whatever you need. There have been numerous questions regarding things that work with Win200x and 98 that, for some reason, don't on XP.

Anyway, could you post what you are doing. I'm also running XP, and I'd like to give it a go and see what I come up with.

[chshiba]

The code I use is pretty standard i just select the contents of the flex grid and then assign the return value of the clip property to a string.

fgd.col = 0
fgd.Row = 1
fgd.ColSel = fgd.Cols - 1
fgd.RowSel = fgd.Rows - 1
str = fgd.Clip

fgd.clip returns an empty string, but it works find if I assign values to the grid (i.e. fgd.clip = str).
You mentioned, "There have been numerous questions regarding things that work with Win200x and 98 that, for some reason, don't on XP." Have you ever come across any solutions for those questions?

Thanks for the reply.

[dRAMmer]

I tried your code and it worked just perfect. I'm using SP4 of MSHFLXGD.OCX and running XP sp2

[dglienna]

This works fine under XP.

Option Explicit
 
Private Sub Command1_Click()
  Dim str As String
  With flxgrd
    .Col = 2
    .Row = 2
    .ColSel = 5
    .RowSel = 5
    str = .Clip
  End With
  MsgBox str
End Sub
 
Private Sub Command2_Click()
  With flxgrd
    .Col = 2
    .Row = 2
    .ColSel = 5
    .RowSel = 5
    .Clip = "5" & vbTab & "10" & vbTab & "15" & vbTab & "20"
  End With
End Sub
 
Private Sub Form_Load()
  Dim r%, c%
  With flxgrd
    .Rows = 6
    .Cols = 6
    For r = 0 To 5
      For c = 0 To 5
        .TextMatrix(r, c) = 5 * r + c
      Next c
    Next r
  End With
End Sub

[chshiba]

Thanks for the help, I hadn't installed the correct VB6 service pack on the XP machine. Thanks for pointing out my stupid mistake.