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

　　

posted on 2020-02-27 09:03  滔Roy  阅读(141)  评论(0)  编辑  收藏  举报

导航