Unverständliche CASE-Anweisung

[Daniel]

Moin,

manchmal weiß man nicht, warum es geht. Aber es geht - zumindest unter Delphi 2007:

Delphi-Quellcode:

program Project4;
{$APPTYPE CONSOLE}
uses
  SysUtils;

var myValue : integer;
     myText : string;
begin
   myValue:= 0;
   case myValue of
      1 : myText:= FormatFloat( '0.00', 4711.123 / 100 );
      2 : myText:= FormatFloat( '0.00', 4711.456 /  60 );
      else '';  /// <-- wat? wer bist DU denn?
   end;
end.

Am Ende steht else ''; Keine Zuweisung - nichts. Und Delphi übersetzt den Code traumhaft schön und ist glücklich wie ein Schaf im Klee. Das sollte ich zwar auch sein, solange es geht - aber da stellt sich doch die Frage, was das da am Ende ist. Jemand eine Ahnung, aus welcher Ecke das kommen mag?