Jump to content
uniGUI Discussion Forums
herculanojs

Destroy TuniFrame

Recommended Posts

He experimented using TuniFrame to use some reports that have visual interaction screen with the user.
However, I have some difficulties when there is a failure to prepare the report.
 
In Tuniframe, there is a method that will prepare the report, and if so, preview the file and successively destroy the frame. This works perfectly
 
However, when the preparation method fails, the frame is not being destroyed.
If an attempt is made to run the report again, we received an error that the frame already exists.
 
 
How should we proceed in such a situation?
 
 
procedure TfrmFinanceiro_Associado.UniSpeedButton3Click(Sender: TObject);
var FrC : TUniFrameClass;
    Fr : TUniFrame;
begin
     if qrydados.IsEmpty then
        exit;
 
     FrC := TUniFrameClass(FindClass('TFrameEmissaoBoleto'));
     if frc <> nil then
     begin
          fr := TUniFrameClass(FindClass('TFrameEmissaoBoleto')).Create(self);
          if fr <> nil then
          begin
               datamodel.link.Util.PassaObject(fr,'SelectedFields',qryDados.Fields);
               if not datamodel.link.util.ExecutaMetodo(fr,'prepara') then
                  FreeAndNil(fr);         
          end;
     end;
end;

 

Share this post


Link to post
Share on other sites
Solution:

 

Try

   ....

finally

    Freeandnil (fr);

end;

 

tanks

Share this post


Link to post
Share on other sites

Hi,

 

Before creating, you need to check the existence of a frame by using Assigned

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now

×