FlexCell

[Joseph]

Hi there.
Does anyone worked with FlexCell activex? https://www.grid2000.com/index.html
It has x64 support and it can be used with opendcl, but I don't know how to manipulate a specific cell, like change value, background color, fore color, etc...

Code Select Expand

(defun c:flexcelltest/Form1#OnInitialize (/)
        ;These codes are working
(dcl-AxControl-Put flexcelltest/Form1/Grid1 "Rows" 1)
  (dcl-AxControl-Put flexcelltest/Form1/Grid1 "Cols" 5)
  (dcl-AxControl-Put flexcelltest/Form1/Grid1 "DisplayRowNumber" T)
  (dcl-AxControl-Invoke flexcelltest/Form1/Grid1 "AddItem" (strcat "A" "\t" "B" "\t" "C" "\t" "D") T)
  (dcl-AxControl-Invoke flexcelltest/Form1/Grid1 "AddItem" (strcat "A" "\t" "B" "\t" "C" "\t" "D") T)
  (dcl-AxControl-Invoke flexcelltest/Form1/Grid1 "AddItem" (strcat "A" "\t" "B" "\t" "C" "\t" "D") T)

  ;Returns a Cell object as an entity.
  (setq cell (car (dcl-AxControl-Invoke flexcelltest/Form1/Grid1 "Cell" 1 2))
      )

  ;"Text" is a cell object property based on FlexCell documentaion. "Text" returns or sets the content of a given cell.
  ;This gives an error: Invalid argument type dcl-Control-SetProperty, argument 0
  (dcl-Control-SetProperty cell "Text" "XYZ")
)