Скопировать 10 символов до зяпятой

← →
Novicheck (2010-03-04 15:40) [0]

Всем привет.

помогите новичку.
есть строка 123,456,789,324324,3432432432,23424,234

Надо создадь список строк содержащий 10 символов до запятой.
т.е в результате получить:
123,456,789
324324
3432432432
23424,234

← →
Ega23 © (2010-03-04 15:42) [1]

Pos, Copy, Length, if, while + F1

← →
12 © (2010-03-04 15:46) [2]

на почту ответил

← →
12312312312 (2010-03-04 17:47) [3]

Можно пример кода?

я уже голову сломал....

← →
Игорь Шевченко © (2010-03-04 17:49) [4]

> Надо создадь список строк содержащий 10 символов до запятой.
>
> т.е в результате получить:
> 123,456,789
> 324324
> 3432432432
> 23424,234

И где здесь 10 символов до запятой?

← →
12312312312 (2010-03-04 17:53) [5]

123,456,789,324324,3432432432,23424,234
|
это 10 символ.

Значит вытягиваем 123,456 т.к до следующей запятой 11 символов...

← →
Ega23 © (2010-03-04 17:57) [6]

http://www.delphimaster.ru/forums.shtml#rule

Запрещается:
.....
5. Преднамеренное использование разных ников в одной ветке.

← →
Novicheck (2010-03-04 17:58) [7]

ок сорри

← →
Игорь Шевченко © (2010-03-04 18:01) [8]

> Значит вытягиваем 123,456 т.к до следующей запятой 11 символов.
> ..

Что-то не совсем понятно. А можно задачу изложить, как она на самом деле стоит, без символов ?

← →
Игорь Шевченко © (2010-03-04 18:02) [9]

Ega23 © (04.03.10 17:57) [6]

Ну и пункт 8 заодно :)

← →
Novicheck (2010-03-04 18:06) [10]

Ок, задача в слудующем.
У меня есть строка в которой находится текст типа "123,123324,123523" значения между запятыми могут быть разной длины но не больше 20 символов...длина всей строки разная от 10 до 1000000...

мне надо разделить эту большую строку на подстроки.

Длина каждой подстроки не больше 110 символов..не забываем про то чтобы не резались слова между запятыми...

> мне надо разделить эту большую строку на подстроки.

Скорость важна ?

Изучай sysutils.wraptext

ИМХО вот простое но, скорее всего, не очень быстрое решение:
Отсчитываете от текущей строки 110 символов вправо, и потом идете влево до первой запятой. Отрезаете то, что осталось слева и повторяете.

CommaText

> не очень быстрое решение:

очень быстро решение:
копируются первые 10 символов.

Скопировать 10 символов до зяпятой Найти похожие ветки