День добрый. Появились новые марки. Сканер настроен как USB клавиатура, а не ком. Следовательно нужен MCR алгоритм.

В MCR алгоритме для PDF417 есть распознание его по длинне символов, и добавления префикса. Вот нужен данный префикс.

ПРИМЕР 417!
function MCR1110040(DeviceSignal: Integer; DeviceIdent: Integer; var Parameter: String): Boolean;
begin
Result := Length(Parameter) = 68;
if Result then
Parameter := '{40BBB147-F861-4429-A5EC-C23F3A65A317};' + Parameter;
end;