Ver Mensaje Individual
  #12  
Antiguo 15-06-2010
Avatar de rgstuamigo
rgstuamigo rgstuamigo is offline
Miembro
 
Registrado: jul 2008
Ubicación: Santa Cruz de la Sierra-Bolivia
Posts: 1.646
Reputación: 19
rgstuamigo Va por buen camino
Arrow

Cita:
Empezado por AzidRain Ver Mensaje
Gracias por el jalón de orejas Román, al final esto fue lo más compacto que pude hacer:

Código Delphi [-]
var   I: Integer; 
begin    
for I := 0 to ComponentCount - 1 do 
   Begin      
     If Components[i] is TcxDBTextEdit Then      
      TcxDBTextEdit(Components[i]).Text := '';   
   End;
Sería un poco mas eficiente si lo hicieras así :
Código Delphi [-]
var   I: Integer;
 begin    
for I := 0 to ControlCount - 1 do//Iteramos solo los controles  
  Begin      
  If Components[i] is TcxDBTextEdit Then 
    TcxDBTextEdit(Components[i]).Text := '';  
  End;
End;
Pues al trabajar con la propiedad ControlCount solo estamos iterando con todos los controles(componentes que son Controles) de nuestro formulario, en cambio si trabajamos con ComponentCount tambien estamos trabajando con todos los componentes del formulario ya sean controles o no, sean visuales en tiempo de ejecucion o no. He ahí la diferencia..
Saludos...
__________________
"Pedid, y se os dará; buscad, y hallaréis; llamad, y se os abrirá." Mt.7:7

Última edición por rgstuamigo fecha: 15-06-2010 a las 22:22:22.
Responder Con Cita