Einzelnen Beitrag anzeigen

taaktaak

Registriert seit: 25. Okt 2007
Ort: Radbruch
1.990 Beiträge
 
Delphi 7 Professional
 
#3

Re: Botschaft an Frame senden

  Alt 6. Jan 2009, 16:22
Tja, hört sich gut an.

Habe jetzt mal ein wenig gelesen, und -offen gesagt- eigentlich so gut wie nichts verstanden. Das Grundprinzip ist zwar deutlich geworden, allerdings kann ich trotz Durchsicht der Hilfe leider keine praktischen Umsetzungsschritte daraus ableiten.

Ich wäre dankbar, wenn sich ein Helfer finden würde, der das Aufgezeigte etwas konkreter darstellen könnte.

// edit: Die ursprüngliche Frage habe ich jetzt selbst beantworten können; folgender Code sendet die Botschaft an alle Forms und alle Frames der Anwendung

Delphi-Quellcode:
with Application do
  for i:=0 to ComponentCount-1 do
    if Components[i] is TForm then begin
      PostMessage(TForm(Components[i]).Handle,WM_AFTER_CFGSAVED,0,0);
      for j:=0 to Components[i].ComponentCount-1 do
        if Components[i].Components[j] is TFrame then
          PostMessage(TFrame(Components[i].Components[j]).Handle,WM_AFTER_CFGSAVED,0,0);
      end;
Die "IInterfaceList" ist eine sehr interessante Anregung - vielen Dank an Michael für den Hinweis! Damit werde ich mich mal in Ruhe beschäftigen und ggf. einen neuen Thread aufmachen, wenn meine Verständnislosigkeit weiter anhält.
Ralph
  Mit Zitat antworten Zitat