我想把表里的L字段都变成45,如下: adotable1.open; adotable1.First; l:=45; counter:=1; while counter<=adotable1.RecordCount do begin adotable1.Edit; adotable1.FieldByName('l').AsFloat:=l; adotable1.Post; adotable1.Next; counter:=counter+1; end; 错误: ADOtable1:dataset not in edit or insert mode;
----------------------------------------------
Function IThink(Boy,Girl : TPerson) : String; begin if Boy.钱 < 10W then Girl.Say(''滚!'') else begin if Girl.Anser = ''我愿意'' then Result := ''结婚'' else Result := IntToStr(88); end; 风过不折→百炼成尧 QQ: 7315910
还是不行啊, 我试了,同样的错误信息,这是为什么啊??
----------------------------------------------
Function IThink(Boy,Girl : TPerson) : String; begin if Boy.钱 < 10W then Girl.Say(''滚!'') else begin if Girl.Anser = ''我愿意'' then Result := ''结婚'' else Result := IntToStr(88); end; 风过不折→百炼成尧 QQ: 7315910