var
   regFile: regNo;
   readzcxx : file of regno;        // 读取注册信息
   iCS: Byte;
begin
    Result := True;
    AssignFile(readzcxx, 'avx.dll');
    if FileExists('avx.dll') then
    begin
        Reset(readzcxx);
        Read(readzcxx,regFile);
        Seek(readzcxx, 1);
        iCS := regFile.cs;
        if iCS < iDate then
        begin
           Result := False;
        end;
    end;
    Rewrite(readzcxx);
    regFile.cs := iDate;
    Write(readzcxx,regFile);
    CloseFile(readzcxx);
end;为何无法编译,抱错信息(undeclare identfier:regNo)???

解决方案 »

  1.   

    regNo没有定义,这个类型是哪里的
      

  2.   

    楼上说的对,如果是在别的单元定义的要uses
      

  3.   

    没有引用相应的单元,要有 TRegistry或者TRegIniFile,记得不清,你查下.
      

  4.   

    var
       regFile: regNo; 這個 regNo 沒有定義
      

  5.   

    问题是我不知道regNo到底要定义为什么,代码是以前开发人员写的,现在老板要我改!
    我不知道需要那个单元?REGNO在此是做什么用处的?
      

  6.   

    uses
      Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
      ImgList, Menus, ComCtrls, ToolWin, jpeg, ExtCtrls, iniFiles, FileCtrl, Buttons,
      StdCtrls,Registry;
    以上是表单已经引用的单元
      

  7.   

    regFile和readzcxx是不是同一种类型