[dec]

Hola,

Puedes probar con la propiedad "ComponentState" del tipo:

Código Delphi [-]
  TComponentState = set of (csLoading, csReading, csWriting, csDestroying,
    csDesigning, csAncestor, csUpdating, csFixups, csFreeNotification,
    csInline, csDesignInstance);

Normalmente sueles ver por ahí código como el que sigue, por ejemplo:

Código Delphi [-]
  if not (csDesigning in ComponentState) then
  begin
    // Estamos en tiempo de ejecución
  end;