delphi - 別のユニットからプロシージャを実行するにはどうすればよいですか？

Question

さて、この種のn00bの質問ですが、それでも理解できません。main手順のあるユニットがありますDiscard()。今、私は別のユニットを持っており、それからユニットのengine手順を実行したいと思います。のセクションにメインがあります。プロシージャを呼び出そうとしましたが、うまくいきませんでした。私は何が間違っているのですか？Discard()mainusesengine.pasmain.Discard()

Answer 1

次のように、プロシージャの署名をインターフェイスに配置する必要があります。

unit main;

interface

procedure Discard();

implementation

procedure Discard();
begin
//do whatever
end;

他のユニットは、インターフェースセクションにリストされているものだけを「見る」ことができます。

Answer 2

ユニット「メイン」では、「インターフェース」セクションで破棄を宣言します。

unit Main;

interface

uses ...

procedure Discard (...); // only the declaration, not the entire procedure

implementation

... // code

ユニット「エンジン」で、「用途」セクションに「メイン」を追加します。

uses Main, ...

以上で、今すぐお電話いただけますDiscard(...)。複数ある場合は、を使用して明示的にこれDiscard()を呼び出すことができます。 Discard()Main.Discard()