Question

似乎UnitImport程序可能会在某些方面出现在cajScript / PascalScript的开发中，它可能会隐藏一些有助于理解如何实现PascalScript应用程序的细节。假设是这种情况或者你想在不使用导入程序的情况下编写PascalScript应用程序，那么如何将这样的类合并到脚本环境中？：

 TQuery = Class(TObject)
  private
    oSQL: TSQLQuery;
    FFirstCall: Boolean;
    function ExecSQL: Integer;
    function GetFields(iNdx: Integer): String;
    function GetFieldNames(iNdx: Integer): String;
    function GetFieldCount: Integer;
  public
    EOF: Boolean;
    Constructor Create(Owner: TComponent);
    Destructor Destroy;
    property FieldCount: Integer Read GetFieldCount;
    property FieldNames[iNdx: Integer]: String Read GetFieldNames;
    property Fields[iNdx: Integer]: String Read GetFields;
    procedure AddSQL(sSQL: String);
    procedure ExecSQL;
    function Fetch: Boolean;
  end;

我希望整理一些关于使用PascalScript的基本注释，这些注释可能会填补两个指令文档和新闻组留下的一些空白。

感谢您的帮助。

Answer 1

单位导入器工具运行良好，并且该类看起来不会给它带来任何麻烦。我要做的是通过导入器运行该类，并查看出来的导入代码。通过检查它，您可以看到一个好的类导入单元应该是什么样的，这将为您提供一个从您尝试学习类导入如何工作的起点。

没有单位导入器的Pascal脚本

1 个答案: