path: root/Master/texmf-dist/doc/latex/pygmentex/demo.delphi

procedure example(a: integer);
const
  A = 'jeja';
var
  sMessage: string;
begin
  ShowMessage(sMessage + A);
end;