WRITE MV IF EMPTY

Материал из Фабиус wiki
Перейти к: навигация, поиск

WRITE_MV_IF_EMPTY - это программа из справочника R266

Заполнить мемо поле, если оно еще не заполнено

WRITE_MV_IF_EMPTY( memofield_name, memofield_new_value )

Текст

parameters memofield_name, memofield_new_value
if EMPTY( memofield_new_value )
  return
endif
local aa
aa := READMV( memofield_name )

if EMPTY( aa )
  WRITEMV( memofield_name, memofield_new_value )
endif

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

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

Функции Delphi