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