Delphi Anwendungsweite User-Message senden

Thema durchsuchen

Ansicht

Themen-Optionen

Anwendungsweite User-Message senden

Ein Thema von Meta777 · begonnen am 24. Mai 2007 · letzter Beitrag vom 28. Mai 2007

Vorheriger Beitrag

Nächster Beitrag

Neutral General

Registriert seit: 16. Jan 2004
Ort: Bendorf
5.219 Beiträge

Delphi 10.2 Tokyo Professional

Re: Anwendungsweite User-Message senden

25. Mai 2007, 16:35

Hi,

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

=>

markieren

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."