癫狂编程

摘要： 使用Delphi7+ADO，如何得知数据集是否发生了改变，即是否有记录值改变，或删除记录，或新增记录，目的是在关闭相关窗口时，提示用户保存数据 if adotable1.Modified then{//提示保存} 我用的是事务提交，所以不能只判断当前记录的状态 if state in [dsinse 阅读全文

摘要： procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char); begin if not (key in [ '.',#8]) then key:=#0; //只能输入小数点end; procedure TForm1.Edit1KeyP 阅读全文