C crbs Unregistered / Unconfirmed GUEST, unregistred user! 2001-11-22 #1 请问在delphi数据库表中随机选题时,可以从记录的部分中选择吗? 例如在一个试题库中有5种难度系数的题目, 现在要随机选取难度系数为1的题目5题,有什么好的方法吗?谢谢!
B bbs_delphi Unregistered / Unconfirmed GUEST, unregistred user! 2001-11-22 #3 找找讨论过的帖子,好像刚讨论完这个相似的问题 http://www.delphibbs.com/delphibbs/dispq.asp?lid=513301 http://www.delphibbs.com/delphibbs/dispq.asp?lid=685955
找找讨论过的帖子,好像刚讨论完这个相似的问题 http://www.delphibbs.com/delphibbs/dispq.asp?lid=513301 http://www.delphibbs.com/delphibbs/dispq.asp?lid=685955
S savenight Unregistered / Unconfirmed GUEST, unregistred user! 2001-11-22 #4 const len=MaxLen; TThems=class FMems:array of TTheme; FCount:integer; ... end; TTheme=class FDifficulty :integer; FNumber:integer; ... end; ..... var i,j:integer; t:TThems; ok:boolean; begin ok:=false; j:=0; randomize; repeat i:=random(MaxLen)+1; if t.FDifficulty =1 then begin j:=t.FNumber; ok:=true; end; until ok=true; ...
const len=MaxLen; TThems=class FMems:array of TTheme; FCount:integer; ... end; TTheme=class FDifficulty :integer; FNumber:integer; ... end; ..... var i,j:integer; t:TThems; ok:boolean; begin ok:=false; j:=0; randomize; repeat i:=random(MaxLen)+1; if t.FDifficulty =1 then begin j:=t.FNumber; ok:=true; end; until ok=true; ...
C crbs Unregistered / Unconfirmed GUEST, unregistred user! 2001-11-22 #5 表结构如下: 编号,题型,内容,答案,难度系数,试卷类型。 有6大题型:选择,判断,填空,简答与计算,问答,综合分析。 难度系数有:1,2,3,4,5。 题库中有上千个记录。是否应该每个题型都建一个表? 现在要随机取出填空题,且要求难度系数为1的1题,2的1题,3的3题,4的3题,5的2题。 可以举一个例子吗?就以难度系数为1的1题。 谢谢!
表结构如下: 编号,题型,内容,答案,难度系数,试卷类型。 有6大题型:选择,判断,填空,简答与计算,问答,综合分析。 难度系数有:1,2,3,4,5。 题库中有上千个记录。是否应该每个题型都建一个表? 现在要随机取出填空题,且要求难度系数为1的1题,2的1题,3的3题,4的3题,5的2题。 可以举一个例子吗?就以难度系数为1的1题。 谢谢!