博客园-delphiuphttp://www.cnblogs.com/delphiup/zh-cnSun, 23 Nov 2008 16:27:43 GMTSun, 23 Nov 2008 16:27:43 GMT60delphi MDI 闪烁问题http://www.cnblogs.com/delphiup/archive/2008/08/15/1268544.htmldelphiupdelphiupFri, 15 Aug 2008 03:28:00 GMThttp://www.cnblogs.com/delphiup/archive/2008/08/15/1268544.htmlhttp://www.cnblogs.com/delphiup/comments/1268544.htmlhttp://www.cnblogs.com/delphiup/archive/2008/08/15/1268544.html#Feedback0http://www.cnblogs.com/delphiup/comments/commentRss/1268544.htmlhttp://www.cnblogs.com/delphiup/services/trackbacks/1268544.html 用Delphi自带的MDI模板自动建立一个多文档工程，然后做如下修改，可使屏幕不闪烁
procedure TMainForm.CreateMDIChild(const Name: string);
var
  Child: TMDIChild;
begin
  { create a new MDI child window }
  Perform(WM_SETREDRAW, 0, 0); //锁屏幕
  Child := TMDIChild.Create(Application);
  Child.WindowState := wsMaximized; //假设在这里将新建的子窗体设为最大化
                                    //或设置子窗体的Width和Height都可以
  Child.Caption := Name;
  if FileExists(Name) then Child.Memo1.Lines.LoadFromFile(Name);
  Perform(WM_SETREDRAW, 1, 0); //解锁屏幕并重画
  RedrawWindow(Handle, Nil, 0, RDW_FRAME + RDW_INVALIDATE +
    RDW_ALLCHILDREN + RDW_NOINTERNALPAINT);
end;
这样，就是在主窗体中一直按着Ctrl+N不动，也不会闪烁了

[新闻]Silverlight 2 SDK中文版发布
博客园首页 社区 新闻频道 小组 博问 网摘 闪存]]>access 判断表是否存在http://www.cnblogs.com/delphiup/archive/2008/07/24/1250416.htmldelphiupdelphiupThu, 24 Jul 2008 04:57:00 GMThttp://www.cnblogs.com/delphiup/archive/2008/07/24/1250416.htmlhttp://www.cnblogs.com/delphiup/comments/1250416.htmlhttp://www.cnblogs.com/delphiup/archive/2008/07/24/1250416.html#Feedback0http://www.cnblogs.com/delphiup/comments/commentRss/1250416.htmlhttp://www.cnblogs.com/delphiup/services/trackbacks/1250416.htmlSelect * From MSysObjects where name='table' and type=1 (1 table,3 view)

 

默认的情况是admin对MSysObjects没有任何权限！包括查询

　　打开您的ACCESS数据库，然后

　　工具 -> 选项 -> 视图 -> 隐藏对象、系统对象
前面的勾选上。

　　工具 -> 安全 -> 用户与组的权限
在对象名称中选定 MSysObjects ，然后权限中设置其权限。

　　OK，现在可以试一试了，以后这个数据库就可以直接读取MSysObjects表了



[新闻][译稿]微软将 jQuery IntelliSense整合到Visual Studio
博客园首页 社区 新闻频道 小组 博问 网摘 闪存]]>