我在写vcl的时间
假如组件有  TSymbolChecker = class(TComponent)
  private
    { Private declarations }
    FActive: boolean;
    Fdata:integer;
    procedure SetActive(Value: boolean);
  published
    property Active: boolean read FActive write SetActive default false;
    property Data:integer read Fdata write Fdata;
  end;使用时
  设计期对两者都付值,
  但在运行期执行到SetActive 函数的时候,Fdata的值还没有被付上。
如果
  设计期对只对Fdata付值,
  在运行期对Active 付值,执行到SetActive 函数的时候,Fdata的值就已经付上  了。
请问怎么样才能:  
  设计期对两者都付值,
  在运行期执行到SetActive 函数的时候,Fdata的值也能被付上。就是说active 怎么样才能排到其它变量后付值?