1、请问我要改变X3的登录界面,是修改 系统空间>简洁风格>界面库>窗体库>系统登录对话框 这个功能界面吧?
2、不能成功编译 系统空间>简洁风格>界面库>窗体库>系统登录对话框 ,编译错误:
[警告] 循环引用: "Biz:\SYSTEM\COMPACTSTYLE\UILIBRARYFOLDER\FORMLIBRARY.LIBRARY"-->"Biz:\COLLABORATION\DOC\DOCINFO.INFO"-->"Biz:\COLLABORATION\DOC\DOCINFO.INFO"
[警告] 循环引用: "Biz:\SYSTEM\COMPACTSTYLE\UILIBRARYFOLDER\FORMLIBRARY.LIBRARY"-->"Biz:\COLLABORATION\DOC\DOCRELEVANCYFOLDER\DOCRELEVANCYINFO.INFO"-->"Biz:\COLLABORATION\DOC\DOCINFO.INFO"-->"Biz:\COLLABORATION\DOC\DOCINFO.INFO"
[警告] 循环引用: "Biz:\SYSTEM\COMPACTSTYLE\UILIBRARYFOLDER\FORMLIBRARY.LIBRARY"-->"Biz:\COLLABORATION\DOC\DOCRELEVANCYFOLDER\DOCRELEVANCYINFO.INFO"-->"Biz:\COLLABORATION\DOC\DOCRELEVANCYFOLDER\DOCRELEVANCYINFO.INFO"
[错误]Biz:\SYSTEM\COMPACTSTYLE\UILIBRARYFOLDER\FORMLIBRARY.LIBRARY.DIR\STANDARDSTYLEMAINFORM.FORM.PAS(1127, 25): Undeclared identifier "FixPopupMenu"
[错误]Biz:\SYSTEM\COMPACTSTYLE\UILIBRARYFOLDER\FORMLIBRARY.LIBRARY.DIR\STANDARDSTYLEMAINFORM.FORM.PAS(1150, 27): Undeclared identifier "RelevancyPopupMenu"
[错误]Biz:\SYSTEM\COMPACTSTYLE\UILIBRARYFOLDER\FORMLIBRARY.LIBRARY.DIR\STANDARDSTYLEMAINFORM.FORM.PAS(1151, 27): Undeclared identifier "OnRelevancyPopuMenuPopup"
光标行定位在:
procedure TSTANDARDSTYLEMAINFORM.DoRelevancyPopuMenuPopup(Sender: TObject);
begin
if Sender is TPopupMenu then
begin
miNew.Visible := True;
miNewSpec.Visible := True;
FDocRelevancyNavBar.FixPopupMenu(Sender as TPopupMenu, miNew); //编译错误行位置 在此
miNew.Visible := miNew.Count > 0;
miNewSpec.Visible := miNew.Visible;
end;
end; |