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

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

Аватара для proxy

Старожил


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

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


имеешь в виду такое:
Код: Выделить весь код
Local   $sString   = 'Строка agk673qwikyg'
Local   $aArray[3] = ['Массив', 1, $sString]

_Check(IsArray($aArray), $aArray)
_Check(IsArray($sString), $sString)

Func _Check($iIsArray, $vWhatCheck)
    If $iIsArray == 1 Then
        MsgBox(64, 'Внимание', 'Проверяется: ' & $vWhatCheck & @CRLF & 'Результат проверки: ' & $iIsArray & @CRLF & @CRLF & 'Переменная массив')
    Else
        MsgBox(64, 'Внимание', 'Проверяется: ' & $vWhatCheck & @CRLF & 'Результат проверки: ' & $iIsArray & @CRLF & @CRLF & 'Переменная НЕ массив')
    EndIf
EndFunc

-------
Мысли-читатель сломался, может подробней расскажите?
А где исходный код? Или мы стихи обсуждаем?! )) Настройки темы > Решено ?


Отправлено: 01:24, 26-03-2009 | #7