Гость
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / lnOffset = ctobin(substr(lcHead, 11, 4), '4RS') - Errors / 12 сообщений из 12, страница 1 из 1
16.11.2011, 05:49
    #37528452
Scorp1978
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
lnOffset = ctobin(substr(lcHead, 11, 4), '4RS') - Errors
Здраствуйте всем подскажите, VFP выдает ошибку на эту строку в чем может быть дело, ошибка Too many arguments. Подозреваю что нехватает какой нить DLL, но возможно и ошибаюсь.
...
Рейтинг: 0 / 0
16.11.2011, 08:33
    #37528512
IgorNG
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
lnOffset = ctobin(substr(lcHead, 11, 4), '4RS') - Errors
Scorp1978,

Скорее всего, ошибаешься.
На какой строке ошибка - это мы должны сами догадаться. В какую-то функцию передается больше аргументов, чем положено.
...
Рейтинг: 0 / 0
16.11.2011, 08:38
    #37528514
IgorNG
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
lnOffset = ctobin(substr(lcHead, 11, 4), '4RS') - Errors
IgorNG,

Не сразу увидел функцию в топике. Проверь, что в переменной lcHead
...
Рейтинг: 0 / 0
16.11.2011, 08:43
    #37528515
Scorp1978
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
lnOffset = ctobin(substr(lcHead, 11, 4), '4RS') - Errors
ctobin(substr(lcHead,5,4), '4RS')

косячит ctobin(выражение) получается для него '4RS' уже лишний параметр
...
Рейтинг: 0 / 0
16.11.2011, 08:46
    #37528517
Scorp1978
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
lnOffset = ctobin(substr(lcHead, 11, 4), '4RS') - Errors
ctobin(substr(lcHead,11,4)) вот в таком виде фокс пропускает на сохранение, а в таком уже нет
ctobin(substr(lcHead, 11, 4), '4RS')
...
Рейтинг: 0 / 0
16.11.2011, 09:14
    #37528528
IgorNG
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
lnOffset = ctobin(substr(lcHead, 11, 4), '4RS') - Errors
Scorp1978,

9-ка в таком виде пропускает
lnOffset = ctobin(substr(lcHead, 11, 4), '4RS')
...
Рейтинг: 0 / 0
16.11.2011, 09:20
    #37528534
lnOffset = ctobin(substr(lcHead, 11, 4), '4RS') - Errors
Scorp1978,
фокс 8-й версии? Тогда все правильно. Второй параметр появился в 9-ке.
...
Рейтинг: 0 / 0
16.11.2011, 09:56
    #37528592
Scorp1978
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
lnOffset = ctobin(substr(lcHead, 11, 4), '4RS') - Errors
и как быть, ставить 9-ку или можно как нить обойти?
...
Рейтинг: 0 / 0
17.11.2011, 00:18
    #37530499
SSn888
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
lnOffset = ctobin(substr(lcHead, 11, 4), '4RS') - Errors
Scorp1978,

Обойти можно, если предварительно ручками выполнить операции, заменяющие "4RS"
Хоцца?
Сомневаюсь..
Ставьте 9-ку, тем более что она еще не раз Вам пригодиться :)
...
Рейтинг: 0 / 0
17.11.2011, 06:57
    #37530668
Dima T
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
lnOffset = ctobin(substr(lcHead, 11, 4), '4RS') - Errors
В 9-ке расширили возможности CToBin() поэтому в предыдущих не работает.
4RS означает четырехбайтовое целое со знаком записанное в обратном порядке.
Можно так преобразовать:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
proc CToBin4RS
lpara tcVal
local lnRet, lnMin, i
lnRet = asc(substr(tcVal,  4 ,  1 ))
if lnRet >=  128 
	lnMin =  2 ^ 32 
else
	lnMin =  0 
endif
for i =  3  to  1  step - 1 
	lnRet = lnRet *  256  + asc(substr(tcVal, i,  1 ))
endfor
return lnRet - lnMin
...
Рейтинг: 0 / 0
17.11.2011, 10:57
    #37530922
Scorp1978
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
lnOffset = ctobin(substr(lcHead, 11, 4), '4RS') - Errors
благодарствую буду пробовать, отпишусь
...
Рейтинг: 0 / 0
17.11.2011, 12:40
    #37531248
SSn888
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
lnOffset = ctobin(substr(lcHead, 11, 4), '4RS') - Errors
а в следующий раз при встрече например, "2" - опять кодить? странные люди, ИМХО - лучше сразу 9-ку поставить и все :)
впрочем - "хозяин - барин"
...
Рейтинг: 0 / 0
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / lnOffset = ctobin(substr(lcHead, 11, 4), '4RS') - Errors / 12 сообщений из 12, страница 1 из 1
Целевая тема:
Создать новую тему:
Автор:
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]