TImage Objekt als Sender nutzen

[Nightblade]

Das verstehe ich leider nicht. Ich bin blutigster Anfänger was Delphi angeht.
Image sollte tatsächlich ein Bild sein, da durch den Befehl nur alle TImages unsichtbar gemacht werden sollen. Ohne jedesmal xxx.visible:= false; etc. einzutragen.

Wo genau soll ich

Code:

TImage(Controls[i]).Visible := Controls[i] = Image;

noch eintragen.

Hab´s jetzt mal so probiert:

Delphi-Quellcode:

procedure TLeitern.LeiterauswahlChange(Sender: TObject);
var ShowImageHideOther:timage;
begin
  if Sender is TImage(Controls[i]).Visible := Controls[i] = Image; then
BEGIN
ShowImageHideOther:= TImage(Controls[i]).Visible := Controls[i] = Image;(Sender);
END;
leiterauswahl.OnChange := ShowImageHideOther;
{Also hinter jedes TImage den Befehl dahinter geschrieben.}

Jetzt kommt fehlermeldung:
[Error] Leiter.pas(367): Undeclared identifier: 'Image'
[Error] Leiter.pas(369): Incompatible types
[Error] Leiter.pas(371): Incompatible types: 'TNotifyEvent' and 'TImage'
[Hint] Leiter.pas(99): Private symbol 'ShowImageHideOther' declared but never used

Ich will doch bloss alle Bilder verschwinden lassen.