delphi工程中如何定义全局变量

新建一个公用单元，专门放置公用全局变量
unit untCommon;

interface

var
v1:integer;
v2:string;

end.
-----------------
unit unit1;

interface

uses
windows, ................, untCommon ; //在每个需要使用v1、v2变量的单元中引用上面那个单元untCommon就可以了