Ohne Quelltext schwierig aber sowas in der Art?
Delphi-Quellcode:
procedure Translate(aComp: TComponent; compNbr: integer; Text: String);
var subComp: Tcomponent;
begin
subComp := aComp.Components[compNbr];
if subComp is TLabel then
TLabel(subComp).caption := text;
end;
Translate(Main.Workshop1.WorkshopDetail1, I, 'DeinText');
Nicht getestet!