08 2011 档案

DELPHI中MDI子窗口的关闭和打开
摘要：DELPHI中MDI子窗口的关闭和打开Delphi中MDI子窗口的关闭方式默认为缩小而不是关闭，所以当你单击子窗口右上角的关闭按钮时会发觉该子窗口只是最小化，而不是你预期的那样被关闭。解决办法是在子窗口的OnClose事件处理过程中加入如下代码，示例：procedure ChildForm.OnClose(Sender: TObject; var Action: TCloseAction);begin Action := caFree;end;Delphi为一个Form的关闭行为指定了四种方式，分别是：caNone 禁止Form被关闭 caHide Form不被关闭，但是被隐藏。被隐藏的For 阅读全文
posted @ 2011-08-24 21:05 bingege 阅读(3565) 评论(0) 推荐(0)
关于数据库中浮点运算、保留小数和时间计算
摘要：关于小数： 1、SQL数据表中使用numeric字段时（一定要注明小数位数），程序中使用：ADOQuery1.FieldByName('price').Value := RoundEx((ADOQuery1.FieldByName('price').AsFloat + strtofloat(Edit1.text)) * 1000) / 1000;或者ADOQuery1.FieldByName('price').Value:=adoquery1.FieldByName('price').AsFloat+strtofloat(edit 阅读全文
posted @ 2011-08-21 17:54 bingege 阅读(755) 评论(0) 推荐(0)