ISEMPTY — различия между версиями

Материал из Фабиус wiki
Перейти к: навигация, поиск
м
м
 
(не показано 13 промежуточных версий этого же участника)
Строка 1: Строка 1:
IsEmpty - это функция
+
[[ISEMPTY]] - это функция
 +
Возвращает true, если результат выражения равен nil, "", 0, { { 0 } }
 +
[[ISEMPTY]]()
  
ISEMPTY()
+
В отличие от [[Empty]], возвращает true, если результат выражения равен { { 0 } }
 
+
= Текст =
Возвращает true, если результат выражения равен nil, '', 0, {{0}}
+
 
+
В отличие от Empty, возвращает true, если результат выражения равен {{0}}
+
 
+
= Текст программы =
+
  
 
  parameters a
 
  parameters a
 
   
 
   
  if Empty( a )
+
  if [[Empty]]( a )
 
   result := true
 
   result := true
 
   return
 
   return
 
  endif
 
  endif
 
   
 
   
  if ValType( a ) = 'A'
+
  if [[ValType]]( a ) = 'A'
   if Empty( a[1] ) and len( a ) = 1
+
   if [[Empty]]( a[1] ) and [[len]]( a ) = 1
 
     result := true
 
     result := true
 
     return
 
     return
 
   endif
 
   endif
 
   
 
   
   if ValType( a[1] ) = 'A'
+
   if [[ValType]]( a[1] ) = 'A'
     if Empty( a[1,1] ) and len( a[1] ) = 1
+
     if [[Empty]]( a[1,1] ) and [[len]]( a[1] ) = 1
 
       result := true
 
       result := true
 
       return
 
       return
Строка 30: Строка 27:
 
  endif
 
  endif
 
   
 
   
  result := Empty( a )
+
  result := [[Empty]]( a )
  
 
= Смотрите также =
 
= Смотрите также =
 
+
[[Полезные функции]]
Функция [[EMPTY]]
+
  
 
[[Функции Delphi]]
 
[[Функции Delphi]]
  
[[Полезные функции]]
+
[[EMPTY]]

Текущая версия на 08:46, 11 октября 2017

ISEMPTY - это функция

Возвращает true, если результат выражения равен nil, "", 0, { { 0 } }

ISEMPTY()

В отличие от Empty, возвращает true, если результат выражения равен { { 0 } }

Текст

parameters a

if Empty( a )
  result := true
  return
endif

if ValType( a ) = 'A'
  if Empty( a[1] ) and len( a ) = 1
    result := true
    return
  endif

  if ValType( a[1] ) = 'A'
    if Empty( a[1,1] ) and len( a[1] ) = 1
      result := true
      return
    endif
  endif
endif

result := Empty( a )

Смотрите также

Полезные функции

Функции Delphi

EMPTY