Moin Simor,
trenn' Dich mal davon boolsche Werte mit = zu prüfen.
Mach' mal aus visible = true einfach ein visible, und aus visible = false ein not visible.
z.B.
Delphi-Quellcode:
// aus
if ImSun.visible=True And ImMoon.visible=False then
// wird
if ImSun.visible And not ImMoon.visible then