Delphi IDE 類完成：自動生成屬性讀寫代碼

操作演示

1. 在 type 區輸入類骨架：

type
  TMyClass = class
    property s: string;
  end;

2. 光標置於類內部，按 Ctrl+Shift+C (類完成)。

自動生成結果

type
  TMyClass = class
  private
    Fs: string;
    procedure Sets(const Value: string);
  published
    property s: string read Fs write Sets;
  end;

{ TMyClass }

procedure TMyClass.Sets(const Value: string);
begin
  Fs := Value;
end;

生成規則

• 字段名 = F + 屬性名 (首字母大寫)。
• 寫方法名 = Set + 屬性名 (首字母大寫)。
• 讀直接用字段，寫用方法 (可擴展驗證邏輯)。
• 屬性放入 published 區 (可見於 Object Inspector)。

適用場景

• 快速定義組件屬性。
• 批量添加屬性時保持命名一致性。
• 減少樣板代碼輸入錯誤。