common_unit.pas

来自「经典原码」· PAS 代码 · 共 16 行

unit Common_Unit;

interface

Uses
  Classes,Forms,TFlatEditUnit;
var
  DataPath:String='';
  QS:String='0';
  //BH:String='';
  Share_JSHS,Share_BFHY:TForm;                //这句非常重要的
  Share_FE:TFlatEdit;
implementation

end.