Как я уже сказал, динамическое создание. Руки не отвалились еще настраивать 13 разных лейбелов? =) я так не могу...
По динамическому созданию полно статей, и в том числе на этом форуме. Однако повторю в очередной раз:
Код:
Var lbl: array[0..12] of TLabel;
...
//Создание:
for i:=0 to 12 do
begin
lbl[i]:=TLabel.Create({не помню, есть ли тут что, если есть, то Form1});
lbl[i].Parent:=Form1;
lbl[i].Top:=i*20;
lbl[i].Left:=0;
lbl[i].Caption:='123';
end;
...
//Меняем все:
for i:=0 to 12 do
begin
if lbl[i].Caption='Сдал' then
блаблаблаблаблабла...
end;