Binary in Axapta

[mazzy]

Цитата:

Изначально опубликовано BorDark
А что Вы имеете ввиду под установкой байтов посимвольно?

Примерно это и имел в виду.
только не надо пользоваться методом string

Вот это работает - проверено на Axapta 3.0 SP3

PHP код:

static void Job31(Args _args)
{
binary bin = new binary(128);
int n = 666;
str 9 s = "123456789";
int i;
int c;
;

//bin.string(0, s);
//bin.word(10, n);

for(i = 0; i < strlen(s); i++)
{
c = char2num(s, i + 1); // c = substr(s, i + 1, 1);
bin.byte(i, c); //bin.string(i, c);
}
bin.byte(i,0); // Не забывайте терминальный 0

bin.word (11, n);


for(i=0; i<15; ++i)
    info(strfmt("%1 %2", i, bin.byte(i)));

}