lyfz_repos/经典版源码/lyfzClassicSoft/Script Files/FeatureEvents.rul

//#include "IpAddress.rul"  
//---------------------------------------------------------------------------
// The Installed event is sent after the feature 服务端
// is installed.
//---------------------------------------------------------------------------
export prototype Feature_Installed();
function Feature_Installed()  
string filename1;
string filename2; 
string szHostName;
string szHostIP;
BOOL bResult;
begin     
	filename1 = TARGETDIR + "\\服务端\\系统文件\\图片-红色风格\\背景-red.jpg";  
	filename2 = TARGETDIR + "\\服务端\\系统文件\\图片-红色风格\\背景.jpg";
	CopyFile(filename1,filename2); 
	DeleteFile(filename1);  
	
	filename1 = TARGETDIR + "\\服务端\\系统文件\\图片-红色风格\\标题-red.jpg";
	filename2 = TARGETDIR + "\\服务端\\系统文件\\图片-红色风格\\标题.jpg";    
	CopyFile(filename1,filename2); 
	DeleteFile(filename1);
	
	filename1 = TARGETDIR + "\\服务端\\系统文件\\图片-红色风格\\标题-red.psd";   
	filename2 = TARGETDIR + "\\服务端\\系统文件\\图片-红色风格\\标题.psd";
	CopyFile(filename1,filename2); 
	DeleteFile(filename1);
	
	filename1 = TARGETDIR + "\\服务端\\系统文件\\图片-红色风格\\欢迎-red.jpg"; 
	filename2 = TARGETDIR + "\\服务端\\系统文件\\图片-红色风格\\欢迎.jpg";
	CopyFile(filename1,filename2); 
	DeleteFile(filename1);
	
	filename1 = TARGETDIR + "\\服务端\\系统文件\\图片-红色风格\\欢迎-red.psd";   
	filename2 = TARGETDIR + "\\服务端\\系统文件\\图片-红色风格\\欢迎.psd";
	CopyFile(filename1,filename2); 
	DeleteFile(filename1);
	
	filename1 = TARGETDIR + "\\服务端\\系统文件\\图片-红色风格\\连接-red.jpg";  
	filename2 = TARGETDIR + "\\服务端\\系统文件\\图片-红色风格\\连接.jpg";
	CopyFile(filename1,filename2); 
	DeleteFile(filename1);
	
	filename1 = TARGETDIR + "\\服务端\\系统文件\\图片-红色风格\\连接-red.psd";    
	filename2 = TARGETDIR + "\\服务端\\系统文件\\图片-红色风格\\连接.psd";
	CopyFile(filename1,filename2); 
	DeleteFile(filename1);  
	                          
	// 获取计算机名;
	bResult = fGetIpAddress(szHostName, szHostIP);  
	if ( bResult == FALSE ) then
		return;
	endif;         
	
	// 修改配置文件; 
	filename1 = TARGETDIR + "\\服务端\\ServiceInfo.ini";
	filename2 = szHostName + "\\SQLEXPRESS";   
	WriteProfString(filename1,"DatabaseInfo","dbSource", filename2);
end;    

//---------------------------------------------------------------------------
// The Installed event is sent after the feature 客户端
// is installed.
//---------------------------------------------------------------------------
export prototype Feature1_Installed();
function Feature1_Installed()
string filename1;
string filename2;
begin     
	filename1 = TARGETDIR + "\\客户端\\图片-红色风格\\背景-red.jpg";  
	filename2 = TARGETDIR + "\\客户端\\图片-红色风格\\背景.jpg";
	CopyFile(filename1,filename2); 
	DeleteFile(filename1);  
	
	filename1 = TARGETDIR + "\\客户端\\图片-红色风格\\标题-red.jpg";
	filename2 = TARGETDIR + "\\客户端\\图片-红色风格\\标题.jpg";    
	CopyFile(filename1,filename2); 
	DeleteFile(filename1);
	
	filename1 = TARGETDIR + "\\客户端\\图片-红色风格\\标题-red.psd";   
	filename2 = TARGETDIR + "\\客户端\\图片-红色风格\\标题.psd";
	CopyFile(filename1,filename2); 
	DeleteFile(filename1);
	
	filename1 = TARGETDIR + "\\客户端\\图片-红色风格\\欢迎-red.jpg"; 
	filename2 = TARGETDIR + "\\客户端\\图片-红色风格\\欢迎.jpg";
	CopyFile(filename1,filename2); 
	DeleteFile(filename1);
	
	filename1 = TARGETDIR + "\\客户端\\图片-红色风格\\欢迎-red.psd";   
	filename2 = TARGETDIR + "\\客户端\\图片-红色风格\\欢迎.psd";
	CopyFile(filename1,filename2); 
	DeleteFile(filename1);
	
	filename1 = TARGETDIR + "\\客户端\\图片-红色风格\\连接-red.jpg";  
	filename2 = TARGETDIR + "\\客户端\\图片-红色风格\\连接.jpg";
	CopyFile(filename1,filename2); 
	DeleteFile(filename1);
	
	filename1 = TARGETDIR + "\\客户端\\图片-红色风格\\连接-red.psd";    
	filename2 = TARGETDIR + "\\客户端\\图片-红色风格\\连接.psd";
	CopyFile(filename1,filename2); 
	DeleteFile(filename1);
end;