类似Access查找中的记忆功能【点击查看详情】
类似Access查找中的记忆功能:procedure TComLocateFrm.LocateBtnClick(Sender: TObject); var setLoOptions : TLocateOptions; i : integer; slKeys : TStrings; begin if ComboBox1.Items.IndexOf(ComboBox1.Text)0 then try slKeys := TStringList.Create; slKeys.AddStrings(ComboBox