类定义的时候数据默认是public还是private?

Question

rt

Answer 1

public吧!
哎,都大半年没碰她了. 生疏了.

Answer 2

published
你去看看code explorer 的左边

Answer 3

TfrmMain = class(TForm)
    Button1: TButton;               <---- 是指这个位置吧。是public的。
    Memo1: TMemo;
    Button6: TButton;
    Button7: TButton;
    Button8: TButton;
    Memo2: TMemo;
    imgDraw: TImage;
    Button2: TButton;
    Memo3: TMemo;
    Image1: TImage;
    Timer1: TTimer;
    procedure Button1Click(Sender: TObject);
    procedure Button6Click(Sender: TObject);
    procedure Button7Click(Sender: TObject);
    procedure Button8Click(Sender: TObject);
    procedure Button2Click(Sender: TObject);
    procedure Timer1Timer(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

Answer 4

Td=class
  h:integer;//为什么在code explorer的左边显示的是在published呢
  end;

Answer 5

如果编译指令{$M}在on状态，那么是published，否则为private————————————————————————————————————
宠辱不惊，看庭前花开花落，去留无意；毁誉由人，望天上云卷云舒，聚散任风。
————————————————————————————————————

Answer 6

不好意思，写错了，{$M}在off状态应该是public而不是private。
至于
“published
你去看看code explorer 的左边”，不过是“code explorer”显示时的简化，其实有public和published之分。————————————————————————————————————
宠辱不惊，看庭前花开花落，去留无意；毁誉由人，望天上云卷云舒，聚散任风。
————————————————————————————————————