| 技术论坛 |
|
|
| ≡技术区≡ ① |
| DELPHI技术 |
| lazarus/fpc/Free Pascal |
| 移动应用开发 |
| Web应用开发 |
| 数据库专区 |
| 报表专区 |
| 网络通讯 |
| 开源项目 |
| 论坛精华贴 |
| ≡发布区≡ ② |
| 发布代码 |
| 发布控件 |
| 文档资料 |
| 经典工具 |
| ≡事务区≡ ③ |
| 网站意见 |
| 盒子之家 |
| 招聘应聘 |
| 信息交换 |
| 论坛信息 |
|||
|
| 导航： | 论坛 -> DELPHI技术 斑竹:liumazi,sephil | |||||
| 作者： |
|
2004/3/14 15:38:57 | ||||
| 标题： |
|
加入我的收藏 | ||||
| 楼主： | 请高手帮忙看看，这段代码总是运行（‘没有该学号，请重新输入！’） 为什么呢！！！！！！！！！ with table1 do if table1.FieldByName('学号').AsString=edit1.Text then begin if (form20.ComboBox1.Text='第一学期') and (table1.FieldByName('第一学期').AsString=') then begin table1.Edit; table1.Insert; table1.FieldValues['第一学期']:=edit2.Text; end else showmessage('该处已有记录，请先删除再录入！'); table1.Post; table1.Refresh; end else showmessage('没有该学号，请重新输入！'); ---------------------------------------------- - |
|||||
| 作者： |
|
2004/3/14 16:04:08 | ||||
| 1楼： | 因为每次执行都是同一条记录呀！ ---------------------------------------------- 我来自农村广阔的田野我的每一个动作都很夸张http://waterstone.51r.com |
|||||
| 作者： |
|
2004/3/14 18:06:22 | ||||
| 2楼： | if table1.FieldByName('学号').AsString=edit1.Text 该语句意思是：从表中取出第一条字段为“学号”的值，与你输入的edit1.Text 相对比。建议你进行以下两项检查： 1。看看你输入的信息是否和table1中的第一条是否相等。 2。如果“学号”为CHAR 型，比较前用 函数去掉空格: if trim(table1.FieldByName('学号').AsString)=edit1.Text ---------------------------------------------- - |
|||||
| 信息 |
| 登陆以后才能回复 |
