search

RRUZ / vcl-styles-utils

Extend and improve the Delphi VCL Styles
https://theroadtodelphi.wordpress.com/
331 stars 114 forks source link

[dcc64 Error]: Vcl.Styles.DbGrid.pas(68): Cannot access private symbol TCustomDBGrid.FIndicators #231

Open SoyYako opened 5 years ago

SoyYako commented 5 years ago

Runtime error: "[dcc64 Error] Vcl.Styles.DbGrid.pas(68): E2361 Cannot access private symbol TCustomDBGrid.FIndicators"

unit Test;
interface
uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs,Vcl.Imaging.pngimage, Vcl.Buttons, Data.DB,
  FireDAC.Stan.Intf, FireDAC.Stan.Option, FireDAC.Stan.Param,
  FireDAC.Stan.Error, FireDAC.DatS, FireDAC.Phys.Intf, FireDAC.DApt.Intf,
  FireDAC.Comp.DataSet, FireDAC.Comp.Client, Vcl.StdCtrls, Vcl.Grids,
  Vcl.DBGrids,   Vcl.ExtCtrls;
type
  TFTest = class(TForm)
(. . .)  
var
  FTest: TFTest;
implementation
uses  Vcl.Styles.DbGrid;
{$R *.dfm}
(. . .)

Next, try move up a module, like:

unit Test;
interface
uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs,Vcl.Imaging.pngimage, Vcl.Buttons, Data.DB,
  FireDAC.Stan.Intf, FireDAC.Stan.Option, FireDAC.Stan.Param,
  FireDAC.Stan.Error, FireDAC.DatS, FireDAC.Phys.Intf, FireDAC.DApt.Intf,
  FireDAC.Comp.DataSet, FireDAC.Comp.Client, Vcl.StdCtrls, Vcl.Grids,
  Vcl.DBGrids {first}, 
  Vcl.Styles.DbGrid {second},
  Vcl.ExtCtrls;

...and repeat error again.