Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2004.02.25;
Скачать: [xml.tar.bz2];

Вниз

преобразовать строку   Найти похожие ветки 

 
snake1977   (2004-02-10 16:55) [0]

Здравствуйте!! Точно помню что видел такой вопрос у вас и даже читал ответ. Но найти не получается :((
поскажите пожалуйста как разбить строку вида "str1|str2|str3|str4" при помощи TStringList


 
staryx   (2004-02-10 17:07) [1]

Можно заменить "|" на #13#10, а потом у TStringList есть свойство, которое позволит загрузить строку, разбив ее.


 
Devel   (2004-02-10 17:16) [2]

F1 + TStringList (свойства Delimiter и DelimitedText).


 
snake1977   (2004-02-10 17:24) [3]

на Delimiter ругается Undeclared identifier


 
Fay   (2004-02-10 17:26) [4]

А Delphi на F1, случайно, не ругается?


 
Тимохов   (2004-02-10 17:28) [5]


> Fay © (10.02.04 17:26) [4]

Может у него дельфи старый - там вроде этого не было.


 
Я   (2004-02-10 17:29) [6]

var
SL: TStringList;

SL.Delimiter := "|";
SL.DelimitedText := YourText;


 
Тимохов   (2004-02-10 17:30) [7]


> Я (10.02.04 17:29) [6]

Да нет этого у него - дельфи наверняка старая.


 
snake1977   (2004-02-10 17:36) [8]

Delphi 5.0


 
Тимохов   (2004-02-10 17:37) [9]

Тогда, точно нет.


 
Fay   (2004-02-10 17:43) [10]

Настолько старая, что нет StringReplace? Ваще!


 
Sandman25   (2004-02-10 17:46) [11]

StartIndex := 1;
for I := 1 to Length(MyString) do
if MyString[I] = "|" then
begin
MyStringList.Add(Copy(MyString, StartIndex, I - StartIndex));
StartIndex := I + 1;
end;


 
TUser   (2004-02-10 18:44) [12]

См. рядом ветку, где сишник выпендривается (ее в Потрепаться отмодерировали). в названии ветки есть слово "strstok".



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

Форум: "Основная";
Текущий архив: 2004.02.25;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.46 MB
Время: 0.034 c
14-80280
Guest
2004-02-03 21:01
2004.02.25
Удаленная работа для Delphi программиста


3-79672
Nikolai_S
2004-01-30 17:19
2004.02.25
Перекрестный запрос


3-79677
Santer
2004-01-30 13:54
2004.02.25
не могу состыковать Cyrr 866 и ANSI в одном запросе!


3-79603
Крутыш
2004-02-01 17:22
2004.02.25
Access в сети


1-79914
hamster
2004-02-08 16:23
2004.02.25
Мышь





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский