procedure TForm1.FormShow(Sender: TObject);
begin
  IBDatabase1.DatabaseName := '...........';  
  IBDatabase1.DefaultTransaction := IBTransaction1;  
  IBDatabase1.Connected := true;  
  
  Button1Click(self);
end;


procedure TForm1.Button1Click(Sender: TObject);
var
  FilterStr: String;
begin
  IBTable1.Close;
  IBTable1.Filtered := False;
  IBTable1.Filter := '';  
  FilterStr := '1 = 1';

  
    if (Length(Edit1.Text) > 0) then FilterStr :=  FilterStr +  ' And SERIAL = ' + edit1.Text;
    if (Length(Edit2.Text) > 0) then FilterStr :=  FilterStr +  ' And FP = ' + '''' + edit2.Text + '''';
    if (Length(Edit3.Text) > 0) then FilterStr :=  FilterStr +  ' And RSUM = ' + edit3.Text;
    if CheckBox1.Checked        then FilterStr :=  FilterStr +  ' And STATE = ' + '''' + 'N' + '''' ;
    
  IBTable1.Open;
  IBTable1.Refresh;  
  IBTable1.Filter := FilterStr;
  IBTable1.Filtered := true;
  //ShowMessage(IBTable1.Filter);
end;

server: interbase 6.0
client: D7.interbase

после соеденения с базой (FormShow) в базе попадют новые записи но они не отображаються в гриде (on Button1Click)?