罗
罗子
Unregistered / Unconfirmed
GUEST, unregistred user!
IF RadioButton1.Checked THEN //定位查询
IF ADOTable1.Locate(combobox1.Text ,edit1.Text ,[locaseInsensitive])=false THEN APPLICATION.MessageBox('没有找到指定条件的商品信息!!','提示',MB_OK+MB_ICONINFORMATION)
ELSE//过滤
ADOTable1.Filter:=combobox1.Text + '=' + edit1.Text ;
adotable1.Filtered:=true;
ADOTable1.Refresh ;
IF ADOTable1.Locate(combobox1.Text ,edit1.Text ,[locaseInsensitive])=false THEN APPLICATION.MessageBox('没有找到指定条件的商品信息!!','提示',MB_OK+MB_ICONINFORMATION)
ELSE//过滤
ADOTable1.Filter:=combobox1.Text + '=' + edit1.Text ;
adotable1.Filtered:=true;
ADOTable1.Refresh ;