Проблемы с записью данных в базу

[Serval]

База MSSQL Server 2000 или 2005
запросы пишу на ADO

нужно записать данные типа в поле с типом данных varbinary

  TPkt = array[0..100] of Byte;

в поле с типом данных varbinary (255)

делаю запрос

  with ADOSend do
    try
       if not Active then
        close;
          Open;
        Insert;
        FieldByName('ComputerName').AsString := MyGetComputerName;
        FieldByName('Packet').SetData(@pkt); //вот в этой строке проблема
        Post;
    except
    end;

выдает ошибку Access violation
подскажите где я тупанул - или подскажите как этот массив байтовый туда запихать.

[Stilet]

А эта pkt она вообще как описана?
И кста может тебе так попробовать:

  FieldByName('Packet').AsString:=string(pkt)

Иногда такие приведения типов срабатывают.

[Serval]

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

А эта pkt она вообще как описана?
И кста может тебе так попробовать:

  FieldByName('Packet').AsString:=string(pkt)

Иногда такие приведения типов срабатывают.

несработало - Invalid typecast

TPkt = array[0..100] of Byte;
....
pkt:TPkt

это массив байтов.

[Stilet]

несработало

А так:?

var s:string;
begin
 setlength(s,100);
 move(s[1],pkt,100);
  FieldByName('Packet').AsString:=s;
end.

[Serval]

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

А так:?

var s:string;
begin
 setlength(s,100);
 move(s[1],pkt,100);
  FieldByName('Packet').AsString:=s;
end.

таким образом записывает... но как-то нетак - в базе данные уже не в том виде получаются - искажает это преобразование их - преобразовывать пакет в строку пробовал - ничего хорошего