delphi - 从 Delphi 中的其他单元定义类型

Question

Var
     A : Array [1..4] of Integer;
     B : Array [1..4] of Integer;

Begin
    A := B;

不会像 loren-pechtel 所说的那样工作 here问题是A和B对我来说是在不同的单位。那么，有没有一种方法可以从另一个类中的现有类型定义类型定义呢？

Answer 1

在某些单元的接口(interface) block 中定义类型，然后通过 uses 子句将该单元包含在需要该类型的其他单元中。

unit A;
interface
type
  TMyArray = array [1..4] of Integer;

...

当您需要在另一个单元中使用TMyArray时:

unit B;
interface
uses A;

...
var x : TMyArray;