Показать сообщение отдельно
  #3  
Старый 31.08.2011, 15:53
Аватар для NumLock
NumLock NumLock вне форума
Let Me Show You
 
Регистрация: 30.04.2010
Адрес: Северодвинск
Сообщения: 5,426
Версия Delphi: 7, XE5
Репутация: 59586
По умолчанию

Цитата:
0=один
1=два
2=три
0=пять

Код:
begin
  ShowMessage(IntToStr(Memo1.Lines.IndexOf('1=два'))); // = 1
  ShowMessage(IntToStr(Memo1.Lines.IndexOf('0=пять'))); // = 3
  ShowMessage(IntToStr(Memo1.Lines.IndexOfName('2'))); // = 2
  ShowMessage(Memo1.Lines.Values['2']); // = три
  ShowMessage(Memo1.Lines.Names[1]); // = 1
end;
__________________
Пишу программы за еду.
__________________
Ответить с цитированием