掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
コンポーネントの初期引数 (ID：12616)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
質問に対する解決になるかはわかりませんが， Ownerは文字どおりオーナーです．ヘルプで「 コンポーネントとオーナー」 「 親プロパティ」を調べると理解が深まるかも知れません． 以下は，引数であるOwnerの動作を調べる簡単なコードです． 新規プロジェクト(必ず新規です)に，LableとButtonを2つ配置します． このプログラムでは，Button1をクリックすると，OwnerがAFormである ボタンを作成します． ただし，親はForm1としているので，AButtonはForm1に表示されます． Button2をクリックすると，作成したAButtonのOwnerがいなくなりま すので，AButtonも消えてなくなります． また，Button1のOwnerをLabelに表示します． var AForm: TForm; AButton: TButton; procedure TForm1.Button1Click(Sender: TObject); begin Label1.Caption:=Button1.Owner.Name; AForm:=TForm.Create(Form1); AButton:=TButton.Create(AForm); AButton.Width:=150; AButton.Caption:='OwnerがAFormのボタン'; AButton.Parent:=Form1; end; procedure TForm1.Button2Click(Sender: TObject); begin AForm.Free; AForm:=nil; end;
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.