在cxgrid中根据第一列的ID值，对第二列进行下拉过滤

procedure TForm1.cxGrid1TableView1Column3GetPropertiesForEdit(

  Sender: TcxCustomGridTableItem; ARecord: TcxCustomGridRecord;

  var AProperties: TcxCustomEditProperties);

begin

    (**)// arecord.Values[1]// 第二列的值   arecord.Values[1]

 if not varisnull(arecord.Values[1]) then

 begin

   ADOQuery2.filtered := false;

   ADOQuery2.filter := 'aid='  +arecord.Values[1] ;//

   ADOQuery2.filtered := true;

   aproperties :=   EditRepositoryLookupComboBoxItem1.Properties;

   end;
end;



列的syncmode=True;