掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
EnumChildWindowsでTLabelを取得するには? (ID:45388)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
こういうことかな? 他のアプリの情報は取れないけど。 procedure TForm1.Button1Click(Sender: TObject); var i, Num: integer; begin Num := Self.ComponentCount; Label1.Caption := IntToStr(Num); for i := 0 to Num-1 do begin if Self.Components[i] is TLabel then begin ListBox1.Items.Add(Self.Components[i].Name + '/' + (Self.Components[i] as Label).Caption); end; end; end; Selfの部分を他のフォーム(例えばForm2)にすれば、そのフォームの情報が取れます。
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.