Автор Павел Смирнов задал вопрос в разделе Другие языки и технологии
DELPHI ! Срочно плиззз!!!! и получил лучший ответ
Ответ от Gennady[гуру]
Или вручную парсить, или в библиотеке RxLib (модуль StrUtils.pas) есть
function ExtractWord(N: Integer; const S: string; const WordDelims: TCharSet): string;
N - порядковый номер слова; WordDelims - множество символов-разделителей слов. Количество слов возвращает
function WordCount(const S: string; const WordDelims: TCharSet): Integer;
Ответ от Pavlickm[мастер]
В TStringList есть свойство Delimider и DelimitedText
В TStringList есть свойство Delimider и DelimitedText
Ответ от DiG DeePeR[гуру]
В Delphi есть еще функция ExtractStrings(). Парсит исходную строку с занесением результатов в StringList.
Например нам нужно из ip-адреса (172.26.14.78) получить значения каждого байта:
var SL:TStringList;
begin
SL:=TStringList.Create;
try
ExtractStrings(['.'], [' '], PChar('172.26.14.78'), SL);
finally
sl.Free;
end;
end;
В итоге мы получим в SL следующие значения:
SL[ 0 ]='172'
SL[ 1 ]='26'
SL[ 2 ]='14'
SL[ 3 ]='78'
Вот и все!
В Delphi есть еще функция ExtractStrings(). Парсит исходную строку с занесением результатов в StringList.
Например нам нужно из ip-адреса (172.26.14.78) получить значения каждого байта:
var SL:TStringList;
begin
SL:=TStringList.Create;
try
ExtractStrings(['.'], [' '], PChar('172.26.14.78'), SL);
finally
sl.Free;
end;
end;
В итоге мы получим в SL следующие значения:
SL[ 0 ]='172'
SL[ 1 ]='26'
SL[ 2 ]='14'
SL[ 3 ]='78'
Вот и все!
Ответ от 3 ответа[гуру]
Привет! Вот подборка тем с ответами на Ваш вопрос: DELPHI ! Срочно плиззз!!!!