parameters 'AQMPROBLEM_TYPE' notfound
懒蝈蝈 2008-04-21 06:42:21 SqlText := 'UPDATE TABLE_PROBLEM SET PROBLEM_TYPE:= AQMPROBLEM_TYPE,'
+'PROBLEM_CONTENT := AQMPROBLEM_CONTENT,'
+'PROBLEM_CONTENT_TXT := AQMPROBLEM_CONTENT_TXT, '
+'PROBLEM_DIFFCULTY := AQMPROBLEM_DIFFCULTY,'
+'PROBLEM_KEY := AQMPROBLEM_KEY,'
+'PROBLEM_KNOWLEDGE := AQMPROBLEM_KNOWLEDGE'
+'where PROBLEM_ID = '+inttostr(deleteid);
DM.AQWModify.SQL.Clear;
DM.AQWModify.SQL.Add(SqlText);
DM.AQWModify.Parameters.Refresh;
DM.AQWModify.parameters.ParamByName('AQMPROBLEM_TYPE').Value := problemKind;
DM.AQWModify.parameters.ParamByName('AQMPROBLEM_CONTENT').LoadFromStream(streamWord,ftBlob);
DM.AQWModify.parameters.ParamByName('AQMPROBLEM_CONTENT_TXT').value :=problemContentTxt;
DM.AQWModify.parameters.ParamByName('AQMPROBLEM_DIFFCULTY').Value := HardnessToNumber(problemHardness);
DM.AQWModify.parameters.ParamByName('AQMPROBLEM_KEY').Value := MemoToString(answer.Lines);
DM.AQWModify.parameters.ParamByName('AQMPROBLEM_KNOWLEDGE').Value :=listToString(knowledge);
DM.AQWModify.ExecSQL;
运行时总是说parameters 'AQMPROBLEM_TYPE' notfound。
后来加了 DM.AQWModify.Parameters.Refresh;
还是不行,望高手指教,本人是新人没啥分数