Показать сообщение отдельно
  #5  
Старый 09.09.2009, 20:19
lubcha lubcha вне форума
Прохожий
 
Регистрация: 09.09.2009
Сообщения: 4
Репутация: 10
По умолчанию

Как написано выше, через ButtonClik, файл создается, ин-фы в нем нет...Через события ComboBoxа пробовал тоже самое, нашел на исходниках.ru ответ сегодня.....процедура не позволяет также вводить дублированные значения...
Код:
Var
  Index:Integer;
Begin
  Index:=ComboBox1.Items.Count-1;
  While (Index>=0) And (ComboBox1.Text<>ComboBox1.Items[Index]) Do
    Dec(Index);
  // или Index:=ComboBox1.Items.IndexOf(ComboBox1.Text);
  If Index=-1
  Then
    ComboBox1.Items.Append( ComboBox1.Text);
    ComboBox1.Items.SaveToFile('Name.txt');
end;
Всем спасибо!!!!!


Мы,таки, начнем соблюдать правила....
Ответить с цитированием