Wie stelle ich fest ob ein Control nur halb sichtbar ist?

[Delphi.Narium]

Ginge nicht auch

Delphi-Quellcode:

function TControlHelper.isClipped(): Boolean;
begin
  Result := Assigned(Parent) and Parent.ClientRect.Contains(BoundsRect);
end;

Ok, geht nicht, wenn boolsche Ausdrücke vollständig ausgewertet werden