{%MainUnit unit1.pas}
type
  TMyClass = class
  end;


procedure Do1;
begin
end;