Einzelnen Beitrag anzeigen

Benutzerbild von bitsetter
bitsetter

Registriert seit: 17. Jan 2007
1.169 Beiträge
 
Turbo Delphi für Win32
 
#6

Re: FindComponent formübergreifend verwenden

  Alt 17. Nov 2007, 17:15
Hi,

über
Delphi-Quellcode:
var
  i: integer;
begin
  for i:= 0 to application.ComponentCount- 1 do
    if application.Components[i] is TCustomForm then
      TCustomForm(application.Components[i]).FindComponent('...'))
kannst du die Formulare deiner Anwendung ansprechen.
Gruß bitsetter
"Viele Wege führen nach Rom"
Wolfgang Mocker (geb. 1954), dt. Satiriker und Aphoristiker
  Mit Zitat antworten Zitat