with caipu do
begin
DisableControls;
close;
sql.clear;
sql.add('Select 菜单.编号,菜单.名称,菜单.单价,菜单.打折,菜单.备注,菜单小类.名称');
sql.add('from 菜单,菜单小类');
sql.Add('where 菜单.所属菜单小类=菜单小类.编号');
if Edit2.Text<>'' Then
sql.add('and 菜单.名称 like ''*'+Trim(edit2.text)+'*''');
open;
EnableControls;
begin
DisableControls;
close;
sql.clear;
sql.add('Select 菜单.编号,菜单.名称,菜单.单价,菜单.打折,菜单.备注,菜单小类.名称');
sql.add('from 菜单,菜单小类');
sql.Add('where 菜单.所属菜单小类=菜单小类.编号');
if Edit2.Text<>'' Then
sql.add('and 菜单.名称 like ''*'+Trim(edit2.text)+'*''');
open;
EnableControls;
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货