delphi pars

  1. K_NoW

    SpinTax

    Не знаю зачем я это запостил, мб кому пригодится. В общем что такое спинтакс, это такая лабуда которая генерит уникальный текст из шаблона. Ну например, {Привет|Здравствуйте} после обработки парсером спинтакс, будет одно слово либо Привет либо Здравствуйте. Полезно для всяких рассыльщиков...
  2. X-Vlad

    Delphi функция pars

    Функция для парсинга кода. function Pars(T_, ForS, _T: string): string; var a, b:integer; begin Result := ''; if (T_='') or (ForS='') or (_T='') then Exit; a:=Pos(T_, ForS); if a=0 then Exit else a:=a+Length(T_); ForS:=Copy(ForS, a, Length(ForS)-a+1); b:=Pos(_T, ForS); if b>0 then...
Сверху