Problem with tabbed TEmbeddedWB

[alpha1]

Hi!
I have two procedures:

Delphi-Quellcode:

procedure TForm1.EmbeddedWBCommandStateChange(Sender: TObject; Command: Integer; Enable: WordBool);
begin
 case Command of
    CSC_NAVIGATEBACK: ImageButton1.Enabled := Enable; 
    CSC_NAVIGATEFORWARD: ImageButton2.Enabled := Enable; 
  end;
end;

and

Delphi-Quellcode:

procedure TForm1.PageControl1Change(Sender: TObject);
begin
end;

How to do, that EmbeddedWBCommandStateChange would be checked on PageControl1Change? :?: