[firebase-br] Off-Topic

[Augusto junior]

Boa tarde,

 Estou fazendo uma alteraçao ao componente Query do MDO ( MDOQuery )....

Nao estou compilando qdo tento um OVERRIDE no evento ONBEFOREOPEN

sera alguem sabe onde estou errando ?



O ERRO ESTA AQUI
procedure beforeopen; override ;

METHOD BEFOREOPEN NOT FOUND

Um pedaco da unit

interface

uses
  SysUtils, Classes, DB, MDOCustomDataSet, MDOQuery, MDODatabase;

type
  TAPQryFiltro = class(TMDOQuery)


  private
    { Private declarations }
      TFiltroOn: Boolean;
  protected
    { Protected declarations }
    procedure beforeopen; override ;
  public
    { Public declarations }
  published
    { Published declarations }
    property FiltroOn: Boolean read TFiltroOn write TFiltroOn;
  end;

procedure Register;

implementation

procedure Register;
begin
  RegisterComponents('APJ DataControl', [TAPQryFiltro]);
end;

{ TAPQryFiltro }

procedure TAPQryFiltro.beforeopen;
begin
   inherited;
   filtroon:= not FiltroOn;
  //
end;

Grato
Guto