Обсуждение AutoIt бета-версий

[CreatoR [?]]

В этой теме только обсуждения связанные с последними бета-версиями.

[Yashied [?]]

Removed au3record.exe as it's often mistakenly flagged as malware causing the entire AutoIt zip/installer to be flagged.

После этого я даже и не знаю что думать о разработчиках.

[Andrey_A [?]]

Обнаружил такой баг, не помню был ли он в предыдущих версиях.
В ListView при создании пункта ListViewItem со стилем $LVS_EX_INFOTIP подсказка появляется за окном, если окно имеет атрибут "Поверх всех окон"

Код: AutoIt [Выделить]

#include <ListViewConstants.au3>
#include <GUIConstantsEx.au3>
#include <ButtonConstants.au3>

Global $hGUI, $idButton, $OnTop=1
$hGUI = GUICreate("ListView", 240, 260, 100, 200)
$idListView = GUICtrlCreateListView("Колонка", 10, 10, 220, 150, -1, $LVS_EX_INFOTIP)
GUICtrlCreateListViewItem("Длинный текст пункта, подсказка которого появляется сзади окна, если оно 'Поверх всех окон'", $idListView)
$idButton = GUICtrlCreateButton("", 45, 170, 150, 40,$BS_ICON)
_OnTop()
GUISetState()

While 1
  Switch GUIGetMsg()
    Case $GUI_EVENT_CLOSE
      Exit
    Case $idButton
      $OnTop = $OnTop ? 0 : 1
      _OnTop()
  EndSwitch
WEnd

Func _OnTop()
  GUICtrlSetImage($idButton, "shell32.dll", -248+$OnTop)
  WinSetOnTop($hGUI, '', $OnTop)
EndFunc

[asdf8 [?]]

Andrey_A  [?]

Обнаружил такой баг

Это баг WinApi: ссылка

[Andrey_A [?]]

asdf8  [?]

Это баг WinApi:

Спасибо!

[ЭйчЭйч [?]]

Кто пишет на бете, много багов словили?

[Andrey_A [?]]

Обнаружил такой баг, попался намедни текст, который никак не хотел сравниваться, ни "=", ни "==", ни StringCompare() не помогали... Опытным путём выяснил, что это из-за символа ChrW(422) и его нижний регистр ChrW(640)
Может есть сторонние методы сравнение такого?

Код: AutoIt [Выделить]

$sSym=ChrW(422)
$sSymLow=StringLower($sSym)
; $sSym=ChrW(640)
; $sSymLow=StringUpper($sSym)
If $sSym=$sSymLow Then
  MsgBox(4096,"","Равны без учёта регистра"&@CRLF&"$sSym =>"&$sSym&"<="&@CRLF&"$sSymLow =>"&$sSymLow&"<=")
Else
  MsgBox(4096,"","Не равны без учёта регистра"&@CRLF&"$sSym =>"&$sSym&"<="&@CRLF&"$sSymLow =>"&$sSymLow&"<=")
EndIf

If $sSym==$sSymLow Then
  MsgBox(4096,"","Равны с учётом регистра"&@CRLF&"$sSym =>"&$sSym&"<="&@CRLF&"$sSymLow =>"&$sSymLow&"<=")
Else
  MsgBox(4096,"","Не равны с учётом регистра"&@CRLF&"$sSym =>"&$sSym&"<="&@CRLF&"$sSymLow =>"&$sSymLow&"<=")
EndIf

If 0=StringCompare($sSym,$sSymLow)Then
  MsgBox(4096,"","Равны без учёта регистра"&@CRLF&"$sSym =>"&$sSym&"<="&@CRLF&"$sSymLow =>"&$sSymLow&"<=")
Else
  MsgBox(4096,"","Не равны без учёта регистра"&@CRLF&"$sSym =>"&$sSym&"<="&@CRLF&"$sSymLow =>"&$sSymLow&"<=")
EndIf

If 0=StringCompare($sSym,$sSymLow,1) Then
  MsgBox(4096,"","Равны с учётом регистра"&@CRLF&"$sSym =>"&$sSym&"<="&@CRLF&"$sSymLow =>"&$sSymLow&"<=")
Else
  MsgBox(4096,"","Не равны с учётом регистра"&@CRLF&"$sSym =>"&$sSym&"<="&@CRLF&"$sSymLow =>"&$sSymLow&"<=")
EndIf

[InnI [?]]

Andrey_A
Преобразуйте обе строки к одному регистру и сравнивайте

Код: AutoIt [Выделить]

$s1 = "TeSt" & ChrW(422) & "ПрОвЕрКа"
$s2 = "tEsT" & ChrW(640) & "пРоВеРкА"

ConsoleWrite( StringUpper($s1) = StringUpper($s2) )
ConsoleWrite(@CRLF)
ConsoleWrite( StringCompare(StringLower($s1), StringLower($s2)) )
ConsoleWrite(@CRLF)