在Delphi中定义其他单元的类型

Question

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

Begin
    A := B;

不会起作用,因为loren-pechtel 在这里说 问题是A和B对我来说是不同的单位.那么,有没有办法从另一个类中的现有类型定义类型定义？

Answer 1

在某个单元的接口块中定义类型,然后uses在需要该类型的其他单元中包含该单元via 子句.

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

...

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

unit B;
interface
uses A;

...
var x : TMyArray;

Answer 2

或者,在单元C的接口部分定义您的类型,并在A和B中使用该单元.