Hola gersonmaba.
Si cxDBLC_Base, cxDBLC_Fac, ..., cxDBLC_ZZZ son del mismo tipo, podés evaluar la propiedad
ClassType:
Código Delphi
[-]
procedure TForm1.btnClassTypeClick(Sender: TObject);
var
i: Integer;
begin
for i:= ComponentCount - 1 downto 0 do
if Components[i].ClassType = TEdit then
TEdit(Components[i]).Text:= 'Nuevo Texto'; end;
Si son de diferentes tipos pero comparten una misma propiedad como por ejemplo
Caption, podrías hacer:
Código Delphi
[-]
uses TypInfo;
procedure TForm1.btnRTTIClick(Sender: TObject);
var
i: Integer;
PropInfo: PPropInfo;
begin
for i:= ComponentCount - 1 downto 0 do
begin
PropInfo:= GetPropInfo(Components[i], 'Caption');
if PropInfo <> nil then
SetStrProp(Components[i],PropInfo, ''); end;
end;
Usando esta última forma (RTTI), podés ir bastante más lejos que lo que hace este simple ejemplo.
Saludos.