{var%20f='http://v.t.sina.com.cn/share/share.php?appkey=1515056452',u=z||d.location,p=['&url=',e(u),'&title=',e(t||d.title),'&source=',e(r),'&sourceUrl=',e(l),'&content=',c||'gb2312','&pic=',e(p||'')].join('');function%20a(){if(!window.open([f,p].join(''),'mb',['toolbar=0,status=0,resizable=1,width=440,height=430,left=',(s.width-440)/2,',top=',(s.height-430)/2].join('')))u.href=[f,p].join('');};if(/Firefox/.test(navigator.userAgent))setTimeout(a,0);else%20a();})(screen,document,encodeURIComponent,'','','https://www.manongdao.com/data/attach/logo/logo.png', '推荐 乱世女痞 的问题《How can I put a custom button on the title bar? [d》','https://www.manongdao.com/q-799089.html','页面编码gb2312|utf-8默认gb2312'));){kind=link}
Possible Duplicate:
Non client painting on aero glass window
I want to have a button like Skype's compact-view button on the title bar. How can I do that?
For example:
相关问题
- Is there a Delphi 5 component that can handle .png
- Is there a way to install Delphi 2010 on Windows 2
- Is TWebBrowser dependant on IE version?
- iOS objective-c object: When to use release and wh
- DBGrid - How to set an individual background color
相关文章
- Best way to implement MVVM bindings (View <-> V
- Windows EventLog: How fast are operations with it?
- How to force Delphi compiler to display all hints
- Coloring cell background on firemonkey stringgrid
- HelpInsight documentation in Delphi 2007
- Can RTTI interrogate types from project code at de
- What specifically causes EPrivilege to be raised?
- Equivalent to designer guidelines in code
You can use the JvCaptionButton which comes free in the very-nice-but-very-large open-source free JVCL library. It is a general purpose "caption button". Caveat: The appearance is not purely native and not Windows-7-aero-themed.
This button does not decide what to take out of your app, you would have to write the code to make the form go into compact mode, and you could click this caption-bar button, and write the code in its OnClick Event.
At runtime: