Einzelnen Beitrag anzeigen

Benutzerbild von Neutral General
Neutral General

Registriert seit: 16. Jan 2004
Ort: Bendorf
5.219 Beiträge
 
Delphi 10.2 Tokyo Professional
 
#6

Re: Anwendungsweite User-Message senden

  Alt 25. Mai 2007, 17:35
Hi,

Wie wärs mit einer verschachtelten for-Schleife?
Man kann davon ausgehen das alle "components" der application Formulare sind..normalerweise jedenfalls...

=>

Delphi-Quellcode:
for i:= 0 to Applications.Component.Count-1 do
 for j:= 0 to TForm(Apllication.Components[i]).Components.Count-1 do // kann sein das es auch Controls.Count heißt
   SendMessage((TForm(Apllication.Components[i]).Components[j] as TWincontrol).Handle,...,...);
Jedenfalls so ungefähr...

Gruß
Neutral General
Michael
"Programmers talk about software development on weekends, vacations, and over meals not because they lack imagination,
but because their imagination reveals worlds that others cannot see."
  Mit Zitat antworten Zitat