1

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;

2つの説明文書とニュースグループによって残されたギャップのいくつかを埋める可能性のあるPascalScriptの使用に関するいくつかの基本的なメモをまとめたいと思っています。

助けてくれてありがとう。

4

1 に答える 1

2

Unit Importerツールは非常にうまく機能し、そのクラスは問題を引き起こさないように見えます。私がすることは、インポーターを介してクラスを実行し、出てくるインポートコードを確認することです。それを調べることにより、優れたクラスインポートユニットがどのように見えるかを確認できます。これにより、クラスインポートがどのように機能するかを学習するための出発点が得られます。

于 2009-11-22T21:04:19.413 に答える