Doing a a simple demo. Can anyone think of any other places an attribute can go?

Doing a a simple demo.  Can anyone think of any other places an attribute can go?

  [Sample]
  TAttributesEverywhere = class
  private
    [Sample] FSomeProperty: Extended;
    procedure SetSomeProperty(const Value: Extended);
  public
    [Sample]
    procedure DoThis([Sample]aParameter: string);
    [Sample]
    function DoThat([Sample]aParameter: TObject): integer;
    [Sample]
    property SomeProperty: Extended read FSomeProperty write SetSomeProperty;
  end;