Hintergrundfarbe einer Unit über einen andere Unit ändern

[himitsu]

Zitat:

Delphi-Quellcode:

procedure TForm1.Button5Click(Sender: TObject);
begin
  Unit1.Form1.Color := clFarbe;
end;

Ist dennoch höchst problematisch.

Wenn es von Form1 mehrere Instanzen gibt, oder wenn die Form nicht automatisch erzeugt wurde (die Instanz nicht in der globalen Variable gespeichter wurde),
dann kann Unit1.Form1 sonstwas sein, nur nicht die Form selber (Self). Im Schlimmsten Fall ein NIL oder gar ein ungültiger Zeiger.