Тест 2

тестируем сообщение 2

авпвыпвап
вфпвфпвп

type
  TMyClass = class(TObject)
  private
    FMyInt: Integer;
    FMyStr: string;
    FMyBool: boolean;     
  public
    //тест подсветки синтаксиса 
    property MyInt: integer read FMyInt write SetMyInt;
    ...
  end;

Тестируем блог

Мое первое тестовое сообщение