代码着色 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.

//

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