コーディングが正しいかどうかわからないので、間違っている場合は修正してください。画像を持つカスタム コンポーネントがあります。
CustomPic = class(TPanel)
private
Image : TImage;
public
constructor Create(AOwner: TComponent); override;
....
end;
私のコンストラクタでは、次のことを行います。
constructor CustomPic.Create(AOwner: TComponent);
begin
Image := TImage.Create(Self);
Image.Parent := Self;
AddObject(Image);
end
これはすべてうまくいきます。ただし、カスタム コンポーネントをフォームに配置し、alt+F12 と alt+F12 を押してフォームに戻すと、フォームに余分な画像が表示されます。デストラクタに何かを実装する必要がありますか?