The Wiert Corner – irregular stream of stuff

I stumbled over this commit message in [WayBack] “extended the TestAttribute with “Expected” property (#181)” which isn’t phrased correctly, but adds a very nice feature.

The feature is about WillRaiseAttribute:

constructor WillRaiseAttribute.Create(AExpectedException: ExceptClass; const AInheritance: TExceptionInheritance);

This allows tests like these:

    [WillRaise(EOutOfMemory)]
    procedure FailMe;

    [WillRaise(EHeapException, exDescendant)]
    procedure FailMeToo;

    [WillRaise(Exception, exDescendant)]
    procedure FailAny;

    [WillRaise(EOutOfMemory)]
    [Ignore('I am not behaving as I should')]
    procedure IgnoreMeCauseImWrong;

–jeroen

A while ago, I needed several enum types in the same unit with overlapping enumeration values.

Putting each in an encompassing type wasn’t possible and I didn’t want to put each in their own unit.

Luckily, Delphi 2009 introduced the “scoped enum” feature effectively promoting the enumeration type into a scope or namespace.

It is only available at the source code level, as – at least up until Delphi 10.1 Berlin – it is not part of the compiler settings in the project options (see screenshot below).

Since the below was hard to find combined with the word “namespace” I’ve quoted it in full (note an earlier version of the post had a typo here as it was copied from the Delphi 2009 documentation which had SCOPEDEUNMS wrong):

Type	Switch
Syntax	{$SCOPEDENUMS ON}, or {$SCOPEDENUMS OFF}
Default	{$SCOPEDENUMS OFF}
Scope	Local

Remarks

The $SCOPEDENUMS directive enables or disables the use of scoped enumerations in Delphi code. More specifically, $SCOPEDENUMS affects only definitions of new enumerations, and only controls the addition of the enumeration’s value symbols to the global scope.

In the {$SCOPEDENUMS ON} state, enumerations are scoped, and enum values are not added to the global scope. To specify a member of a scoped enum, you must include the type of the enum. For example:

type
  TFoo = (A, B, Foo);
  {$SCOPEDENUMS ON}
  TBar = (A, B, Bar);
  {$SCOPEDENUMS OFF}

begin
  WriteLn(Integer(Foo)); 
  WriteLn(Integer(A)); // TFoo.A
  WriteLn(Integer(TBar.B));
  WriteLn(Integer(TBar.Bar));
  WriteLn(Integer(Bar)); // Error
end;

Note that this is also valid:

 Writeln(Integer(TFoo.A));

Even though TFoo was not declared with $SCOPEDENUMS ON, the A value can still be explicitly resolved using the enumeration name.

Read the rest of this entry »

As G+ refused to put this in a comment at [WayBack] Does anybody know whether the Embarcadero blogs have got individual RSS feeds? And what’s the URL of the RSS feed for all blogs? … – Thomas Mueller (dummzeuch) – Google+:

No RSS logo is visible for me on the blog pages, but inspecting the source reveals the 404 link below; deducting from that I got 200 results:

• 200: https://community.embarcadero.com/blogs/tags/tag/delphi?format=feed&type=rss
• 200: https://community.embarcadero.com/blogs/tags/tag?format=feed&type=rss
• 200: https://community.embarcadero.com/blogs/tags?format=feed&type=rss
• 200: https://community.embarcadero.com/blogs?format=feed&type=rss
• 200: https://community.embarcadero.com?format=feed&type=rss
• 200: https://community.embarcadero.com/blogs/blogger/listings/haruyuki-m23657?format=feed&type=rss
• 200: https://community.embarcadero.com/blogs/blogger/listings?format=feed&type=rss
• 200: https://community.embarcadero.com/blogs/blogger?format=feed&type=rss
• 200: https://community.embarcadero.com/article/news?format=feed&type=rss
• 200: https://community.embarcadero.com/article?format=feed&type=rss
• 200: https://community.embarcadero.com/answers?format=feed&type=rss

What doesn’t work for RSS (CC +Marco Cantù) as you get 404:

• events
• individual questions
• individual blog posts

Failure examples:

• no RSS: https://community.embarcadero.com/all-events?format=feed&type=rss
• 404: https://community.embarcadero.com/answers/problem-with-form-height-in-ide?format=feed&type=rss
• 404: https://community.embarcadero.com/blogs/entry/cpp-japan?format=feed&type=rss

–jeroen

Read the rest of this entry »