Имя пользователя:
Пароль:
 

Показать сообщение отдельно

Старожил


Сообщения: 156
Благодарности: 1

Профиль | Отправить PM | Цитировать


функция, с которой и есть эта беда
Код: Выделить весь код
Func _TMPTheme()
	$FileINI = @ScriptDir&'Setting.ini')
	$utime = FileGetTime($FileINI, 0, 1)
	If GUICtrlRead($vTab1) = "0" Then
			 $vkey1 = GUICtrlRead($vInput1)
    $vkey2 = GUICtrlRead($vInput2)
    $vkey3 = GUICtrlRead($vInput3)
    $vkey4 = GUICtrlRead($vInput4)
    $vkey5 = GUICtrlRead($vInput5)
    $vkey6 = GUICtrlRead($vInput6)
    $vkey7 = GUICtrlRead($vInput7)
   $vData = ''
    For $i = 1 To $vKeys[0]
            $vVal = Eval('vkey' & $i)
             If $vVal <> '' Then
            $vData &= $vKeys[$i] & '=' & $vVal & @CRLF          
        EndIf
    Next
		IniWriteSection($FileINI, 'TEST', $vData)
	Else
		$akey1 = GUICtrlRead($aInput2)
		$akey2 = GUICtrlRead($aInput3)
		$akey3 = GUICtrlRead($aInput4)
  $aData = ''
    For $i = 1 To $aKeys[0]
        $aVal = Eval('akey' & $i)
        If $aVal <> '' Then
            $aData &= $aKeys[$i] & '=' & $aVal & @CRLF
        EndIf
    Next
		IniWriteSection($FileINI, "v_TEST", $aData)
	EndIf
	FileSetTime($FileINI, $utime, 0)
EndFunc
Предполагаю, что трабл в eval. в правке упоминали о проблеме обфускации этой фукнции. хотя игнорировании функции ничего не дало

Последний раз редактировалось eus_deus, 19-10-2013 в 22:17.


Отправлено: 22:11, 19-10-2013 | #4