Посылать данные в весы нужно в UTF-8 формате.
Можно использовать функцию типа такой:
function TBizerba.WStringToUTF8(const S: WideString): String;
var //преобразование ANSI to UTF-8
Len: Integer;
begin
Len := WideCharToMultiByte(CP_UTF8, 0, PWideChar(S), Length(S), nil, 0, nil, nil);
SetLength(Result, Len);
WideCharToMultiByte(CP_UTF8, 0, PWideChar(S), Length(S), PChar(Result), Len, nil, nil);
end;//function TBizerba.WStringToUTF8(const S: WideString): String;
Отправлять запись, используя сокет:
ClientSocket.Socket.SendText(WStringToUTF8(SendingText));//прогружаем очередную запись текущей таблицы