www.pudn.com > remoteavi.rar > Unit2.cpp

//--------------------------------------------------------------------- 
#include  
#pragma hdrstop 
 
#include "Unit2.h" 
//---------------------------------------------------------------------  
#pragma resource "*.dfm" 
TAboutBox *AboutBox; 
//---------------------------------------------------------------------  
__fastcall TAboutBox::TAboutBox(TComponent* AOwner) 
	: TForm(AOwner) 
{ 
} 
//--------------------------------------------------------------------- 
void __fastcall TAboutBox::OKButtonClick(TObject *Sender) 
{ 
AboutBox->Close() ; 
} 
//---------------------------------------------------------------------------