Skip to content
Snippets Groups Projects
Commit 556ca8aa authored by rswindell's avatar rswindell
Browse files

Need to destroy Terminal instance when parent form is destroyed.

parent a4754b4e
No related branches found
No related tags found
No related merge requests found
......@@ -23,6 +23,11 @@ __fastcall TPreviewForm::TPreviewForm(TComponent* Owner)
Terminal->AutoWrap=true;
ActiveControl=Terminal;
}
//---------------------------------------------------------------------------
__fastcall TPreviewForm::~TPreviewForm()
{
delete Terminal;
}
#define ANSI_ESC "\x1b["
......
......@@ -16,6 +16,7 @@ __published: // IDE-managed Components
private: // User declarations
public: // User declarations
__fastcall TPreviewForm(TComponent* Owner);
__fastcall ~TPreviewForm();
TEmulVT* Terminal;
AnsiString Filename;
};
......
......@@ -61,6 +61,11 @@ __fastcall TSpyForm::TSpyForm(TComponent* Owner)
ActiveControl=Terminal;
}
//---------------------------------------------------------------------------
TSpyForm::~TSpyForm()
{
delete Terminal;
}
//---------------------------------------------------------------------------
int __fastcall TSpyForm::strip_telnet(uchar *buf, int len)
{
int i;
......
......@@ -80,6 +80,7 @@ public: // User declarations
RingBuf** inbuf;
RingBuf** outbuf;
__fastcall TSpyForm(TComponent* Owner);
__fastcall ~TSpyForm();
};
//---------------------------------------------------------------------------
extern PACKAGE TSpyForm *SpyForms[];
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment