Текущий архив: 2010.04.04;
Скачать: 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 вся ветка
Текущий архив: 2010.04.04;
Скачать: CL | DM;
Память: 0.54 MB
Время: 0.014 c
