Add(MainForm,2953706,84,91)
{
}
Add(InlineCode,3810294,84,140)
{
 Code=#15:unit HiAsmUnit;|0:|9:interface|0:|21:uses kol,Share,Debug;|0:|4:type|28: THiAsmClass = class(TDebug)|10:   private|0:|9:   public|0:|5: end;|1: |6:type  |54:   TMyProc1 = procedure (var dt: TMyRecord) of object;|54:   TMyProc2 = procedure (var dt: TMyRecord) of object;|4:    |19: TMyRecord = record|14:   i: integer;|13:   s: string;|21:   MyProc1: TMyProc1;|21:   MyProc2: TMyProc1;|16:   Chk: boolean;|7: end;  |24: PMyRecord = ^TMyRecord;|1: |1: |57:// вопрос такой: как скормить это компилятору правильно? |68:// Может есть какие директивы для компилятора либо трюк какой есть? |72:// требуется именно MyProc1: TMyProc1; а не указатель MyProc1: PMyProc1;|35:// в этом собственно и загвоздка :(|0:|3:   |14:implementation|0:|4:end.|
}