TTMSFNCGrid - Checkboxes and showing checks

WEB TMS WEB Core
1

I have a TTMSFNCGrid attached to a TWebClientDataset. I have 2 columns that show a Checkbox, but they show a cross. How can I change this to show a tick for a true value?

Thanks.

3

This is unfortunately not possible right now. TTMSFNCGrid uses custom drawing for checkboxes instead of using real checkboxes. We'll investigate if we can change or use a property to control this behavior.

4

Is it possible to use a custom draw event to use my own checkbox images?

5

You could create your own cell descendant, pass it through the OnGetCellClass, and then assign the Boolean property value to the checkbox value in the OnGetCellProperties.

type
  TMyGridCell = class(TTMSFNCGridCell)
    procedure Draw(AGraphics: TTMSFNCGraphics; ADrawText: Boolean; ADrawBackGround: Boolean; ADrawBorder: Boolean); override;
  end;

procedure TForm2.TMSFNCGrid1GetCellClass(Sender: TObject; ACol, ARow: Integer;
  var CellClassType: TTMSFNCGridCellClass);
begin
  CellClassType := TMyGridCell;
end;
6

Hi Pieter,

Thanks for the suggestion, but I'm not sure where to start.
Any chance you could upload an example project?

Cheers,
Paul