掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
動的に作成したTabのキャプションを変更するには (ID：25427)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
動的に作成したTabをあとからcaptionを変更しようと思って 下記のようなプログラムを組んだのですが 変更されません。またエラーも出ないので困っています。 おかしいところありましたらご指摘ください。 よろしくお願いします。 procedure TForm1.FormCreate(Sender: TObject); var Tab1 : TTabSheet; begin Tab1 := TTabSheet.Create(PageControl1); Tab1.Parent := PageControl1; Tab1.PageControl := PageControl1; Tab1.Name := 'tab123'; Tab1.Caption := 'tab123'; end; procedure TForm1.chgCaptionClick(Sender: TObject); begin TTabSheet(FindComponent('tab123')).Caption := edit1.Text; end;
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.