Конференция VBStreets

**tyomitch** » 04.01.2007 (Чт) 22:47

Вопрос навеян топиком Wolfie и в нём категоричным заявлением GSerg-а об отсутствии различий между текстовыми и двоичными данными.

Так вот: в String, как известно, лежит по два байта на символ, а число символов представляется целым. И всё же, сабж?

**GSerg** » 04.01.2007 (Чт) 22:59

Не дёргай категоричное заявление GSerg-а из контекста. Оно, как нетрудно видеть из истории форума, навеяно http://bbs.vbstreets.ru/viewtopic.php?p=6597008#6597008 и ниже.

**tyomitch** » 04.01.2007 (Чт) 23:03

Да нет, я всё то помню :-)

Просто в топике Wolfie, где оно уже было оторвано от своего исторического контекста, категоричное заявление GSerg-а выглядело несколько, мм... вводящим в заблуждение.

И всё же, что про сабж?

**GSerg** » 04.01.2007 (Чт) 23:10

Из картинки, которую правил ты, следует, что длина хранится в байтах, а не в символах. Значит может. Особенно на фоне мыслей о кодировках с переменным числом байт на символ.

**tyomitch** » 04.01.2007 (Чт) 23:19

Тогда естественно возникает вопрос: а как такую строку получить? (родными средствами VB, без CopyMemory и прочего шаманства).

**ANDLL** » 04.01.2007 (Чт) 23:51

?lenb(leftb("AA",3))

**tyomitch** » 04.01.2007 (Чт) 23:57

О как чудно! Даже кодировки с переменным числом байт на символ не понадобились :-)

Следующий вопрос: что для такой строки вернут lstrlenA(ByVal As String), lstrlenW(ByVal StrConv(vbUnicode) As String) и lstrlenW(ByVal StrPtr() As Long):?:
(Для обычной строки все три этих варианта возвращают то же значение, что и встроенная Len.)
Предлагается сначала предположить, и потом проверить :-)

**ANDLL** » 05.01.2007 (Пт) 0:28

1,1,2

**tyomitch** » 05.01.2007 (Пт) 0:42

А почему?

**ANDLL** » 05.01.2007 (Пт) 0:57

А правильно?

**tyomitch** » 05.01.2007 (Пт) 1:06

Лёгкий эксперимент показывает, что нет ;-)

Но всё равно интересно объяснение.

**ANDLL** » 05.01.2007 (Пт) 18:26

Наша строка:
41 00 41 00 00 00 (1)
StrConv просто вставляет нули после(или перед) каждого байта
StrConv: 41 00 00 00 41 00 00 00 00 (2)
lstrlenA ищет первый (char)0, lstrlenW ищет первый (short)0
Отсюда

Код: Выделить всё: lstrlenA(1) = 1 lstrlenW(2) = 1 lstrlenW(1) = 2

Почему не так?
(не могу проверить, т.к. нету времени)

**tyomitch** » 05.01.2007 (Пт) 18:45

Потому что по твоей логике выходит, что lstrlenA вообще для любой строки вернёт 1 ;-)

**ANDLL** » 05.01.2007 (Пт) 19:13

Для любой Юникод-строки, получается да. А разве не должна?

**GSerg** » 05.01.2007 (Пт) 19:27

Гы гы

ANDLL, а нафига юникод, если у него каждый второй байт 00?

**tyomitch** » 05.01.2007 (Пт) 19:35

ANDLL писал(а):Для любой Юникод-строки, получается да. А разве не должна?

Во даже как?
А как тогда в твоей статье вызов LoadLibrary("kernel32.dll") загружает именно kernel32.dll, а не k?
Там ведь LoadLibraryA, верно?

**ANDLL** » 05.01.2007 (Пт) 20:16

tyomitch писал(а):
ANDLL писал(а):Для любой Юникод-строки, получается да. А разве не должна?

Во даже как?
А как тогда в твоей статье вызов LoadLibrary("kernel32.dll") загружает именно kernel32.dll, а не k?
Там ведь LoadLibraryA, верно?

Потому что
VB преобразует unicode-строки в не unicode-строки при передаче в API
Если бы ты передавал strptr("kernel32") то тогда бы действительно, он бы пробовал загрузить k
2GSerg
У строки "AA" второй байт действительно 0, над чем смеемся?

**tyomitch** » 05.01.2007 (Пт) 20:22

ANDLL писал(а):
tyomitch писал(а):
ANDLL писал(а):Для любой Юникод-строки, получается да. А разве не должна?

Во даже как?
А как тогда в твоей статье вызов LoadLibrary("kernel32.dll") загружает именно kernel32.dll, а не k?
Там ведь LoadLibraryA, верно?

Потому что
VB преобразует unicode-строки в не unicode-строки при передаче в API

Однако же, твоя теория этого не учитывает.

**GSerg** » 05.01.2007 (Пт) 20:23

Конференция VBStreets

Может ли LenB для строки вернуть нечётное число?

Может ли LenB для строки вернуть нечётное число?

Кто сейчас на конференции