摘要: 计算机的时——CPU时间计算机的空——内存为了节省CPU的处理时间,就必须用更多的内存;要想节省内存,就势必会使用更多的CPU处理时间。明此者,明数据结构与算法。架构--就是分而治之;算法--就是时空转换。 阅读全文
posted @ 2010-08-14 14:43 delphi中间件 阅读(177) 评论(0) 推荐(0) 编辑
摘要: 将释放写在子窗体的FORMCLOSE()里面procedure TFormLogin.FormClose(Sender: TObject; var Action: TCloseAction);begin Action := caFree; FormLogin := nil;end;关闭TABSHEET的时候,遍历找到它里面的窗体,然后调用窗体的close()方法procedure TFormMain.CloseTabsheet;var i: Integer; begin if RzPageControl1.PageCount <= 0 then Exit; if RzPageContro 阅读全文
posted @ 2010-08-14 14:27 delphi中间件 阅读(440) 评论(0) 推荐(0) 编辑
摘要: 使用递归方法遍历MAINMENU的所有菜单项procedure TFormMain.BLMenu; procedure GetItems(AItem:TMenuItem); var I:integer; begin AItem.OnClick := MenuTreeClick;//菜单项关联点击事件 for I:=0 to AItem.Count-1 do begin GEtItems(AItem.Items[I]); end; end;var I:integer;begin for I:=0 to MainMenu1.Items.Count-1 do begin GetIt... 阅读全文
posted @ 2010-08-14 14:19 delphi中间件 阅读(304) 评论(0) 推荐(0) 编辑