排班算法跪求 Delphi / Windows SDK/APIhttp://www.delphi2007.net/DelphiBase/html/delphi_20061208131750224.html
字段名 字段 数据类型 说明
序号 ID int 自增
医生编号 DocNo Char[8] 外键
轮值周期 ReturnType int 0 周,1半月,2一个月;缺省 0
轮值序号 ReturnID int 当ReturnType为0,取值为1-7;当ReturnType为1,取值为1-15;当ReturnType为2,取值为1-31(根据月份应不一样);
班次 ReturnSq int 1上午班、2下午班、3晚班、0整班
生效日期 ValideTime Date
是否专家 IsPro Boolean 0 不是,1是
类别 ProType Char[6]
数据表形式如上,我该怎么实现说明中的所说~
10分少了点吧! 呵呵呵呵.
可是我只能写10不知道为什么??
帮我下吧~
10分少了点吧! 呵呵呵呵.
-------------------开玩笑的别在意
没有问题, 给你做一个. 如果你能等待的话. 晚上好吗?
好的.我自己想了个很白痴的方法.不是算法.都是在界面上实现的.选了"轮值周期"ReturnType之后,要录入"轮值序号 "使用mousedown事件来判断我选择的ReturnType,根据选择跳出不同的窗口,提示选择"轮值序号 ",这时是用combobox手动添加好""轮值序号 "供选择.比如我选了 ReturnType为0,那判断后跳出另一个FORM,上面的 combobox供选择已经设好了1-7.依次类推...很小儿科的做法~
老冯麻烦指点下比较"专业"的算法