我查资料只看到一个:“该方法的窗体只允许类方法”,没有详细说明
哪位大虾能给我详细解释一下???

解决方案 »

  1.   

    定义是这样的:
    function TDataModule4.IsMutiClass(const Vocable: string; var CXToken,
      CX: string; var CXCount: Integer; ConvCX: Boolean = True): Boolean;
    begin
      Result := False;
      with tMutiCls do//是个表
      begin
        if Active then
          if Locate('Word',Vocable,[]) then
          begin
            CXToken := FieldByName('Flag').AsString;
            if ConvCX then CX := GetClasses(CXToken,CXCount);
            Result := True;
          end;
      end;
    end;
    用if TDataModule4.IsMutiClass(voc, cxToken, CX, CXCount) then
    调用,编译到这句就报错,有什么问题吗?
      

  2.   

    不是这样调用呀!
    用if DataModule4.IsMutiClass(voc, cxToken, CX, CXCount) then