一些常用系统API

##设置当前目录为运行目录

	TCHAR run_path[MAX_PATH] = { 0, };
	::GetModuleFileName(NULL, run_path, MAX_PATH);
	(_tcsrchr(run_path, '\\'))[1] = 0;
	::SetCurrentDirectory(run_path);