Duda con ComponentCout

[ecfisa]

Empezado por rgstuamigo

Pues yo no le veo diferencia, ya que en Delphi ambas formas son equivalente:

Hola.

Descomponiendo as en sus primitivas, sería:

Código Delphi [-]
  if Form.Component[i] is TcxTextEdit then
    TcxTextEdit(Form.Component[i]).Clear
  else
    raise EInvalidCast.Create('Tipo de conversión iválido');

Usando el ejemplo:

Código Delphi [-]
  if(Form.Controls[i] is TcxTextEdit) then
      (Form.Controls[i] as TcxTextEdit).Clear;

Y realizando un reemplazo por su equivalente queda:

Código Delphi [-]
  if Form.Component[i] is TcxTextEdit then
  { línea del as }
   if Form.Component[i] is TcxTextEdit then  // redundante...
     TcxTextEdit(Form.Component[i]).Clear
   else
    raise EInvalidCast.Create('Tipo de conversión iválido');

Saludos.