代码着色 test

博客园如今不允许嵌入js，实数可惜，且着色和间距都不太理想，test~

//宋体 16
program Project1;
{$APPTYPE CONSOLE}
uses
  SysUtils;
begin
  try
    Writeln('Delphi');
    Readln;
  except
    on E:Exception do
      Writeln(E.Classname, ': ', E.Message);
  end;
end.

 

 

 //微软雅黑 16

program Project1;
{$APPTYPE CONSOLE}
uses
  SysUtils;
begin
  try
    Writeln('Delphi');
    Readln;
  except
    on E:Exception do
      Writeln(E.Classname, ': ', E.Message);
  end;
end.

 

//

?

1 2 3 4 5 6 7 8 9 10 11 12 13

program Project1; {$APPTYPE CONSOLE} uses   SysUtils; begin   try     Writeln('Delphi');     Readln;   except     on E:Exception do       Writeln(E.Classname, ': ', E.Message);   end; end.