Адрес этой странички : http://spcalc.narod.ru/spcalc_func_string.htm
spCalc.exe
Простой программируемый калькулятор.  

Интерпретатор скриптов.

ВНИМАНИЕ !
Прежде, чем читать этот документ, крайне рекомендуется детально ознакомиться с документом :
"Библиотека скриптов FastScript 1.4. Руководство разработчика" ( http://spcalc.narod.ru/download/fs14_ru_rtf.zip ). 

Список процедур и функций

Строки

Удаление пробелов из строки слева.
      function LTrim(Sx : string) : string;

Удаление пробелов из строки слева.
  function RTrim(Sx : string) : string;

Удаление пробелов из строки слева и справа.
  function AllTrim(Sx : string) : string; 
  function Trim(S: string): string; 

Удаление НЕсимволов из строки слева.
  function LTrimSep(Sep,Sx : string) : string; 
    Sep – строка НЕсимволов (аналог множества).

Удаление НЕсимволов из строки справа.
  function RTrimSep(Sep,Sx : string) : string; 
    Sep – строка НЕсимволов (аналог множества).

Удаление НЕсимволов из строки слева и справа.
  function AllTrimSep(Sep,Sx : string) : string; 
    Sep – строка  НЕсимволов (аналог множества).

Удаление символов из строки.
  function Delete_Chars_From_String(CharsDel,Sx : string) : string; 
    CharsDel – строка удаляемых символов (аналог множества).  

Добавление символов в строку S.
  function Append_Char_to_String(CodeChar : byte; 
                                 S : String; 
                                 CountChar : integer; 
                                 NrMode : integer = 0) : string;   

CodeChar – ascii-код символов, которыми «наращивается» строка
S – наращиваемая строка
CountChar – «желаемый» размер результирующей строки
NrMode :  <=0 – слева, >0 - справа
Функция возвращает результирующую строку

Выравнивание текста в строке S.
  function Move_Text_in_String(S : String; 
                               CountChar : integer; 
                               NrMode : integer = 0) : string;    

S –исходная строка,
CountChar – «желаемый» размер результирующей строки
NrMode: <0 – прижать влево, =0 – по центру, >0 – прижать вправо
Функция возвращает результирующую строку

Количество слов в строке.
  function Get_CountWordInString(CharsSep, S : String) : integer; 
    CharsSep – строка разделителей (аналог множества).  

Получить из строки слово по номеру
  function Get_WordFromString(CharsSep, S : String; Num : integer) : string; 
    CharsSep – строка разделителей (аналог множества).  

Получить значение параметра из строки.
    Строка имеет формат: 
             Параметр=ЗначениеПараметра 
  function Get_ParamValue_from_String(InString : string;
                                      sSep : string) : string; 
    sSep – разделитель (по умолчанию, если пустая строка, знак равенства).  

Получить имя параметра из строки.
    Строка имеет формат: 
               Параметр=ЗначениеПараметра 
  function Get_ParamName_from_String(InString : string;  
                                     sSep : string) : string; 
    sSep – разделитель (по умолчанию, если пустая строка, знак равенства).  

Определить длину строки.
   function Length(s: String): Integer;  

Возвращает подстроку из строки с заданной позиции заданной длины
  function Copy(s: String; from, count: Integer): String;   

Позиция подстроки в строке
  function Pos(substr, s: String): Integer;   

Удаляет подстроку из строки с заданной позиции заданной длины
  procedure Delete(var s: String; from, count: Integer);

Добавляет первую строку ко второй строке
  procedure Insert(s: String; var s2: String; pos: Integer);

Перевод строки в верхний регистр
  function UpCaseCyrLatStr(Sx : string) : string; 
  function Uppercase(s: String): String;  

Перевод строки в нижний регистр
  function Lowercase(s: String): String;  

Перевод первого символа в верхний регистр
  function NameCase(s: String): String;   

Сравнение строк 
  function CompareText(s, s1: String): Integer; 

Возвращает символ с заданным номером
  function Chr(i: Integer): Char;   

Возвращает номер заданного символа
  function Ord(ch: Char): Integer;  

Устанавливает длину строки 
  procedure SetLength(var S: String; L: Integer);   

Форматирование строки. 
  function Format(Fmt: String; Args: array): String;  

Форматирование строки по маске
  function FormatMaskText(EditMask: string; Value: string): string 

© Sergey Popov, Usinsk, Komi, 2007