医院 his delphi mysql_HIS-DELPHI-读取数据库配置
产品思维：
1.做成可配置的
2.模块化
医生会有自己熟悉的药品，数据里面药品太多，让医生选择不放便
所以可以让医生自己维护自己的药品模板数据
比如医生开了处方后，可以保存当前的处方到某个模板中，那么下次他可以调用这个模板
这个模板只是保存了药品的基本信息列表，医生每次调用时都要检查一下这个药品是否够
库存，是否还已经被禁用。而这个检查应该做成开关形式的，当开启了就检查，没哟开启就算了
这个配置可以写在数据库，或者ini文件
1. table zyparam
subsys varchar
subkeyvarchar
namevarchar
valvarchar
memovarchar
2. 利用Locate 函数定位找到配置信息，利用到了Delphi的属性功能。Get,Set
FIsCanDealOtherDoctorOrder := False;
if Q.Locate(name, IsCanDealOtherDoctorOrder, []) then
FIsCanDealOtherDoctorOrder := (Q.FieldByName(val).AsString = 1);
初始化EXE或窗体时执行
3.医生调用模板数据后，执行检查操作是判断 是否需要检查
产品思维： 1.做成可配置的 2.模块化 医生会有自己熟悉的药品，数据里面药品太多，让医生选择不放便 所以可以让医生自己维护自己的药品模板数据 比如医生开了处方后，可以保存当前的处方到某个模板中，那么下次他可以调用这个模板 这个模板只是保存了药品的基本信息列表，医生每次调用时都要检查一下这个药品是否够 库存，是否还已经被禁用。而这个检查应该做成开关形式的，当开启了就检查，没哟开启就算了 这个配置可以写在数据库，或者ini文件 1. table zyparam subsys varchar subkeyvarchar namevarchar valvarchar memovarchar 2. 利用Locate 函数定位找到配置信息，利用到了Delphi的属性功能。Get,Set FIsCanDealOtherDoctorOrder := False; if Q.Locate(name, IsCanDealOtherDoctorOrder, []) then FIsCanDealOtherDoctorOrder := (Q.FieldByName(val).AsString = 1); 初始化EXE或窗体时执行 3.医生调用模板数据后，执行检查操作是判断 是否需要检查