In der IDE

[implementation]

Delphi-Quellcode:

if csDesigning in ComponentState then begin
  // ...
end;

TComponent hat eine Eigenschaft namens ComponentState, die dieses Flag mitaufnehmen kann.