Показать сообщение отдельно
  #2  
Старый 07.05.2009, 19:36
Аватар для TOJluK
TOJluK TOJluK вне форума
Местный
 
Регистрация: 25.02.2009
Адрес: Минск
Сообщения: 551
Версия Delphi: 2007
Репутация: 110
По умолчанию

т.е. если следующая строка = предидущей, то ее надо удалить?
Например
1 2 3 - новые данные
1 1 1 - новые данные
1 1 1 - эту строку удаляем
1 1 1 - эту строку удаляем
1 1 3 - новые данные
1 1 2 - новые данные
Смысл такой?

"Избавиться"- это удалить из базы или просто не отображать?
Если удалить, то
Код:
var stroka:string;
begin
Table1.First;
while not Table1.Eof do
 begin
 stroka:=Table1.FieldByName('colum name').AsString;
 Table1.Next;
 if Table1.FieldByName('colum name').AsString = stroka then
  Table1.Delete
  else
   stroka:=Table1.FieldByName('colum name').AsString; 
 end;
end;
по- моему так, код не проверял, могу ошибиться.
Ответить с цитированием