Этот баннер — требование Роскомнадзора для исполнения 152 ФЗ.
«На сайте осуществляется обработка файлов cookie, необходимых для работы сайта, а также для анализа использования сайта и улучшения предоставляемых сервисов с использованием метрической программы Яндекс.Метрика. Продолжая использовать сайт, вы даёте согласие с использованием данных технологий».
Политика конфиденциальности
|
|
|
Разбить строки на подстроки по разделителю
|
|||
|---|---|---|---|
|
#18+
Нужно зазбить строку , на подстроки , используя для этого разделитель (в моём случае запятую) В С++ была такая функция StrToK() а в делфи я не нашёл подобного В делфи6 можно, используя проперть TStrings.delimiter но у меня делфи5. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 26.03.2003, 13:59 |
|
||
|
Разбить строки на подстроки по разделителю
|
|||
|---|---|---|---|
|
#18+
Если у тебя запятая, то можно так: Код: plaintext 1. А с произвольным разделителем тоже можно, даже в Delphi5. Код: plaintext 1. 2. За верность синтаксиса не ручаюсь, Delphi под рукой нет ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 26.03.2003, 14:13 |
|
||
|
Разбить строки на подстроки по разделителю
|
|||
|---|---|---|---|
|
#18+
TStrings.CommaText Lists the strings in the TStrings object in system data format (SDF). property CommaText: string; Description Use CommaText to get or set all the strings in the TStrings object in a single comma-delimited string. When retrieving CommaText, any string in the list that include spaces, commas or quotes will be contained in double quotes, and any double quotes in a string will be repeated. For example, if the list contains the following strings: Stri,ng 1 Stri"ng 2 String 3 String4 CommaText will return: "Stri,ng 1","Stri""ng 2","String 3",String4 When assigning CommaText, the value is parsed as SDF formatted text. For SDF format, strings are separated by commas or spaces, and optionally enclosed in double quotes. Double quote marks that are part of the string are repeated to distinguish them from the quotes that surround the string. Spaces and commas that are not contained within double quote marks are delimiters. Two commas next to each other will indicate an empty string, but spaces that appear next to another delimiter are ignored. For example, suppose CommaText is set to: "Stri,ng 1", "Stri""ng 2" , String 3,String4 The list will then contain: Stri,ng 1 Stri"ng 2 String 3 String4 ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 26.03.2003, 14:16 |
|
||
|
Разбить строки на подстроки по разделителю
|
|||
|---|---|---|---|
|
#18+
CommaText не то Попробуй сам ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 26.03.2003, 14:47 |
|
||
|
Разбить строки на подстроки по разделителю
|
|||
|---|---|---|---|
|
#18+
А что значит просто t := TStringList.Create; t.Text := 'ddd,eee'; Что дальше? Может я не доганяю, но в этом случае t.strings[0] будет равно 'ddd,eee' ??? нет в делфи5 такого свойства как t.Delimiter ; t.DelimitedText ; НЕТУ ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 26.03.2003, 14:53 |
|
||
|
Разбить строки на подстроки по разделителю
|
|||
|---|---|---|---|
|
#18+
Проще надо быть - function StringReplace(const S, OldPattern, NewPattern: string; Flags: TReplaceFlags): string; в SysUtils Просто заменить запятую на перевод строки: StringList.Text := StringReplace(MyString,',',#13#10,[rfReplaceAll]); ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 26.03.2003, 14:56 |
|
||
|
Разбить строки на подстроки по разделителю
|
|||
|---|---|---|---|
|
#18+
Специально пошел на комп с Delphi5. Действительно, в 5 работает так: Код: plaintext 1. 2. Извиняюсь за предыдущий постинг. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 26.03.2003, 14:59 |
|
||
|
|

start [/forum/topic.php?fid=58&gotonew=1&tid=2118779]: |
0ms |
get settings: |
7ms |
get forum list: |
9ms |
check forum access: |
2ms |
check topic access: |
2ms |
track hit: |
128ms |
get topic data: |
9ms |
get first new msg: |
5ms |
get forum data: |
2ms |
get page messages: |
40ms |
get tp. blocked users: |
1ms |
| others: | 233ms |
| total: | 438ms |

| 0 / 0 |
