gracias eduarcol
aun no se como pero lo voy a chekar lo cambie quedo como yo deseaba con objetos TDateTimePicker
Código Delphi
[-]
for i:= 1 to ina do begin
prueba := 'fecha_inasistencia'+inttostr (i);
dbTexto := FindComponent(prueba); if dbTexto is TDateTimePicker then ShowMessage(datetostr (TDateTimePicker(dbTexto).date));
gracias.....