[xkor]

Сообщение от Maxno

кстати ниукого нету jcl и vjcl для Delphi 2007 CodeGear?

на их офф сайте есть)

Добавлено через 12 минут

PFixPck = ^TFixPck;
  TFixPck = packed record case Integer of
    0: (ch:    array[Word] of Char);
    1: (bt:    array[Word] of Byte);
    2: (size:  Word;
       id:    Byte;
       dbt:   array[0..65532] of Byte);
  end;