Тема: TStringList
Показать сообщение отдельно
  #5  
Старый 20.02.2010, 22:45
Аватар для AleD
AleD AleD вне форума
Активный
  
Регистрация: 21.02.2009
Адрес: г.Краснокаменск
Сообщения: 383
Репутация: 91
По умолчанию
Если я правильно понял, то ведь TStringList почти для этого создан:
Код:
var
  s: TStringList;
...
  s.NameValueSeparator := '=';
  name_value := s.Valus['Name'];
end;
Для поиска сделать просто перебор
__________________
TAleD = class(TUser)
public
function HelpMe(ASubject, ARequest: String): String;
function GiveMeExample(ASubject: String): TStringList;
procedure WriteReview(APost: Integer; ADescription: TStringList);
end;
Ответить с цитированием