delphi 记录添加问题 - Delphi / 数据库相关
使用tadoquery、tdbgrid过程中遇到当点击tdbgrid中的数据时，添加不了新记录，如果刚进窗体直接点就可以.
procedure Tfcost.ToolButton1Click(Sender: TObject);
var
i,j,k:integer;
s1,s2:string;
begin
if adoquery1.Active then
begin
adoquery1.FindLast;
i:=adoquery1.RecNo;
s1:=adoquery1.FieldValues['fcostcode'];
i:=strtoint(s1)+1;
s2:=format('%.4d',[i]);
adoquery1.Append;
adoquery1.FieldByName('fcostcode').Value:=s2;
adoquery1.FieldByName('fcostname').Value:='<新项目>';
adoquery1.FieldByName('fcosttypid').Value:=1;
adoquery1.FieldByName('fmoney').Value:=0;
end;
end;
补充一下
出错提示当前记录不在插入或编辑状态。记录指向最后一条记录，dbgrid中没有新记录。
用dbnavigator也是一样，要按两次才看见新记录。
再补充一下，我的数据库是sql server 2000 ，有个字段是fcostid是自动的
终于找到问题所在，我在另一个事件处理中有些问题。
相关问答：
hongqi162、windindance
此2人长期不在线，特别是windindance
更换有能力的人上
hongqi162还是经常上来转转的
引用
更换有能力的人上
其实也不是什么能力的原因，主要可能是时间问题吧
工作的还要上班，学� ......
程序使用的是Orcal数据库，想定期（每季度）对数据库进行备份，没啥头绪，请问应该怎么弄？
有什么特殊要求吗，比如要前端界面？
一般用数据库自带的“计划任务”配置一下就够了
没有什么特殊要求。例如，只要� ......
procedure WMNCHitTest(var Msg:TWMNCHitTest); message WM_NCHITTEST;
procedure WMNCPaint(var Msg: TWMNCPaint); message WM_NCPAINT;
请问一下，这两个函数是上面意思，在上面时候调用，message WM_NCHITTEST; ......
你们遇到这个问题吗？使用delphi 的时候，来了一封信。说要我教版权费。我昏倒。怎么办？
不能怎么办,一是理他们 2是不理他们
你放话叫他们来公司查。。。看他们有胆没？
不理他们就是，当时也问我们公司要的 ......
