При копирование одинаковых данных меж ListBox, проверять и выдавать сообщение о совпадении данных

@haarsnijder · Регистрация: 12.11.2014

Author24 — интернет-сервис помощи студентам

У меня есть 2 компонента ListBox, и кнопка для копирования с 1-го ListBox во 2-й, и так условие такое: при копирование одинаковых данных, выдавать сообщение, мол такое число или буква уже есть в ListBox-2

@Mawrat · 08.12.2014, 22:39

Проверка, есть ли уже такая строка в ListBox:

Delphi

var
  S : String;
  i : Integer;
begin
...
  S := ListBox1.Items[i];
  if ListBox2.Items.IndexOf(S) > -1 then
    ShowMessage('Следующая строка уже присутствует в ListBox2: "' + S + '".');

При такой проверке регистр букв не учитывается.

@haarsnijder 0 / 0 / 0 Регистрация: 12.11.2014 Сообщений: 14
		1
	При копирование одинаковых данных меж ListBox, проверять и выдавать сообщение о совпадении данных 08.12.2014, 19:39. Показов 1417. Ответов 1 Метки нет (Все метки) У меня есть 2 компонента ListBox, и кнопка для копирования с 1-го ListBox во 2-й, и так условие такое: при копирование одинаковых данных, выдавать сообщение, мол такое число или буква уже есть в ListBox-2 0

	08.12.2014, 22:39

При копирование одинаковых данных меж ListBox, проверять и выдавать сообщение о совпадении данных

Решение