DELPHI医院 SQL急诊 - Delphi / 数据库相关
sql数据库
dbGrid浏览 编辑
其中一字段为逻辑字段,当某一记录的该字段修改为TRUE时,其它记录的该字段全部为FALSE
希望就在dbGrid的某事件中完成,请教. (提供说明或是代码均可)
在修改字段值保存时，记住修改的记录的id，然后update不等于该id的这个字段值为False，然后重新load数据，再定位到这个id记录上
我希望知道在dbGrid或是数据源的什么事件中写代码,如何检测到该字段发生了变化...
afterpost
数据源的afterpost事件
方法一： 使用触发器
方法二： 在afterpost事件中写代码
建议不要在触发器中写，因为要维护两处代码。
可以在afterpost里写，也可以在post动作后直接写处理语句。
参考代码如下：
注：Adoquery1与dbGrid关联，Adoquery2用于执行SQL语句。
修改某行记录的字段后，假设主键为keyid，值为123。
Adoquery1.post;
Adoquery2.sql.clear;
Adoquery2.sql.add("update table1 set column1 = false where keyid <> 123");
Adoquery2.Execute;
Adoquery1.reopen;
或
Adoquery1.close;
Adoquery1.open;
Adoquery1.locate(); 定位回主键为keyid，值为123的记录。
谢谢,有启发
因为操作之前必须有操作确认,我只能把代码写在DBGrid1MouseUp中
if DBGrid1.SelectedField.FieldName = 'school_Default' then ...
if Application.MessageBox('确定改变默认的工程单位吗? ...
结题了!
相关问答：
type Exception report
message
description The server encountered an internal error () that prevented it from fulfilling this request.
exception
org.apache.jas ......
已知Python 中：
s = unicode("测试", "gb2312")
s = u'\u6d4b\u8bd5'
print s
测试
在Delphi里面如何将\u6d4b\u8bd5这样的还原成Gb2312的汉字呢？
找到个方法
......
今天做了一个存储过程 环境是SQL2000数据库
大致如下
建立临时表
定义员工游标
循环员工（属于1个公司)
......
字段1,字段2.....字段N,Status,ParentID
1,Name1....test1,1,99
1,Name1....test1,3,99
1,Name2....test2,1,101
1,Name2....test2,3,101
1,Name3....test3,2,101
1,Name1....test1,4,101
想要的结果是:
1,Na ......
程序使用的是Orcal数据库，想定期（每季度）对数据库进行备份，没啥头绪，请问应该怎么弄？
有什么特殊要求吗，比如要前端界面？
一般用数据库自带的“计划任务”配置一下就够了
没有什么特殊要求。例如，只要� ......
