CUTFROM — различия между версиями
Материал из Фабиус wiki
Hisava (обсуждение | вклад) м |
Hisava (обсуждение | вклад) м |
||
Строка 1: | Строка 1: | ||
[[CUTFROM]] - это программа из справочника [[R266]] | [[CUTFROM]] - это программа из справочника [[R266]] | ||
Вырезать начиная с указанного элемента до конца строки | Вырезать начиная с указанного элемента до конца строки | ||
+ | [[CUTFROM]]( xmlstring, txtitem ) | ||
+ | xmlstring - строка | ||
+ | |||
+ | txtitem - элемент | ||
+ | = Текст = | ||
+ | parameters xmlstring, txtitem | ||
+ | |||
+ | if [[Empty]]( [[at]]( txtitem, xmlstring ) ) | ||
+ | result := '' | ||
+ | else | ||
+ | result := [[Copy]]( xmlstring, [[at]]( txtitem, xmlstring ) + [[len]]( txtitem ), [[len]]( xmlstring ) ) | ||
+ | endif | ||
= Смотрите также = | = Смотрите также = | ||
[[Полезные функции]] | [[Полезные функции]] | ||
[[Функции Delphi]] | [[Функции Delphi]] |
Версия 13:54, 28 апреля 2017
CUTFROM - это программа из справочника R266
Вырезать начиная с указанного элемента до конца строки
CUTFROM( xmlstring, txtitem )
xmlstring - строка
txtitem - элемент
Текст
parameters xmlstring, txtitem if Empty( at( txtitem, xmlstring ) ) result := else result := Copy( xmlstring, at( txtitem, xmlstring ) + len( txtitem ), len( xmlstring ) ) endif