[Aristarh Dark]

Инициализируй свойство Tag, например.
Затем можно написать функцию которая вернет объект по его владельцу и Tag

Код:

function GetLabelByTag(AOwner:TComponent; ATag:Integer):TLabel;
var
  i: Integer;
begin
  Result:=nil;
  for i := 0 to AOwner.ComponentCount-1 do
    if (AOwner.Components[i] is TLabel) and ((AOwner.Components[i] as TLabel).Tag=ATag) then
      begin
        Result:=AOwner.Components[i] as TLabel;
        Exit;
      end;
end;

ЗЫЖ Не забывай проверять на nil значение возвращаемое функцией.