【结贴】急,未定义问题**

jianth2005

type
TProcID = (piCheckXSDevHandle, piConnectServers, piAddUserProc,
             piEnrollByPwdProc, piDelUserProc, piUnknowErr,
             piGetEnrolledFingers, piFPAuthenDlg, piFPIdentify);

使用时
function TTrustLink_General.GetErrRsn(aProcID: TProcID): string;
begin
  case aProcID of
    piAddUserProc : Result := CLRF + LoadStr(IDS_SUGGEST_ITEM)
                            + CLRF + LoadStr(IDS_DELETE_EXISTED_USER_ID)
                            + CLRF + LoadStr(IDS_ADD_USER_AGAIN);
    piDelUserProc : Result := CLRF + LoadStr(IDS_SUGGEST_ITEM)
                            + CLRF + LoadStr(IDS_CHECK_USER_ID);
    piConnectServers : Result := CLRF + LoadStr(IDS_SUGGEST_ITEM)
                            + CLRF + LoadStr(IDS_XSERVER_SHUT_DOWN)
                            + CLRF + LoadStr(IDS_XSERVER_RESTART)
                            + CLRF + LoadStr(IDS_CHECK_PRODUCT_ID)
                            + CLRF + LoadStr(IDS_CHECK_PORT_NUMBER);
    piCheckXSDevHandle : Result := CLRF + LoadStr(IDS_SUGGEST_ITEM)
                            + CLRF + LoadStr(IDS_MISSING_DLL)
                            + CLRF + LoadStr(IDS_CHECK_DLL_EXISTED);
    piEnrollByPwdProc : Result := CLRF + LoadStr(IDS_SUGGEST_ITEM)
                            + CLRF + LoadStr(IDS_ADD_ENROLL_FINGERS_AGAIN);
    piGetEnrolledFingers : Result  := CLRF + LoadStr(IDS_SUGGEST_ITEM)
                            + CLRF + LoadStr(IDS_CHECK_USER_EXIST)
                            + CLRF + LoadStr(IDS_IS_USER_FINGER_EXIST);
    piFPAuthenDlg : Result  := CLRF + LoadStr(IDS_SUGGEST_ITEM)
                            + CLRF + LoadStr(IDS_USE_VALID_ENROLL_FINGERS_AGAIN);
    piUnknowErr : Result := CLRF + LoadStr(IDS_SUGGEST_ITEM)
                            + LoadStr(IDS_CONTACT_VENDOR);
    piFPIdentify : Result := CLRF + LoadStr(IDS_SUGGEST_ITEM)
                            + CLRF + LoadStr(IDS_CHECK_USER_EXIST)
                            + CLRF + LoadStr(IDS_IS_USER_FINGER_EXIST);
  end;
end;
为什么提示 piAddUserProc 未定义?

lixy

TProcID .piAddUserProc

jianth2005

非常谢谢.
又出现新的问题
1.CLRF 未定义, 全部代码只有这出现CLRF,很奇怪. 这是别人写的DELPHI代码
2.IDS_SUGGEST_ITEM等LoadStr里的未定义,
--------------------------
[错误]Biz:\YWKJ\WJJ\TrustLink_General.Library.pas(297, 52): Undeclared identifier "IDS_LOAD_DLL_FAILED"
[错误]Biz:\YWKJ\WJJ\TrustLink_General.Library.pas(291, 10): Assertion failure (E:\DEVELOP\BUILD_MOSTNEW\TIB3\SRC_PROTECTED\COMMONLANGUAGE\ILCode\ILCode.pas, line 1209)
[错误]Biz:\YWKJ\WJJ\TrustLink_General.Library.pas(61, 14): 'TTrustLink_General.GetErrMsg' 方法声明了,但没有实现

3.
type
TInitAgent = procedure (ProductID: PChar; PacketType: Integer; HostName: PChar;
                                            Port: Integer; Persistent: Boolean);

InitAgent: TInitAgent;

procedure TTrustLink_General.BK_ConnectServers;
begin
  InitAgent(PChar(FProductID), 0 ,PChar(FHostName), FPort, False); //这里提示Missing operator or semicolon
end;

lixy

1，2  这个我没办法帮你看，自己看引用关系吧。
3，这个指针操作平台是不支持的。自己在其他语言里面完成，转成不是指针操作的函数，通过导入第三方控件方式调用。

jianth2005

谢谢

jianth2005

这个先结