unit fLog;

interface

uses
  System.SysUtils, System.Types, System.UITypes, System.Classes, System.Variants, 
  FMX.Types, FMX.Graphics, FMX.Controls, FMX.Forms, FMX.Dialogs, FMX.StdCtrls,
  System.Rtti, FMX.Grid.Style, FMX.Grid, FMX.ScrollBox,
  FMX.Controls.Presentation;

type
  TfrLog = class(TFrame)
    Panel1: TPanel;
    btnClear: TButton;
    chkWARNING: TCheckBox;
    chkERROR: TCheckBox;
    chkDEBUG: TCheckBox;
    chkINFO: TCheckBox;
    sgLog: TStringGrid;
    StringColumn5: TStringColumn;
    StringColumn1: TStringColumn;
    StringColumn2: TStringColumn;
    StringColumn3: TStringColumn;
    StringColumn4: TStringColumn;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

implementation

{$R *.fmx}

end.