老问题，一个函数返回两个不同类型的值

Question

如题，比如function A(RecD：Array of Byte) 需要返回
一个bollean值和一个integer，
返回值怎么定义？怎么实现？ 
我只想到用全局变量解决这个问题.
分不多啊.查资料都觉得说不清楚.所以来提问..

Answer 1

你可以定义一个
type TReturnResult = record
  Flag: Boolean;
  Value: integer;
end;function A(RecD：Array of Byte) : TReturnResult;

Answer 2

不能用数组形式返回，或者你这样子
procedure A(RecD：Array of Byte; var Flag: Boolean; var Value: integer);
把结果放在参数里

Answer 3

请问自定义.类型 type
在代码哪个位置 定义？