Änderung der Eigenschaft "Visible" hat keine Auswirkung

[Whistler]

Vielen Dank für die Ausführung.
Nun wird mir so einiges klar :)

[sakura]

Zitat:

Zitat von dizzy

Ein Setzen von Visible:=false ist ja zunächst mal nur eine Änderung einer Variablen. Damit aber eine sichtbare Veränderung eintritt muss zusätzlich noch neugezeichnet werden, und das muss explizit veranlasst werden, da die Zuweisung an die Visible-Eigenschaft dies nicht für dich mit erledigt.

Stop! Das ist so nicht richtig. Wenn die Eigenschaft Visible einer Control gesetzt wird, so wird intern die Methode SetVisible aufgerufen.

Delphi-Quellcode:

procedure TControl.SetVisible(Value: Boolean);
begin
  if FVisible <> Value then
  begin
    VisibleChanging;
    FVisible := Value;
    Perform(CM_VISIBLECHANGED, Ord(Value), 0);
    RequestAlign;
  end;
end;

Diese sendet die Nachricht CM_VISIBLECHANGED (Zeile 7) an sich selbst, welche später durch die Methode CMVisibleChanged abgearbeitet wird.

Delphi-Quellcode:

procedure TControl.CMVisibleChanged(var Message: TMessage);
begin
  if not (csDesigning in ComponentState) or
    (csNoDesignVisible in ControlStyle) then
    InvalidateControl(True, FVisible and (csOpaque in ControlStyle));
end;

Damit zeichnet sich die Control sofort neu (oder halt versteckt sich und sagt den anderen sich neu zu zeichnen).

...:cat:...

[Whistler]

Angenommen du hast Recht, dann wäre es ein Widerspruch zu der Meinung deines Vorredners. Aber wenn du Recht hast, dann folgendes:

Zitat:

Damit zeichnet sich die Control sofort neu (oder halt versteckt sich und sagt den anderen sich neu zu zeichnen)

Denke es sagt "Bitte das PC-Element neu zeichnen", aber der Befehl wird in der Schlange eingereiht... denn nehme ich ja den Sprung zur nächsten Prozedur, die gleichzeitig ein anderes Panel sichtbar macht, raus, so sehe ich das nachdem der Balken gefüllt wurde, die Label-Elemente wie gewünscht verschwinden...

-> Also kein Widerspruch.

[dizzy]

Hast ja Recht :wall:

Aber halt via Message, und damit dann was passiert, muss die Messagequeue abgearbeitet werden. Soweit stimmte meins noch ;)