0

より多くのパスカルの悩み。

MainUnit、 、および の2 つのユニットがあるとしExampleClassます。

本体：

Unit MainUnit;

interface

Uses ExampleClass;

function ReturnFive: Integer;

implementation

function ReturnFive: Integer;
begin
  ReturnFive := 5;
end;

begin
end.

例クラス:

Unit ExampleClass;

{$mode objfpc}

interface

type 
  ClassThing = Class
    SampleValue: Integer;
  end;


implementation

begin
end.

今、私はインポートのみをしたいのですMainUnitが、それでも使用できますClassThing。MainUnit uses ExampleClassですが、ClassThingインポート時には使用できませんMainUnit。

use ExampleClassと一緒にしたいMainUnitのではなく、1つのusesステートメントにまとめたいと思います。

これどうやってやるの？

4

1 に答える 1

1

置く

type ClassThing = ExampleCLass.ClassThing;

メインユニットのインターフェースで。

原則は const でも機能しますが、「実際の」もの (より初期化された変数である型付きのものではない) のみです。

const myconst = unitname.myconst;

頻繁に使用する型のほぼすべてが同様のエイリアスであるため、すべてのビジネスコード ユニットの uses 句を変更しなくても、それらが定義されている場所を簡単に移動できます。

于 2012-11-19T12:20:18.723 に答える