mehrere Elemente in einer Schleife bearbeiten

[Spectre]

Code:

procedure Tworldmapsource.FormCreate(Sender: TObject);
var i : integer;
begin
for i := 1 to 48 do
  THotSpot(FindComponent('Hotspots[i]')).HoverColor := clwhite;
hsiafrika.Loaded;
end;

complilieren kann ich den code so zwar, aber ich bekomme eine zugriffsverletzung wenn ich versuche zu starten