Maza Faka
пролистай назад, требуется автоматизация задач:
- регистрация на сайте (линк дан);
- заливка на сайт файлов.
Creat0R
Цитата:
я до сих пор не понял, для чего функция _GUICtrlStatusBarSetUnicode()? что она делает? »
|
Судя по немногочисленным
примерам переключает контрол в юникодовый режим, только я плохо представляю как можно передать юникодовый текст ANSI-сообщением... и тем более в каком он должен быть формате: UTF-8 или UTF-16?.. И еще настораживает тот факт, что в тырнете по сообщениям типа
SB_SETUNICODEFORMAT инфа практически отсутствует... ИМХО все же перед тем как постить свой вариант нужно определиться чем не устраивает предложенный разработчиками способ...
Цитата:
предложить чтобы добавили дополнительный параметр $iUFlag »
|
кроме прочего это будет идти в разрез с ихней кодировкой форматов
Цитата:
может всё же возможно определить не является ли строка юникодной? »
|
можно проверить на соответствие строки
требованиям формата, к примеру для
UTF-8:
Код:
![Выделить весь код](images/misc/selectcode.png)
Func _StringIsUTF8Format($string)
Local $asc, $i, $j, $len = StringLen($string), $ext = $len
For $i=1 To $len
$asc = Asc(StringMid($string, $i, 1))
If Not(BitAnd($asc,0x80)) Then
$ext=0
ElseIf Not(BitXOR(BitAnd($asc,0xE0),0xC0)) Then
$ext=1
ElseIf Not(BitXOR(BitAnd($asc,0xF0),0xE0)) Then
$ext=2
ElseIf Not(BitXOR(BitAnd($asc,0xF8),0xF0)) Then
$ext=3
EndIf
If $i+$ext>$len Then Return False
For $j = $i+1 To $i+$ext
$asc = Asc(StringMid($string, $j, 1))
If BitXOR(BitAnd($asc,0xC0),0x80) Then Return False
Next
$i+=$ext
Next
Return True
EndFunc