edit1.readonly:=true;edit1.color:=clmenu;
edit6.text:=fieldvalues[''bookname'']; file://显示图书名
edit6.readonly:=true;edit6.color:=clmenu; file://设置显示框不可更改属性
edit7.text:=fieldvalues[''author''];
edit7.readonly:=true;edit7.color:=clmenu;
edit8.text:=fieldvalues[''publisher''];
edit8.readonly:=true;edit8.color:=clmenu;
edit9.text:=fieldvalues[''pubdate''];
edit9.readonly:=true;edit9.color:=clmenu;
edit10.text:=fieldvalues[''price''];
edit10.readonly:=true;edit10.color:=clmenu;
edit11.text:=fieldvalues[''booktype''];
edit11.readonly:=true;edit11.color:=clmenu;
edit12.text:=fieldvalues[''number1''];
edit12.readonly:=true;edit12.color:=clmenu;
if fieldvalues[''addation'']<>null
then edit25.text:=fieldvalues[''addation'']
else edit25.text:='''';
edit25.readonly:=true;edit25.color:=clmenu;
end
else
begin file://在没有查找到的情况下，清空所有显示框
edit1.readonly:=false;edit1.text:='''';edit1.color:=clmenu;
edit6.readonly:=false;edit6.text:='''';edit6.color:=clmenu;
edit7.readonly:=false;edit7.text:='''';edit7.color:=clmenu;
edit8.readonly:=false;edit8.text:='''';edit8.color:=clmenu;
edit9.readonly:=false;edit9.text:='''';edit9.color:=clmenu;
<< 上一页 [31] [32] [33] [34] [35] [36] [37] [38] [39] [40] ... 下一页 >>