20 PMyRecord = ^TMyRecord;
24 TMyClass = class(TObject)
26 procedure DoSomething1(a, b, c: integer);
34 procedure TMyClass.DoSomething1(a, b, c: integer;
35 LongParameter1: TSomeLongParameter);
72 procedure TMyClass.Code;
82 writeln('TMyClass.Code ');