掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
プロパティの．． (ID:7026)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
私の環境(Delphi7Pro)では、以下の記述でエラーなく貼り付けられます。 type TTestCtrl = class(TWinControl) private { Private 宣言 } FOrgWidth: Integer; procedure SWidth(Value: Integer); function GWidth: Integer; protected { Protected 宣言 } public { Public 宣言 } constructor Create(AOwner: TComponent); override; published { Published 宣言 } property Width: Integer read GWidth write SWidth; end; constructor TTestCtrl.Create(AOwner: TComponent); begin inherited Create(AOwner); FOrgWidth := 100; end; procedure TTestCtrl.SWidth(Value: Integer); begin FOrgWidth := Value; end; function TTestCtrl.GWidth: Integer; begin Result := FOrgWidth; end; 別の場所に問題があるのだと思います。
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.