变量在哪里声明好？

Question

有2个unit  unit1和unit2
unit1 有几个变量   szID,szName,szSex,szColumns1,szColumns2,szColumns3:String;
unit2要用到这几个变量  这几个变量要在unit1的哪个地方声明unit2才能访问的到啊？

Answer 1

interface
implementation 之间

Answer 2

var
  frmAdd: TfrmAdd;
  szID,szName,szSex,szColumns1,szColumns2,szColumns3:String;implementation然后unit2用File->use unit 引用unit1  可是还是访问不到啊

Answer 3

做成属性,然后在unit2直接给它赋值.
unit unit1;interfaceuses
  Windows,....;type
  Tform1 = class(TForm)
    .....
 private
  TszID,TszName,TszSex,TszColumns1,TszColumns2,TszColumns3:String;
  ...
 public
    { Public declarations }
    published
    property szID:string read TszID write TszID;
    ....

Answer 4

做成属性,然后在Unit2中就可以直接给其赋值了.unit unit1;interfaceuses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  StdCtrls, ExtCtrls, Buttons, Db, DBTables, Menus;type
  Tform1 = class(TForm)
    Edit1: TEdit;
    ....
    procedure FormCreate(Sender: TObject);  private
    FszID,FszName,FszSex,FszColumns1,FszColumns2,FszColumns3:String;
    .....    { Private declarations }
  public
    { Public declarations }
    published
     property szID:string read FszIDwrite FszID;
     ....
  end;

Answer 5

property szID:string read FszID write FszID;
write 跟FszID之间的空格掉了.