Sei doch so gut und setze deinen Code in Delphi Tags, damit die Formatierung (sofern eine vorhanden) beibehalten bleibt. Das ist der Delphi-Helm in der Mitte von den Editor-Symbolen.
Dan sieht dein Quellcode nämlich so aus:
Delphi-Quellcode:
procedure TForm1.Testprocedure;
begin
ShowMessage('Delphi TagsTest');
end;