повторяющиеся данные в dbgrid - ? Опции

[1147]

Подскажите пожалуйста, как можно сделать с помощью фильтра, чтобы при вводе в dbedit, например номера 128-ас, и если такой же номер уже есть в gride, то указывалось что этот номер уже существует?

[volvo]

Что значит "что такое"? Ну, смотри: в StringList-е данные хранятся в виде строк, так? Каждый sL.Strings[ i ] - отдельная строка. Как узнать, присутствует ли в СтрингЛисте определенная строка? Можно, конечно, сделать:

Found := -1; // Если искомой строки не будет, Found останется равным (-1)
for i := 0 to sL.Count do
begin
  if sL.Strings[ i ] = 'нужная строка' then Found := i;
end;
// Вот теперь смотрим, если Found = -1, то 'нужная строка' в СтрингЛисте
// отсутствует, иначе Found содержит индекс того элемента Strings, в котором
// она содержится

Это все, конечно, хорошо, но у StringList-а есть готовый метод IndexOf, который получает строку, и выдает индекс элемента, в котором она хранится, или (-1), если строка не была найдена. То есть, код, написанный выше - это реализация того самого IndexOf. Теперь понятно, что значит Index? Это индекс элемента, который надо удалить. Да, это обычная переменная типа Integer, ее надо описывать.

Про Lines забудь, это мой недочет. Я просто проверял кое-что на Memo (для визуализации), а там, чтобы добраться до СтрингЛиста, надо обратиться к свойству Lines. Ну, и забыл удалить... Итого имеем:

var index: Integer;
...
  Index := sL.IndexOf(удаляемая_строка);
  if Index <> -1 then sL.Delete(Index);