Переобъявление???

[Zer]

Вот строка:

Код: Выделить всё

            Params.VspomParam.Ugol(CommandNow(3) And 3) = (Asc(Mid$(CommandOut, 4, 1)) * 256) + Asc(Mid$(CommandOut, 3, 1))


Тип Params.VspomParam.Ugol(CommandNow(3) And 3) объявлен заранее как Long. При Asc(Mid$(CommandOut, 4, 1))=255 вылетает с Overflow Что за ерунда?? Он что-ли Params.VspomParam.Ugol(CommandNow(3) And 3) переопределяет в Byte???

[tyomitch]

Попробуй так:

Код: Выделить всё

Params.VspomParam.Ugol(CommandNow(3) And 3) = (CLng(Asc(Mid$(CommandOut, 4, 1))) * 256) + Asc(Mid$(CommandOut, 3, 1))


[Zer]

Да это-то понятно... Таким-же макаром можно (asc(...)*65536)/256... В обоих случаях результат Long. А как сделать, чтобы без этого, а просто помещал енто значение куда надо...??? А то придется половину программы переделывать...

[tyomitch]

Ты не понял, в чём дело... Функция Asc возвращает Integer, ты его умножаешь на 256 -> происходит переполнение. Тип того, куда это кладётся, тут не при чём.

Если хочешь, замени во всём проекте 256 на 256& - тоже должно помочь.

[Zer]

Ок. Спасибо. Это пожалуй попроще...

[alibek]

Пиши не 256, а 256& и будет тебе щастье.

[Zer]

Во имя овса и сена и свинного уха. Аврал!
Но уж всегда писать 256& - это уж слишком...

[alibek]

Почему же?
Мне не лень, немного дополнительных движений, зато подобных глюков больше не бывает.

[Zer]

Но ведь в первом случае проводятся операции с integer а во втором с long. На скорость повлияет... Хотя ето-ж x32. Может и пофиг... Но на 16-ти разрядном разница приличная...