COM help needed

[Holger]

Hi

I tried it for a couple of days but cannot find a solution to create a full working MSFlexGrid6-control.

Here is the code:

expandcollapse popup

#include <GUIConstants.au3>

$hMainGUI       = GUICreate('COM Test')
$oGrid          = ObjCreate('MSFlexGridLib.MSFlexGrid')
$nGridCtrl      = GUICtrlCreateObj($oGrid, 0, 25, 200, 200)
; Only for XP SP2
ControlMove($hMainGUI, '', 'MSFlexGridWndClass1', 0, 25, 200, 200)

GUISetState()

With $oGrid
    .AllowBigSelection = 1
    .AllowUserResizing = 1
    .Cols = 3
    .Rows = 3
    .FixedCols = 1
    .FixedRows = 1
    .FocusRect = 2
    .SelectionMode = 0
    .Appearance = 0
EndWith

; This lines works
$oGrid.Col = 0
$oGrid.Row = 0
$oGrid.Text = 'Text1'

; This one not
$oGrid.TextMatrix(0, 1) = 'Text2'

While 1
    $Msg = GUIGetMsg()
    Switch $Msg
        Case $GUI_EVENT_CLOSE
            ExitLoop
    EndSwitch
WEnd

Exit

Does anyone has an idea what could be the problem or is this maybe not possible?

Thanks

Holger

Edited March 12, 2006 by Holger

[DaleHohm]

Hi

I tried it for a couple of days but cannot find a solution to create a full working MSFlexGrid6-control.

I don't have MSFlxGrd.ocx on my system, so $oGrid is returning 0 - is this the problem you are having or something else?

Dale

[Jos]

I don't have MSFlxGrd.ocx on my system, so $oGrid is returning 0 - is this the problem you are having or something else?

Dale

Just tested a bit ... it doesn't update the grid, but it does retrieve its current value correctly.

When i run this it does show the "Text1" value for the 2 cells:

expandcollapse popup

#include <GUIConstants.au3>

$hMainGUI       = GUICreate('COM Test')
$oGrid          = ObjCreate('MSFlexGridLib.MSFlexGrid')
$nGridCtrl      = GUICtrlCreateObj($oGrid, 0, 25, 200, 200)
; Only for XP SP2
ControlMove($hMainGUI, '', 'MSFlexGridWndClass1', 0, 25, 200, 200)

GUISetState()

With $oGrid
    .AllowBigSelection = 1
    .AllowUserResizing = 1
    .Cols = 3
    .Rows = 3
    .FixedCols = 1
    .FixedRows = 1
    .FocusRect = 2
    .SelectionMode = 0
    .Appearance = 0

; This lines works
    .Col = 0
    .Row = 0
    .Text = 'Text1'
    .Col = 1
    .Row = 1
    .Text = 'Text1'

; This one not
    For $x = 0 To $oGrid.Cols -1
        For $y = 0 To $oGrid.Rows -1
            .TextMatrix($x, $y) = 'x\'
            ConsoleWrite('@@ Debug(30) : .TextMatrix($x, $Y) = ' & .TextMatrix($x, $Y) & @lf & '>Error code: ' & @error & @lf);### Debug Console
        Next
    Next
EndWith

While 1
    $Msg = GUIGetMsg()
    Switch $Msg
        Case $GUI_EVENT_CLOSE
            ExitLoop
    EndSwitch
WEnd

Exit

Edited March 12, 2006 by JdeB

[Holger]

Thank you both for looking at

Yeah, you can read the text values with TextMatrix() but cannot set.

I have no idea at the moment cause also some other options don't work, like i.e. ColWidth .

I give up this for now.

Maybe someone knows another table-control (not Excel) which works.

I think it will end with using a simple listview with single-selection...

So long

Holger

[GaryFrost]

expandcollapse popup

#include <GUIConstants.au3>

$hMainGUI = GUICreate('COM Test')
$oGrid = ObjCreate('MSFlexGridLib.MSFlexGrid')
$nGridCtrl = GUICtrlCreateObj($oGrid, 0, 25, 200, 200)
; Only for XP SP2
ControlMove($hMainGUI, '', 'MSFlexGridWndClass1', 0, 25, 200, 200)

GUISetState()

With $oGrid
   .AllowBigSelection = 1
   .AllowUserResizing = 1
   .Cols = 3
   .Rows = 3
   .FixedCols = 1
   .FixedRows = 1
   .FocusRect = 2
   .SelectionMode = 0
   .Appearance = 0
   
  ; This lines works
   .Col = 0
   .Row = 0
   .Text = 'Text1'
   .Col = 1
   .Row = 1
   .Text = 'Text1'
   
  ; This works also
   For $x = 0 To $oGrid.Cols - 1
      For $y = 0 To $oGrid.Rows - 1
         .Row = $x
         .Col = $y
         .Text = "x\"
         ConsoleWrite('@@ Debug(30) : .TextMatrix($x, $Y) = ' & .TextMatrix ($x, $y) & @LF & '>Error code: ' & @error & @LF);### Debug Console
      Next
   Next
EndWith

While 1
   $Msg = GUIGetMsg()
   Switch $Msg
      Case $GUI_EVENT_CLOSE
         ExitLoop
   EndSwitch
WEnd

Exit

[Holger]

Yeah Gary, the reading works but not the writing with TextMatrix.

TextMatrix you can use to fill out a cell without changing the current(focus) cell...

[GaryFrost]

Yeah Gary, the reading works but not the writing with TextMatrix.

TextMatrix you can use to fill out a cell without changing the current(focus) cell...

I knew what you were trying to do, but both that one and the TextArray don't seem to be working

[SravyaSuram]

How to get data from existing window using above,

If we change window name in control move will it work

Please help me out it's urgent.

 

[JLogan3o13]

@SravyaSuram did you happen to notice this thread is 13 years old?! Please don't resurrect old threads; the language has changed just a bit in the last decade. Start a new thread, and follow the suggestions below on how to ask decent questions: