Subject TIB_MetadataDialog raises AV error
Author Fabiano
Hi All.

IBO 4.2Gc

When I tried to use TIB_MetadataDialog I've got an AV error.
Altering TfrmMetadataExtract as below work for me:

TfrmMetadataExtract = class(TfrmBase)
..
..
private
..
..
protected
// ===== Override ancestor SetConnection
procedure SetConnection( AValue: TIB_Connection ); override;
public
{ Public declarations }
end;

implementation

procedure TfrmMetadataExtract.FormCreate(Sender: TObject);
var
tmpOpt: TIB_DDLCodeOption;
tmpEnt: TIB_DDLExtractType;
begin
// Initialise the controls from Metadata instance at startup.
FInternalUpd := true;
try
// Setting Metadata.IB_Connection here does not work
//Metadata.IB_Connection := BaseConnection;
..
..
end;

procedure TfrmMetadataExtract.SetConnection( AValue: TIB_Connection );
begin
inherited;
Metadata.IB_Connection := AValue;
end;

Best regards
Fabiano Rezende