在delphi开发中,我不想使用第三方控件,准备自己用图片来构建界面,去除掉form的工具栏,然后自己用图片来贴,但是在具体应用中遇到很多问题,有没有高手能够提供一个简单的例子,谢谢

解决方案 »

  1.   

    设置bisystemmenu为false
    自己做一张系统样工具条图片,放置一个panel控件,设置align属性为altop,把图片盖在上面,然后依次放上最小化,关闭等按钮图片.
    双击需要点击移动窗体的图片.在里面加入代码:
      if (ssleft in shift) then
      begin
        releasecapture;
        perform(wm_syscommand, $f012, 0);
      end;
    双击半闭图片,在里面加入代码:
    application.Terminate;
    双击最小化图片,在里面加入代码:
    application.Minimize;其它的东西就就是根据你做程序的时候的功能需要来做啦~就不在这儿详细说了.