﻿<?xml version="1.0" encoding="utf-8" standalone="yes"?><rss version="2.0" xmlns:dc="http://purl.org/dc/elements/1.1/" xmlns:trackback="http://madskills.com/public/xml/rss/module/trackback/" xmlns:wfw="http://wellformedweb.org/CommentAPI/" xmlns:slash="http://purl.org/rss/1.0/modules/slash/"><channel><title>博客园-万一的 Delphi 博客-随笔分类-&lt;span class=bt&gt;2c.&lt;/span&gt;TScreen 类</title><link>http://www.cnblogs.com/del/category/120907.html</link><description>记录学习过程中的点点滴滴，是喜欢、不是职业；记性不好，特别需要这么一个博客。</description><language>zh-cn</language><lastBuildDate>Tue, 27 May 2008 13:26:28 GMT</lastBuildDate><pubDate>Tue, 27 May 2008 13:26:28 GMT</pubDate><ttl>60</ttl><item><title>捕捉全屏图像</title><link>http://www.cnblogs.com/del/archive/2008/05/16/1200587.html</link><dc:creator>万一</dc:creator><author>万一</author><pubDate>Fri, 16 May 2008 06:30:00 GMT</pubDate><guid>http://www.cnblogs.com/del/archive/2008/05/16/1200587.html</guid><wfw:comment>http://www.cnblogs.com/del/comments/1200587.html</wfw:comment><comments>http://www.cnblogs.com/del/archive/2008/05/16/1200587.html#Feedback</comments><slash:comments>0</slash:comments><wfw:commentRss>http://www.cnblogs.com/del/comments/commentRss/1200587.html</wfw:commentRss><trackback:ping>http://www.cnblogs.com/del/services/trackbacks/1200587.html</trackback:ping><description><![CDATA[&nbsp;&nbsp;&nbsp;&nbsp; 摘要: unitUnit1;interfaceusesWindows,Messages,SysUtils,Variants,Classes,Graphics,Contro...&nbsp;&nbsp;<a href='http://www.cnblogs.com/del/archive/2008/05/16/1200587.html'>阅读全文</a><img src ="http://www.cnblogs.com/del/aggbug/1200587.html?type=1" width = "1" height = "1" /><br><br><div align=right><a style="text-decoration:none;" href="http://del.cnblogs.com/" target="_blank">万一</a> 2008-05-16 14:30 <a href="http://www.cnblogs.com/del/archive/2008/05/16/1200587.html#Feedback" target="_blank" style="text-decoration:none;">发表评论</a></div>]]></description></item><item><title>TScreen 类 - 获取当前输入法与输入法列表 </title><link>http://www.cnblogs.com/del/archive/2008/01/22/1048945.html</link><dc:creator>万一</dc:creator><author>万一</author><pubDate>Tue, 22 Jan 2008 08:58:00 GMT</pubDate><guid>http://www.cnblogs.com/del/archive/2008/01/22/1048945.html</guid><wfw:comment>http://www.cnblogs.com/del/comments/1048945.html</wfw:comment><comments>http://www.cnblogs.com/del/archive/2008/01/22/1048945.html#Feedback</comments><slash:comments>0</slash:comments><wfw:commentRss>http://www.cnblogs.com/del/comments/commentRss/1048945.html</wfw:commentRss><trackback:ping>http://www.cnblogs.com/del/services/trackbacks/1048945.html</trackback:ping><description><![CDATA[&nbsp;&nbsp;&nbsp;&nbsp; 摘要: //获取输入法列表beginMemo1.Lines:=Screen.Imes;end;//获取当前输入法varkl:HKL;i:Integer;...&nbsp;&nbsp;<a href='http://www.cnblogs.com/del/archive/2008/01/22/1048945.html'>阅读全文</a><img src ="http://www.cnblogs.com/del/aggbug/1048945.html?type=1" width = "1" height = "1" /><br><br><div align=right><a style="text-decoration:none;" href="http://del.cnblogs.com/" target="_blank">万一</a> 2008-01-22 16:58 <a href="http://www.cnblogs.com/del/archive/2008/01/22/1048945.html#Feedback" target="_blank" style="text-decoration:none;">发表评论</a></div>]]></description></item><item><title>TScreen 类 - 判断当前焦点在哪个窗体上 </title><link>http://www.cnblogs.com/del/archive/2008/01/22/1048937.html</link><dc:creator>万一</dc:creator><author>万一</author><pubDate>Tue, 22 Jan 2008 08:50:00 GMT</pubDate><guid>http://www.cnblogs.com/del/archive/2008/01/22/1048937.html</guid><wfw:comment>http://www.cnblogs.com/del/comments/1048937.html</wfw:comment><comments>http://www.cnblogs.com/del/archive/2008/01/22/1048937.html#Feedback</comments><slash:comments>0</slash:comments><wfw:commentRss>http://www.cnblogs.com/del/comments/commentRss/1048937.html</wfw:commentRss><trackback:ping>http://www.cnblogs.com/del/services/trackbacks/1048937.html</trackback:ping><description><![CDATA[&nbsp;&nbsp;&nbsp;&nbsp; 摘要: unitUnit1;interfaceusesWindows,Messages,SysUtils,Variants,Classes,Graphics,Contro...&nbsp;&nbsp;<a href='http://www.cnblogs.com/del/archive/2008/01/22/1048937.html'>阅读全文</a><img src ="http://www.cnblogs.com/del/aggbug/1048937.html?type=1" width = "1" height = "1" /><br><br><div align=right><a style="text-decoration:none;" href="http://del.cnblogs.com/" target="_blank">万一</a> 2008-01-22 16:50 <a href="http://www.cnblogs.com/del/archive/2008/01/22/1048937.html#Feedback" target="_blank" style="text-decoration:none;">发表评论</a></div>]]></description></item><item><title>TScreen 类 - 判断当前焦点在哪个控件上</title><link>http://www.cnblogs.com/del/archive/2008/01/22/1048912.html</link><dc:creator>万一</dc:creator><author>万一</author><pubDate>Tue, 22 Jan 2008 08:39:00 GMT</pubDate><guid>http://www.cnblogs.com/del/archive/2008/01/22/1048912.html</guid><wfw:comment>http://www.cnblogs.com/del/comments/1048912.html</wfw:comment><comments>http://www.cnblogs.com/del/archive/2008/01/22/1048912.html#Feedback</comments><slash:comments>0</slash:comments><wfw:commentRss>http://www.cnblogs.com/del/comments/commentRss/1048912.html</wfw:commentRss><trackback:ping>http://www.cnblogs.com/del/services/trackbacks/1048912.html</trackback:ping><description><![CDATA[&nbsp;&nbsp;&nbsp;&nbsp; 摘要: procedureTForm1.Timer1Timer(Sender:TObject);beginText:=Screen.ActiveControl.ClassName;en...&nbsp;&nbsp;<a href='http://www.cnblogs.com/del/archive/2008/01/22/1048912.html'>阅读全文</a><img src ="http://www.cnblogs.com/del/aggbug/1048912.html?type=1" width = "1" height = "1" /><br><br><div align=right><a style="text-decoration:none;" href="http://del.cnblogs.com/" target="_blank">万一</a> 2008-01-22 16:39 <a href="http://www.cnblogs.com/del/archive/2008/01/22/1048912.html#Feedback" target="_blank" style="text-decoration:none;">发表评论</a></div>]]></description></item><item><title>TScreen 类 - 使用 Screen.Cursors</title><link>http://www.cnblogs.com/del/archive/2008/01/22/1048858.html</link><dc:creator>万一</dc:creator><author>万一</author><pubDate>Tue, 22 Jan 2008 08:02:00 GMT</pubDate><guid>http://www.cnblogs.com/del/archive/2008/01/22/1048858.html</guid><wfw:comment>http://www.cnblogs.com/del/comments/1048858.html</wfw:comment><comments>http://www.cnblogs.com/del/archive/2008/01/22/1048858.html#Feedback</comments><slash:comments>0</slash:comments><wfw:commentRss>http://www.cnblogs.com/del/comments/commentRss/1048858.html</wfw:commentRss><trackback:ping>http://www.cnblogs.com/del/services/trackbacks/1048858.html</trackback:ping><description><![CDATA[&nbsp;&nbsp;&nbsp;&nbsp; 摘要: unitUnit1;interfaceusesWindows,Messages,SysUtils,Variants,Classes,Graphics,Contro...&nbsp;&nbsp;<a href='http://www.cnblogs.com/del/archive/2008/01/22/1048858.html'>阅读全文</a><img src ="http://www.cnblogs.com/del/aggbug/1048858.html?type=1" width = "1" height = "1" /><br><br><div align=right><a style="text-decoration:none;" href="http://del.cnblogs.com/" target="_blank">万一</a> 2008-01-22 16:02 <a href="http://www.cnblogs.com/del/archive/2008/01/22/1048858.html#Feedback" target="_blank" style="text-decoration:none;">发表评论</a></div>]]></description></item><item><title>TScreen 类 - 通过 Screen 更换光标</title><link>http://www.cnblogs.com/del/archive/2008/01/22/1048723.html</link><dc:creator>万一</dc:creator><author>万一</author><pubDate>Tue, 22 Jan 2008 07:12:00 GMT</pubDate><guid>http://www.cnblogs.com/del/archive/2008/01/22/1048723.html</guid><wfw:comment>http://www.cnblogs.com/del/comments/1048723.html</wfw:comment><comments>http://www.cnblogs.com/del/archive/2008/01/22/1048723.html#Feedback</comments><slash:comments>5</slash:comments><wfw:commentRss>http://www.cnblogs.com/del/comments/commentRss/1048723.html</wfw:commentRss><trackback:ping>http://www.cnblogs.com/del/services/trackbacks/1048723.html</trackback:ping><description><![CDATA[&nbsp;&nbsp;&nbsp;&nbsp; 摘要: //更换窗体或某个控件的光标可以不通过Screen对象,譬如:beginSelf.Cursor:=crAppStart;Panel1.Cursor:=crHandPo...&nbsp;&nbsp;<a href='http://www.cnblogs.com/del/archive/2008/01/22/1048723.html'>阅读全文</a><img src ="http://www.cnblogs.com/del/aggbug/1048723.html?type=1" width = "1" height = "1" /><br><br><div align=right><a style="text-decoration:none;" href="http://del.cnblogs.com/" target="_blank">万一</a> 2008-01-22 15:12 <a href="http://www.cnblogs.com/del/archive/2008/01/22/1048723.html#Feedback" target="_blank" style="text-decoration:none;">发表评论</a></div>]]></description></item><item><title>TScreen 类 - 程序中窗体的个数</title><link>http://www.cnblogs.com/del/archive/2008/01/22/1048576.html</link><dc:creator>万一</dc:creator><author>万一</author><pubDate>Tue, 22 Jan 2008 06:10:00 GMT</pubDate><guid>http://www.cnblogs.com/del/archive/2008/01/22/1048576.html</guid><wfw:comment>http://www.cnblogs.com/del/comments/1048576.html</wfw:comment><comments>http://www.cnblogs.com/del/archive/2008/01/22/1048576.html#Feedback</comments><slash:comments>0</slash:comments><wfw:commentRss>http://www.cnblogs.com/del/comments/commentRss/1048576.html</wfw:commentRss><trackback:ping>http://www.cnblogs.com/del/services/trackbacks/1048576.html</trackback:ping><description><![CDATA[&nbsp;&nbsp;&nbsp;&nbsp; 摘要: //一个包含两个窗体的例子,这是工程中的内容:programProject1;usesForms,Unit1in'Unit1.pas'{Form1},Un...&nbsp;&nbsp;<a href='http://www.cnblogs.com/del/archive/2008/01/22/1048576.html'>阅读全文</a><img src ="http://www.cnblogs.com/del/aggbug/1048576.html?type=1" width = "1" height = "1" /><br><br><div align=right><a style="text-decoration:none;" href="http://del.cnblogs.com/" target="_blank">万一</a> 2008-01-22 14:10 <a href="http://www.cnblogs.com/del/archive/2008/01/22/1048576.html#Feedback" target="_blank" style="text-decoration:none;">发表评论</a></div>]]></description></item><item><title>TScreen 类 - 关于 Screen 对象</title><link>http://www.cnblogs.com/del/archive/2008/01/22/1048500.html</link><dc:creator>万一</dc:creator><author>万一</author><pubDate>Tue, 22 Jan 2008 05:23:00 GMT</pubDate><guid>http://www.cnblogs.com/del/archive/2008/01/22/1048500.html</guid><wfw:comment>http://www.cnblogs.com/del/comments/1048500.html</wfw:comment><comments>http://www.cnblogs.com/del/archive/2008/01/22/1048500.html#Feedback</comments><slash:comments>1</slash:comments><wfw:commentRss>http://www.cnblogs.com/del/comments/commentRss/1048500.html</wfw:commentRss><trackback:ping>http://www.cnblogs.com/del/services/trackbacks/1048500.html</trackback:ping><description><![CDATA[&nbsp;&nbsp;&nbsp;&nbsp; 摘要: Screen对象是TScreen类的一个变量,它声明在Forms单元的第1323行(Delphi2007);并且TScreen类也来自Forms单元.也就是说,只...&nbsp;&nbsp;<a href='http://www.cnblogs.com/del/archive/2008/01/22/1048500.html'>阅读全文</a><img src ="http://www.cnblogs.com/del/aggbug/1048500.html?type=1" width = "1" height = "1" /><br><br><div align=right><a style="text-decoration:none;" href="http://del.cnblogs.com/" target="_blank">万一</a> 2008-01-22 13:23 <a href="http://www.cnblogs.com/del/archive/2008/01/22/1048500.html#Feedback" target="_blank" style="text-decoration:none;">发表评论</a></div>]]></description></item><item><title>TScreen 类 - 屏幕的逻辑宽度与高度 </title><link>http://www.cnblogs.com/del/archive/2008/01/22/1048478.html</link><dc:creator>万一</dc:creator><author>万一</author><pubDate>Tue, 22 Jan 2008 05:09:00 GMT</pubDate><guid>http://www.cnblogs.com/del/archive/2008/01/22/1048478.html</guid><wfw:comment>http://www.cnblogs.com/del/comments/1048478.html</wfw:comment><comments>http://www.cnblogs.com/del/archive/2008/01/22/1048478.html#Feedback</comments><slash:comments>0</slash:comments><wfw:commentRss>http://www.cnblogs.com/del/comments/commentRss/1048478.html</wfw:commentRss><trackback:ping>http://www.cnblogs.com/del/services/trackbacks/1048478.html</trackback:ping><description><![CDATA[&nbsp;&nbsp;&nbsp;&nbsp; 摘要: varw,h:Integer;beginw:=Screen.Width;h:=Screen.Height;Text:=Format('当前屏幕的分...&nbsp;&nbsp;<a href='http://www.cnblogs.com/del/archive/2008/01/22/1048478.html'>阅读全文</a><img src ="http://www.cnblogs.com/del/aggbug/1048478.html?type=1" width = "1" height = "1" /><br><br><div align=right><a style="text-decoration:none;" href="http://del.cnblogs.com/" target="_blank">万一</a> 2008-01-22 13:09 <a href="http://www.cnblogs.com/del/archive/2008/01/22/1048478.html#Feedback" target="_blank" style="text-decoration:none;">发表评论</a></div>]]></description></item><item><title>TScreen 类 - 获取字体列表</title><link>http://www.cnblogs.com/del/archive/2008/01/22/1048474.html</link><dc:creator>万一</dc:creator><author>万一</author><pubDate>Tue, 22 Jan 2008 05:03:00 GMT</pubDate><guid>http://www.cnblogs.com/del/archive/2008/01/22/1048474.html</guid><wfw:comment>http://www.cnblogs.com/del/comments/1048474.html</wfw:comment><comments>http://www.cnblogs.com/del/archive/2008/01/22/1048474.html#Feedback</comments><slash:comments>0</slash:comments><wfw:commentRss>http://www.cnblogs.com/del/comments/commentRss/1048474.html</wfw:commentRss><trackback:ping>http://www.cnblogs.com/del/services/trackbacks/1048474.html</trackback:ping><description><![CDATA[&nbsp;&nbsp;&nbsp;&nbsp; 摘要: unitUnit1;interfaceusesWindows,Messages,SysUtils,Variants,Classes,Graphics,Contro...&nbsp;&nbsp;<a href='http://www.cnblogs.com/del/archive/2008/01/22/1048474.html'>阅读全文</a><img src ="http://www.cnblogs.com/del/aggbug/1048474.html?type=1" width = "1" height = "1" /><br><br><div align=right><a style="text-decoration:none;" href="http://del.cnblogs.com/" target="_blank">万一</a> 2008-01-22 13:03 <a href="http://www.cnblogs.com/del/archive/2008/01/22/1048474.html#Feedback" target="_blank" style="text-decoration:none;">发表评论</a></div>]]></description></item></channel></rss>