掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
動的に生成したフォームへの値の渡し方 (ID:36058)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
> Subfrm(List(i)).Addpoint.... Subfrm(List[i]).AddPoint... これでうまくいくのではないかと思います。 こちらでテストした結果ではうまくいっています。 あと、Nameプロパティから特定するやり方としてFindCompoentを使う手もあります。 procedure TForm1.TESTClick(Sender: TObject); var i: Integer; l_Component: TComponent; begin for i := 0 to Application.ComponentCount-1 do begin l_Component := Application.FindComponent('Subfrm' + IntToStr(i)); if (l_Component is TSubfrm) then begin TSubfrm(l_Component).AddPoint(K-1, Random(100), clRed); //サブのAddPoint手続 end; end; end; 参考までに。
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.