Перевод числа и/или строки к Hex-формату

Есть задача, надо послать команду в сокет в Hex-формате:
SendCom(Chr(mID)+0h1800+0h010521+0h0), где
mID - сетевой адрес объекта (INT)
0h1800 - сама команда
0h010521 - параметр (дата выборки)
0h0 - дополнительный параметр
Если прямо вот так написать, то конечно же всё работает и всё супер, но проблемав том что параметр это дата (именно в таком виде), которую нужно менять и подставлять.
Напишу своё решение, которое работает:[code]
mMP ="0h"+Allt(Str(mMpN))
mYP ="0h"+Allt(Str(mYpN-2000))
mDay="0h"+Allt(Str(Day(mDataN)))[/code]
Дальше собираю в строку: mCom=Chr(mID)+0h1800+&mDay+&mMP+&mYP+0h0 и отправляю на выполнение.
Но уверен, что есть более изящное решение, не могу сообразить или оставить в таком виде?

Автор публикации

Пользователи не найдены
0
Оставить комментарий
Авторизация
*
*
Генерация пароля