Delphi如何实现读取其他正在运行的程序中变量的值

Delphi如何实现读取其他正在运行的程序中变量的值?就如,unit1中,变量s:string;的值是'input.exe',那我如何在unit2中读取它的值?
use unit1;

然后建一个兄租歼属性,设好型好read write
再在unit2中用 Unit1的Form名称,比方说form1.属性来读羡冲取
设为公共变量

var
s:string;
implementation