Tienes dos partes en una unit: Interfaces e implemantation.
Ambas tienen una sección uses.
Deberás poner una en un uses de una parte y otra en la otra.
Código Delphi
[-]
unit UFMPrueba_A;
interface
uses
Windows, Classes, Forms;
type
TFMPrueba_A = class(TForm)
Boton: TButton;
...
private
public
end;
var
FMPrueba_A: TFMPrueba_A;
implementation
{$R *.DFM}
uses UPrueba_B;
...
------------------------------------------------------------
unit UFMPrueba_B;
interface
uses
Windows, Classes, Forms;
type
TFMPrueba_B = class(TForm)
...
private
public
procedure Evento(Sender: TObject);
end;
var
FMPrueba_B: TFMPrueba_B;
implementation
{$R *.DFM}
uses UPrueba_A;
procedure TFMPrueba_B.Evento(Sender: TObject);
begin
UFMPrueba_A.Boton.Enabled := False;
end;
...