I enter a grid cell that contains some text:
then I leave cell and the inside text is corrupted.
This behaviour occurs only with text that contains . > < = characters.
Here my code:
unit TestGrid_Prg;
interface
uses
Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.Grids, AdvObj, BaseGrid, AdvGrid;
type
TTestTMSGrid_Fmt = class(TForm)
Grid: TAdvStringGrid;
procedure FormCreate(Sender: TObject);
procedure GridEditCellDone(Sender: TObject; ACol, ARow: Integer);
private
{ Private declarations }
public
{ Public declarations }
end;
var
TestTMSGrid_Fmt: TTestTMSGrid_Fmt;
implementation
{$R *.dfm}
procedure TTestTMSGrid_Fmt.FormCreate(Sender: TObject);
begin
Grid.Cells[2,2]:='(xH > 3) .and. (xP < 4)';
Grid.AutoSizeColumns(True);
end;
procedure TTestTMSGrid_Fmt.GridEditCellDone(Sender: TObject; ACol, ARow: Integer);
begin
TAdvStringGrid(Sender).AutoFitColumns(True);
end;
end.