引言: 為什么我建的子類在write的procedure中的賦初值語句在對象建立時沒有執行?

moonflower 你好 因為[賦初值語句]你是放在write的procedure中,而不是放在子類的Create程序中,當然不會在建立時執行囉!!(以上純屬開玩笑,請勿見怪!) 這個問題，不知道你的程式是如何寫的，很難猜到耶!!可否貼上相關程式碼及說明？大家也比較好討論。 _______________________________________ <>深藍的魚，祝您好運..........連連

引言:

a = class
private
  FB: Integer
  procedure SetB(Value: Integer);
public 
  constructor Create;
  property B: Integer read FB write SetB;
end;    constructor a.Create;
begin
  FB := 0 //在這裡指定 Initial Value
end;    procedure a.SetB(Value: Integer);
begin
  FB := Value;
end;

var
  c: a;
begin
  c := a.Create;
  c.B = 100; // 在這裡會呼叫 SetB
end;