Blog

All Blog Posts  |  Next Post  |  Previous Post

Next Generation Data Grid for Delphi: Cell Controls

Tuesday, October 22, 2024

TMS Software Delphi  Components

Intro

If you’re developing in Delphi and looking for a powerful, flexible, and highly customizable data grid solution, then TMS FNC Data Grid is the perfect choice. In this blog, we continue on our journey with the TMS FNC Data Grid. The TMS FNC Data Grid offers developers advanced tools for presenting and interacting with data. Adding controls such as buttons, checkboxes, progressbars and more to allow interaction and data visualization within the cell is key in providing your application with a unique user interface.


Built-in Controls

TTMSFNCDataGrid has a set of built-in controls ready to use and interact with.

  • Buttons
  • ProgressBars
  • Checkboxes
  • RadioButtons

To access these built-in controls, there are methods available at the grid level:

Grid.AddButton(AColumn, ARow: Integer; AText: string = '')

Grid.AddCheckBox(AColumn, ARow: Integer; AValue: Boolean = False)

Grid.AddRadioButton(AColumn, ARow: Integer; AValue: Boolean = False; AGroupIndex: Integer = 0)

Grid.AddProgressBar(AColumn, ARow: Integer; AValue: Integer = 0)

Grid.AddDataCheckBox(AColumn, ARow: Integer)

Grid.AddDataRadioButton(AColumn, ARow: Integer; AValue: Boolean = False; AGroupIndex: Integer = 0)

Grid.AddDataProgressBar(AColumn, ARow: Integer)

Grid.RemoveButton(AColumn, ARow: Integer)

Grid.RemoveCheckBox(AColumn, ARow: Integer)

Grid.RemoveProgressBar(AColumn, ARow: Integer)

Please note that the grid includes Data Checkbox, RadioButton, and ProgressBar controls. These elements are linked to the cell's value, determining whether the checkbox or radio button is selected, or displaying the progress value. To modify these control values, use `Grid.Booleans[]` for checkboxes and radio buttons, or `Grid.Ints[]` for progress bars. Below is a screenshot showing a grid configured with these cell controls.

TMS Software Delphi  Components

You might notice the additional grid at the bottom. This is a sub-grid, which can be added using the following method:

g := Grid.AddGrid(AColumn, ARow);

The `AddGrid` method returns an instance of `TTMSFNCDataGridRenderer`, which provides the same features and functionality as the main grid.

Control Events

The grid provides events that can be triggered when controls are interacted with:

  • OnCellButtonClick: Triggered when a button in a cell is clicked.
  • OnCellCheckBoxChange: Triggered when the value of a checkbox in a cell changes.
  • OnCellRadioButtonChange: Triggered when a radio button in a cell changes state.

Here is an example code snippet, handling events on cell controls

procedure TForm1.GridCellButtonClick(Sender: TObject; AColumn, ARow: Integer);
begin
  ShowMessage('Button in cell (' + IntToStr(AColumn) + ', ' + IntToStr(ARow) + ') clicked.');
end;

procedure TForm1.GridCellCheckBoxChange(Sender: TObject; AColumn, ARow: Integer);
begin
  if Grid.Booleans[AColumn, ARow] then
    ShowMessage('Checkbox in cell (' + IntToStr(AColumn) + ', ' + IntToStr(ARow) + ') is checked.')
  else
    ShowMessage('Checkbox in cell (' + IntToStr(AColumn) + ', ' + IntToStr(ARow) + ') is unchecked.');
end;
Custom Controls

On top of built-in controls, it's possible to add custom controls to the grid cells. To set a custom control inside a set, use the Controls[] property. Additionally, it's possible to configure where the control needs to be aligned. The following properties are available.

  • Controls[AColumn, ARow]: TTMSFNCDataGridCellControl: Sets the custom control as child of a cell.
  • ControlWidths[AColumn, ARow]: Integer: Defines the width of the control inside the cell.
  • ControlHeights[AColumn, ARow]: Integer: Defines the height of the control inside the cell.
  • ControlAligns[AColumn, ARow]: TTMSFNCDataGridCellControlAlign: Sets the alignment of the control within the cell.
  • ControlTexts[AColumn, ARow]: string: Defines the text displayed on the control (applies to buttons, checkboxes, etc.).
  • ControlPositions[AColumn, ARow]: TTMSFNCDataGridCellControlPosition: Sets the position of the control inside the cell.

For example, this is a code snippet that adds and aligns buttons to the grid.

b := TButton.Create(Self);
b.Text := 'Top';
Grid.Controls[1, 1] := b;
Grid.ControlAligns[1, 1] := gcaTop;

b := TButton.Create(Self);
b.Text := 'Right';
Grid.Controls[2, 1] := b;
Grid.ControlAligns[2, 1] := gcaRight;

b := TButton.Create(Self);
b.Text := 'Bottom';
Grid.Controls[3, 1] := b;
Grid.ControlAligns[3, 1] := gcaBottom;

TMS Software Delphi  Components

In the next sample, we design our own panel, a button and a TMS FNC Chart instance.

Grid.LoadSampleData;

Grid.Controls[2, 2] := Panel1;
Grid.ControlAligns[2, 2] := gcaClient;
Grid.RowHeights[2] := Panel1.Height;
Grid.ColumnWidths[2] := Panel1.Width;

TMS Software Delphi  Components

Conclusion

Cell Controls in TTMSFNCDataGrid is a powerful feature that transforms the way data is visualized in a cell. It proves to be a very valuable feature

In the next blog we'll explore how you can set up a master-detail relationship with and without database binding, so stay tuned for more advanced tips and tutorials on leveraging this next-generation data grid for your Delphi projects! Happy coding!



Pieter Scheldeman


  1. Next Generation Data Grid for Delphi: Getting Started

  2. Next Generation Data Grid for Delphi: Adding, Formatting & Converting Data

  3. Next Generation Data Grid for Delphi: Filtering & Sorting

  4. Next Generation Data Grid for Delphi: Grouping

  5. Next Generation Data Grid for Delphi: Webinar Replay Available!

  6. Next Generation Data Grid for Delphi: Cell Controls

  7. Next Generation Data Grid for Delphi: Master-Detail

  8. Next Generation Data Grid for Delphi: Calculations



This blog post has not received any comments yet.



Add a new comment

You will receive a confirmation mail with a link to validate your comment, please use a valid email address.
All fields are required.



All Blog Posts  |  Next Post  |  Previous Post