Eure besten Quellcode Kommentare...

[himitsu]

Delphi-Quellcode:

{ *********************************************************************** }
{                                                                         }
{ Delphi DBX Framework                                                    }
{                                                                         }
{ Copyright(c) 1995-2010 Embarcadero Technologies, Inc.                   }
{                                                                         }
{ *********************************************************************** }

unit DBXJSON;

...

class function TJSONString.Hex(const Digit: Integer): Byte;
var
  HexData: TBytes;
begin
  SetLength(HexData,16);
  HexData[0] := Ord('0');
  HexData[1] := Ord('1');
  HexData[2] := Ord('2');
  HexData[3] := Ord('3');
  HexData[4] := Ord('4');
  HexData[5] := Ord('5');
  HexData[6] := Ord('6');
  HexData[7] := Ord('7');
  HexData[8] := Ord('8');
  HexData[9] := Ord('9');
  HexData[10] := Ord('A');
  HexData[11] := Ord('B');
  HexData[12] := Ord('C');
  HexData[13] := Ord('D');
  HexData[14] := Ord('E');
  HexData[15] := Ord('F');
  Result := HexData[Digit];
end;

Kein Kommentar ist auch ein Kommentar ... bzw. das ist kommentarlos schon schlimm genug.

Wobei man hätte gern noch kommentieren können, was beim Aufruf von TJSONString.Hex(12345) passieren könnte.