Code-Test

代码着色测试

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

转载于:https://www.cnblogs.com/delphi-program/archive/2009/06/19/1506575.html