Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.02.11;
Скачать: CL | DM;

Вниз

Разделение строки по шаблону(~regexp)   Найти похожие ветки 

 
Dinara ©   (2002-01-25 22:48) [0]

Как можно разрезать строку на части по определенной последовательности символов?

Например, MyString="C://dir/dir2/ind.jpg;0;1;0;1;1"
Как порезать ее в дельфи на части по точке с запятой?


 
Ghost. ©   (2002-01-26 01:07) [1]

function StrToArrays(str: string; r: string): TStrings;
var
j: integer;
Temp: TStringList;
begin
Temp := TStringList.Create();
while str <> "" do
begin
j := Pos(r,str);
if j=0 then j := Length(str) + 1;
Temp.Add(Copy(Str,1,j-1));
Delete(Str,1,j+length(r)-1);
end;
Result := Temp;
end;


 
MBo ©   (2002-01-26 07:20) [2]

stringlist.commatext:=StringReplace(mystring,";",",",[rfReplaceAll]);



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

Текущий архив: 2002.02.11;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.013 c
3-32149
DeNNiss
2002-01-16 13:07
2002.02.11
Уважаемые Мастера!


1-32187
novomod
2002-01-28 23:36
2002.02.11
Подскажите мастера, как проиграть wav,mp3 при нажатии


14-32340
DarK sPiRiT
2001-12-22 18:26
2002.02.11
Бинарная очередь в Делфи


7-32352
Новенький
2001-11-06 00:58
2002.02.11
Нужно написать маленький чат на Delphi для работы через Lpt-порт


3-32115
Alex SW
2002-01-15 10:23
2002.02.11
Проблема с InterBase 6