Test number 1

This is a test.

function TMyObjct.HelloSyntaxHighlighter(const S : String);
begin
    WriteLn(S);
    if S < '' then
        WriteLn('Test');
end;

Please ignore.