696

Проблемы с таблицей в Delphi 6 & InterBase 6

Может кто поможет?Есть база данных под InterBase 6.Есть приложение, написанное на Delphi 6 работающее с базой.В базе создана таблица, в которой хранится картинка:/* Table: SINGLELINESCHEME */CREATE TABLE PRINCIPSCHEME ( SCHEMENO INTEGER NOT NULL, IDENTNO INTEGER, FILIALCODE INTEGER, PICTURE BLOB sub_type 0 segment size 32767);В чём проблема, собственно: В Delphi я отфильтровываю таблицу, ограничивая её по значениям полей IDENTNO , FILIALCODE .Проблема заключается в том, что фильтр работает некорректно: выбирается последняя внесённая в таблицу запись, игнорируя значения полей IDENTNO , FILIALCODE .if PrincipScheme.Active then PrincipScheme.Close;PrincipScheme.Filtered:=false;PrincipScheme.Filter:=''(IDENTNO=''+ IntToStr(PassportQuery.FieldByName(''IDENTNO'').AsInteger) +'') and (FILIALCODE=''+ IntToStr(Filials.FieldByName(''CODE'').AsInteger)'';PrincipScheme.Filtered:=true;if not(PrincipScheme.Active) then PrincipScheme.Open;DBImage1.DataField:='''';DBImage1.DataSource:=DM.PrincipSchemeDataSource;DBImage1.DataField:=''PICTURE'';//PrincipScheme.Filtered:=false;if PrincipScheme.RecordCount>0 then PrincipScheme.Edit else PrincipScheme.Append;непонятная вещь - метод ApplyUpdates работает.Почему же тогда фильтру начхать на ограничения по полям IDENTNO , FILIALCODE ?Буду благодарен за помощь.
0