Alle Controls auf einem Panel disablen?

[Jazzman_Marburg]

Hallo Gemeinde,
ich versuche gerade alle Controls auf einem Panel zu disablen -- das klappt auch gut, aber:
Die Controls sehen nicht ao aus, als ob sie disabeld seien (also nicht grau). Wenn ich hingegen zur Designzeit im Objektinspektor die Eigenschaft für z.B. eine CheckBox.Enabled auf False setze, dann sieht die CheckBox auch zur Laufzeit grau aus (für den User erkennbar nicht eingabebereit).

Damit setze ich für alle Controls auf einem Panel die Eigenschaft Enabled auf False:

Delphi-Quellcode:

procedure TForm1.DisablePanel(aPanel: TPanel);
var Teller : Integer;

begin
  For Teller := 0 to aPanel.ControlCount - 1 do
  begin
     aPanel.Controls[Teller].Enabled := False;
  end;
end;

Hat jemand vielleicht eine Erklärung für dieses Phänomen?

Danke & Gruß
Jazzman

[alfold]

Hi, Du kannst lediglich die Benutzung verhindern wenn der Parent, in diesem fall Dein Panel Enabled:= false ist. Das aussehen kann damit aber nicht verändert werden!
Die Eigenschaften der anderen Componenten bleiben davon unberührt

Du musst demzufolge alle Controls auf dem Parent selbst Enabled:= false setzen.

Gruss Alfold

[toms]

Zitat von Jazzman_Marburg:

Hat jemand vielleicht eine Erklärung für dieses Phänomen?

Funktioniert bei mir wie erwartet (unter Delphi 6 + XE getestet)

[Aphton]

Wie wär es, das ganze Panel zu disablen?

[alfold]

Zitat von toms:

Funktioniert bei mir wie erwartet (unter Delphi 6 + XE getestet)

Jo bei mir auch D7 E

Zitat von Aphton:

Wie wär es, das ganze Panel zu disablen?

Damit kannst Du nur die Benutzung der Componenten verhindern aber nicht das aussehen. Die For schleife muss er trotzdem durchlaufen

Gruss alfold

[Jazzman_Marburg]

Kommando zurück!

Ich hatte tatsächlich nur das unterste Träger-Panel dis-abled -- dass sich darüber noch weitere Panels befinden hatte ich nicht mehr so im Kopf. D.h. wenn man sich zum höchsten Panel durch-itteriert funktioniert alles bestens.

Sorry -- war blind.

Vielen Dank für Eure Hilfe

Gruß
Jazzman