Com объект для работы с весами ТВ-М, 4D и другими, у кого в документации написано, что использован протокол №2 или протокол "Stndrt". Разница в протоколах очень простая - разная скорость порта и наличие функции запроса полного состояния. Так у весов на протоколе №2 скорость порта 4800 Бод, а STNDRT - 19200.
Исходный код компоненты не чищеный от мусора, но вполне компилируемый на Delphi 7.
Пример использования:
ЗагрузитьВнешнююКомпоненту("C:\massa\MassaK.Dll");
Объект = Новый("AddIn.MassaK");
Объект.НомерПорта = 1;
Объект.СкоростьПорта = 19200;
Предупреждение(Объект.ПолучитьВес());