R
redwood
Unregistered / Unconfirmed
GUEST, unregistred user!
form2_query1.close;
form2_query1.sql.clear;
form2_query1.sql.Add('SELECT 学号,姓名,年龄,性别,籍贯,出生日期,政治面貌,入学日期,专业,班级 FROM "xueji_main.db" Xueji_main WHERE 年龄>=:age1 and 年龄<=:age2');
form2_query1.parambyname('age1').asinteger := StrToInt(edit25.text);
form2_query1.parambyname('age2').asinteger := StrToInt(edit26.text);
form2_query1.Open;
form2_query1.sql.clear;
form2_query1.sql.Add('SELECT 学号,姓名,年龄,性别,籍贯,出生日期,政治面貌,入学日期,专业,班级 FROM "xueji_main.db" Xueji_main WHERE 年龄>=:age1 and 年龄<=:age2');
form2_query1.parambyname('age1').asinteger := StrToInt(edit25.text);
form2_query1.parambyname('age2').asinteger := StrToInt(edit26.text);
form2_query1.Open;