On-line:гостей 6. Всего: 6 [подробнее..]
АвторСообщение
постоянный участник




Пост N:3771
Зарегистрирован:12.09.06
ссылка на сообщение  Отправлено:27.11.14 19:17.Заголовок:Запись блока кода ?


Всем привет.
На хХарборе есть функции:
? "Saving Block..."
SavedBlock := HB_SaveBlock( bBlock )
? "Restoring Block..."
bBlock := HB_RestoreBlock( SavedBlock )
А на Харборе есть такие ?
Чем можно заменить или превратить блок кода в строку ?


Спасибо: 0 
ПрофильЦитата Ответить
Ответов -7 [только новые]


постоянный участник




Пост N:3772
Зарегистрирован:12.09.06
ссылка на сообщение  Отправлено:27.11.14 20:41.Заголовок:В харборе нашел \..


В харборе нашел \HB32\contrib\xhb\tests\decode.prg, там тоже нет преобразования...
Наверно жесть задача, записать блок кода в строку....


Спасибо: 0 
ПрофильЦитата Ответить





Пост N:320
Зарегистрирован:16.12.08
ссылка на сообщение  Отправлено:27.11.14 22:19.Заголовок:Посмотри на функции:..


Посмотри на функции:

HB_SERIALIZE
HB_DESERIALIZE



Спасибо: 0 
ПрофильЦитата Ответить
постоянный участник




Пост N:3774
Зарегистрирован:12.09.06
ссылка на сообщение  Отправлено:27.11.14 23:19.Заголовок:santy пишет: HB_SER..


santy пишет:

 цитата:
HB_SERIALIZE
HB_DESERIALIZE



Посмотрел, ни фига не понял...
@ 1, 10 SAY "X H A R B O U R - Serialization and deserialization tests"
cTmp := HB_Serialize( "A string" )
cTmp += HB_Serialize( 12.4 )
cTmp += HB_Serialize( Directory( "serialize.prg") )
cTmp += HB_Serialize( CtoD( "2/2/2001" ) )
cTmp += HB_Serialize( { 1, 2, { "a", "b" }, 3 } )
cTmp += HB_Serialize( 2100010101 )
cTmp += HB_Serialize( {'a'=>'1', 'b'=> 2, 10 =>{1,2}, 'z' =>{1=>2, 0=>3} } )
cTmp += HB_Serialize( SomeClass():New("A parameter") )
cTmp += HB_Serialize( "Last String, closing test" )

/* now we deserialize */
cSerial := HB_DeserialBegin( cTmp )

Блок кода не наблюдается....

Спасибо: 0 
ПрофильЦитата Ответить
moderator


Пост N:373
Зарегистрирован:20.02.11
ссылка на сообщение  Отправлено:27.11.14 23:54.Заголовок:Andrey пишет: Посмо..


Andrey пишет:

 цитата:
Посмотрел, ни фига не понял..


http://www.creasolgroup.com/xOraclipLanguageReferenceGuide/xOraClip%20Language%20Reference/Functions/Hb_serialize_f.en.html

PS это просто пример для понимания

Спасибо: 0 
ПрофильЦитата Ответить
постоянный участник




Пост N:3775
Зарегистрирован:12.09.06
ссылка на сообщение  Отправлено:28.11.14 00:12.Заголовок:Есть еще CStr( bBloc..


Есть еще CStr( bBlock ) // result: {|| Block } (в Харборе HB_CStr( bBlock ) )

Но возврашает {||...}

Делаю так:
bBlock := {|x| MsgDebug(x) }
xResult := HB_CStr( bBlock )
MsgDebug( xResult, VALTYPE(xResult) )

Результат:


Если так:

bVal := {|x| x -= 30 }
xVal := HB_SERIALIZE( bVal )
MsgDebug( xVal , VALTYPE(xVal) )

Результат:




Спасибо: 0 
ПрофильЦитата Ответить



Пост N:438
Зарегистрирован:17.02.12
ссылка на сообщение  Отправлено:28.11.14 00:25.Заголовок:Andrey HB_Serialize..


Andrey
HB_Serialize( <xValue> ) --> cBinary - блок кода в строку, но не исходную, для передачи между модулями через mem файл
в hb нет (пока, а может навсегда) функций, как в xhb

Спасибо: 0 
ПрофильЦитата Ответить
постоянный участник




Пост N:3777
Зарегистрирован:12.09.06
ссылка на сообщение  Отправлено:28.11.14 00:29.Заголовок:SergKis пишет: в hb..


SergKis пишет:

 цитата:
в hb нет (пока, а может навсегда) функций, как в xhb


Во, понял теперь ! Спасибо !

А когда появятся ? Там разработчиков можно потрясти ?

Спасибо: 0 
ПрофильЦитата Ответить
Ответ:
1 2 3 4 5 6 7 8 9
большой шрифт малый шрифт надстрочный подстрочный заголовок большой заголовок видео с youtube.com картинка из интернета картинка с компьютера ссылка файл с компьютера русская клавиатура транслитератор  цитата  кавычки моноширинный шрифт моноширинный шрифт горизонтальная линия отступ точка LI бегущая строка оффтопик свернутый текст

показывать это сообщение только модераторам
не делать ссылки активными
Имя, пароль:      зарегистрироваться    
Тему читают:
-участник сейчас на форуме
-участник вне форума
Все даты в формате GMT  3 час. Хитов сегодня: 376
Права: смайлыда,картинкида,шрифтыда,голосованиянет
аватарыда,автозамена ссылоквкл,премодерацияоткл,правканет