Показать сообщение отдельно
  #1  
Старый 26.01.2018, 23:24
Olstgel Olstgel вне форума
Прохожий
 
Регистрация: 16.12.2017
Сообщения: 9
Версия Delphi: Delphi 7
Репутация: 10
По умолчанию Несовместимые типы: 'byte' and 'Array'

Если указываю tmpBinar: byte, то получаю в ответ 1 байт, но в buf висит 35 байт. Если пробую tmpBinar представить как массив, то получаю ошибку "Несовместимые типы: 'byte' and 'Array'".


Код:
implementation
Function _Binar (var buf: byte; var buflen: longint; txt: pchar) : Integer; stdcall; external 'abc.dll';


Function Binar(var bufbin : string; var buflen : longint; pos : pchar) : Integer; 
 var
      tmpBinar :   array [0..255] of byte  ; 
      n : Integer;
begin
    
    result := _Binar (tmpBinar, n, pos);

end;

PS/
Поторопился. Вопрос решился так: type DbyteArr=array of byte;
Ответить с цитированием