要保持Ada记录成员的固定内存地址，可以使用Ada中的'Address 标签。这个标签提供了记录成员的内存地址，可以通过将其赋值给一个指针变量来保持固定的内存地址。

下面是一个示例代码：

with Ada.Text_IO;

procedure Main is
   type My_Record is record
      Data : Integer;
   end record;

   type My_Record_Ptr is access all My_Record;

   -- 创建记录实例
   R : My_Record;
   -- 创建指向记录的指针变量
   Ptr : My_Record_Ptr := new My_Record'(Data => 0);

   -- 获取记录成员的固定内存地址
   Addr : System.Address := R'Address;

begin
   -- 将指针指向记录成员的固定内存地址
   Ptr := My_Record_Ptr(Addr);

   -- 在记录成员的固定内存地址上进行操作
   Ptr.Data := 42;

   Ada.Text_IO.Put_Line("Data: " & Integer'Image(R.Data));
end Main;

在上面的示例中，我们首先创建了一个名为My_Record的记录类型，其中包含一个整数类型的Data成员。然后我们创建了一个指向My_Record类型的指针变量Ptr，并使用new关键字分配了内存空间。

接下来，我们使用R'Address获取记录成员Data的固定内存地址，并将其赋值给Addr变量。然后，我们将指针变量Ptr重新指向Addr所指向的内存地址。

最后，我们通过Ptr指针变量对记录成员进行操作，将Data成员设置为42，并将结果打印到控制台上。

这样，我们就可以保持Ada记录成员的固定内存地址。