En el formulario que va a hacer la llamada en el evento OnClic de un botón llamas a la funcion x que está en el Form2.
En el Form1:
Código Delphi
[-]
implementation
uses Unit2;
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
begin
ShowMessage(form2.x)
end;
En el Form2:
Código Delphi
[-]type
TForm2 = class(TForm)
private
public
function x : string;
end;
var
Form2: TForm2;
implementation
{$R *.dfm}
function TForm2.x : string;
begin
x := 'Desde la otra forma'
end;
Espero que te sirva de algo