Скачать: CL | DM;

Есть ли Trim для всей строки, а не для краев?   Найти похожие ветки 

← →
Jeer ©   (2010-01-31 23:11) [40]

Ну шо поделаешь - таки, да.

---

← →
DVM ©   (2010-01-31 23:34) [41]

> Игорь Шевченко ©   (31.01.10 22:10) [35]
> DVM ©   (31.01.10 21:48) [34]
>
> Откуда такие шедевры ?

C  http://www.delphidabbler.com я ж написал.

---

← →
antonn ©   (2010-01-31 23:37) [42]

ну и я накорябаю, функция от Sha :)
procedure Sha_SpaceCompressInplace(var s: string);
var p,q,t:pchar;  ch:char;
label rt;
begin
 UniqueString(s);
 p := pointer(s);
 if p <> nil then begin
  t := p + (pinteger(p - 4))^;
  if p < t then begin
    q := p;
    repeat;
      dec(t);
      if p > t then
        goto rt;
    until (t^ > " ");
    repeat;
      repeat;
        ch := p^;
        inc(p);
      until ch > " ";
      repeat;
        q^ := ch;
        ch := p^;
        inc(q);
        inc(p);
      until ch <= " ";
      q^ := " ";
      inc(q);
    until p > t;
    dec(q);
    rt: q^ := #0;
    (pinteger(pchar(pointer(s)) - 4))^ := q - pointer(s);
  end;
 end;
end;

---

← →
DVM ©   (2010-01-31 23:42) [43]

> antonn ©

похоже на C программу вмзуально чисто :)

---

← →
Германн ©   (2010-02-01 00:39) [44]

> похоже на C программу вмзуально чисто

Визуально похоже на паскаль.

---

← →
Ega23 ©   (2010-02-01 12:05) [45]

> Дублирующиеся пробелы, Игорь, это когда не одни пробел,
> а несколько. Больше одного то есть.


Про табуляцию не забываем, ага.

---

← →
Anatoly Podgoretsky ©   (2010-02-01 12:59) [46]

> Дублирующиеся пробелы, Игорь, это когда не одни пробел,
> а несколько. Больше одного то есть.

А можно подряд, или все они в разных местах должны быть?

---

Страницы: 1 2 вся ветка

Скачать: CL | DM;



Память: 0.53 MB
Время: 0.008 c