Herzlich willkommen in der Delphi-PRAXiS, Spicker.
Das wichtige hat Flare ja schon geschrieben. Hier noch ein paar kleine Anmerkungen.
Delphi-Quellcode:
if an[1] then
with sg_Musik do
Cells[Col, Row] := 'super';
Zeichenketten-Literale bitte in einfachen Hochkommata, Zuweisungs- und Gleichheits-Operator nicht verwechseln und Col und Row sind Eigenschaften vom StringGrid. Das Ergebnis eines booleschen Ausdrucks (bei dir an[1]) muss übrigens nicht noch mit einem Literal verglichen werden.
Freundliche Grüße vom marabu