|
@@ -5,6 +5,7 @@ program Measure_Cloud;
|
|
|
uses
|
|
|
Windows,
|
|
|
ShareMem,
|
|
|
+ HttpApp,
|
|
|
Forms,
|
|
|
Controls,
|
|
|
MainFrm in '..\..\Forms\MainFrm.pas' {MainForm},
|
|
@@ -247,6 +248,9 @@ begin
|
|
|
|
|
|
{$IFDEF _mLoginNoPW}
|
|
|
sName := PHPWeb.GetNameFromURLProtocol(ParamStr(1));
|
|
|
+ if sName[1]= '%' then
|
|
|
+ sName:=UTF8Decode(HttpDecode(sName));
|
|
|
+
|
|
|
if sName = '' then // 表示手工运行的
|
|
|
begin
|
|
|
Application.MessageBox('请从 项目管理信息平台 打开软件。', '系统提示', MB_OK + MB_ICONINFORMATION);
|