Query.SQL.Clear;
Query.SQL.Add('select 姓名 from“表名”where 部门=:aa);
parameters.parambyname('aa').value:='经营部';
Query.oen;
Query.First;
ComboBox.Items.Clear;
while not Query.Eof do
begin
ComboBox.Items.Add(Query.FieldBYName('姓名').AsString);
Query.Next;
end;
Query.SQL.Clear;
Query.SQL.Add('select 姓名 from“表名”where 部门=''经营部''');
Query.Active:=True;
Query.First;
ComboBox.Items.Clear;
while not Query.Eof do
begin
ComboBox.Items.Add(Query.FieldBYName('姓名').AsString);
Query.Next;
end;