按键盘上方向键 ← 或 → 可快速上下翻页，按键盘上的 Enter 键可回到本书目录页，按键盘上方向键 ↑ 可回到本页顶部！
————未阅读完？加入书签已便下次继续阅读！
3、在窗体的 MouseDown 过程中加入以下代码：
Private Sub Form_MouseDown（Button As Integer； Shift As Integer； X As Single； Y As Single）
ReleaseCapture
SendMessage Me。hwnd； WM_SYSMAND； SC_MOVE； 0
End Sub
其中 ReleaseCapture 函数用来释放鼠标捕获，SendMessage 函数向 Windows 发送移动窗体的消息。
4、保存并运行程序，按下鼠标，你会发现窗体会随着鼠标的移动而移动。
以上讲述了如何在 VB 中用鼠标拖动窗体，其实，控件的拖动的原理是一样的。例如以下代码可以实现图片框的拖动：
ReleaseCapture
SendMessage Picture1。hwnd； WM_SYSMAND； SC_MOVE； 0
（注：以上程序在 Windows98、VB5。0/6。0 下调试通过。在 NT4。0、VB6。0 下不能运行。）
103；Q：用 Delphi5。0 编程实现 Windows 桌面的隐藏和显示
A：实现原理是调用 Windows 的 API 函数。程序代码如下：
procedure TForm1。Button1Click（Sender： TObject）；
var hDesktop：Thandle；
begin
hDesktop：FindWindow（'Progman'；nil）；
ShowWindow（hDesktop；SW_HIDE）； //隐藏桌面
end；
procedure TForm1。Button2Click（Sender： TObject）；
var hDesktop：Thandle；
begin
hDesktop：FindWindow（'Progman'；nil）；
ShowWindow（hDesktop；SW_SHOW）； //显示桌面
end；
procedure TForm1。Button3Click（Sender： TObject）；
begin
close；
end
104；Q：应用 Microsoft TTS 语音引擎的 Delphi 语言实例
A：建立一个单窗体工程，添加一个 Edit 和 2 个 Button 控件，分别命名为 Edit1、btnSpeak、btnStop。然后安装引用 TTS 的 vtxtauto。tlb 类库文件，方法是点击菜单“工程Import Type Library”，点“add”按钮，然后选中 Windowsspeech 下的 Vtxtauto。tlb 文件，放入安装包后，再将其添加成 Delphi 的一个 Unit，自动产生的名字为“VTxtAuto_TLB”。然后，在主 Unit 的 Uses 里引用 VTxtAuto_TLB，即在 Uses 后添加字串“VTxtAuto_TLB”。最后参考以下代码：
……
procedure TfrmSpeech。FormCreate（Sender： TObject）；
begin
vtxt：CoVTxtAuto_。Create；
vtxt。Register（''；'Speech'）；
Edit1。Text：'I am a chinese； I love my homeland very much； and you？'
end；
procedure TfrmSpeech。btnSpeakClick（Sender： TObject）；
begin
vtxt。Speed：100；
vtxt。Speak（trim（Edit1。Text）；10）；
end；
procedure TfrmSpeech。btnStopClick（Sender： TObject）；
begin
vtxt。StopSpeaking；
end；
end。
第六卷 第一章
？1；Q：怎样把别人网页上的背景音乐保存下来？
A：浏览该网页后；在你的 WindowsTemporary Internet Files 文件夹下可以找到该背景音乐的缓存文件，拷贝出来即可使用。如果还是找不见该文件，可以打开网页的源文件，找到音乐文件的 URL 路径，用“蚂蚁”等 FTP 软件进行下载。
2；Q：避免有人从你分帧的主页的帧中径直进入网站；而不是从 index。htm 中进入？
A：在帧中的网页的〈head〉〈/head〉之间加入以下脚本代码：
〈Script language〃JavaScript〃〉
if （topself）
self。location。href〃index。htm〃；
〈/Script〉
这样；当有人从帧中进入网站时；就会自动重定向到主页文件 index。htm。
3。Q：怎样防止别人把你的网页放到框架里？
A：因为框架（frame）的缘故；有许多人把别人的网页放置到自己的框架里；使之成为自己的一页。如果你要防止别人这样做；可以加入下列 JavaScript 代码即可；它会自动监测；然后跳出别人的框架。
〈Script language〃javascript〃〉
if （self top）
top。location self。location；
〈/Script〉
4；Q：怎样在 FrontPage2000 中加入 Flash 动画？
A：在 FrontPage2000 中；点击＇插入＇》＇高级＇》＇插件＇，在弹出的窗口中，设置一下 Flash 文件的大小及其它信息，确定即可。
5；Q：怎样在网页中加入注释？
A：在共同网页开发中，加入注释是防止分工被搞混淆或者注释某段代码特殊的含义，加入注释的格式是：
〈［注释内容…］〉
6；Q：怎样测试浏览器并自动装入所需要的网页？
A：目前微软和网景的浏览器并不能完全兼容所有网页，有的网页在某种浏览器中非常漂亮， 而用其它浏览器查看时却一团糟。如果你需要测试浏览器，可以加入以下 JavaScript 代码使浏览器自动装入所需要的网页：
〈script LANGUAGE〃JavaScript〃〉
function TestBrowser（）
｛
ie （（navigator。appName〃Microsoft Internet Explorer〃） && （parseInt（navigator。appVersion） 》 3 ））
ns （（navigator。appName 〃Netscape〃） && （parseInt（navigator。appVersion） 》 3 ））
if （ns） ｛ setTimeout（〃location。href〃ns。htm；10）； ｝
else ｛setTimeout（〃location。href〃ie。htm；10）； ｝
｝
〈/script〉
7；Q：怎样让链接没有下划线？
A：只要在〈Head〉〈/Head〉中加入以下代码，所有链接就都没有下划线了：
〈style type〃text/css〃〉
〈
a ｛texttransform：none；textdecoration：none；｝
a：hover ｛textdecoration：underline｝
〉
〈/style〉。
8；Q：怎样在网页中加入 Email 链接并显示预定的主题？
A： 〈A href〃mailto：Emailhost@263。net？subject主题〃〉……〈/a〉
9；Q：怎样让网页的背景图像不滚动？
A： Internet Explorer 浏览器支持一个 Body 属性 bgproperties，它可以让背景不滚动：
〈Body Background〃图片文件〃 bgproperties〃fixed〃〉
10；Q；怎样定义网页的关键字？
A：在网页中加入关键字；可以供某些搜索站台机器人使用；它们会利用该关键字为你的网站做索引， 这样，当别人用关键字搜索网站时，如果你的网页包含该关键字，那么就可以被列出了。定义本网页关键字，可以在〈Head〉〈/Head〉中加入如下代码：
〈meta name〃Keywords〃 content〃china；enterprise；business；net〃〉
Content 中所包含的就是关键字；你可以自行设置。
这里有个技巧；你可以重复某一个单词；这样可以提高自己网站的排行位置；如：
〈meta name〃Keywords〃 content〃china；china；china；china〃〉
11；Q：怎样隐藏在状态栏里出现的链接信息？
A：大家知道；当你指向一个链接时；该链接的信息就会出现在浏览器的状态栏里； 如果需要隐藏它；可以本链接中做如下设置：
〈a href〃zhanghing。yeah。net〃 onMouseOver〃window。status〃none〃； return true〃〉链接〈/a〉
12；Q：怎样在网页中加入多媒体播放？
A：有些多媒体文件无需其他程序就可以播放， 而有许多多媒体文件需要外部程序才能播放。如果浏览器没有安装这种外部程序，那么浏览器会自动去下载。 要加入多媒体格式；可加入如下代码：
〈EMBED SRC〃test。ram〃 AUTOSTART〃TRUE〃 LOOP〃3〃 WIDTH〃80〃 HEIGHT〃30〃〉
13；Q：怎样在网页中加入电子邮件表单提交？
A：表单提交需要 CGI 程序的支持；但也可以利用 Email 提交；当你设计好表单后， 把 Action 内容加入邮件地址即可，例如：
〈form method〃POST〃 action〃mailto：zhangking@263。net〃 ENCTYPE〃text/plain〃〉
……
〈/form〉
14；Q：用 Word 作为 Html 编辑器产生的代码比较冗长，怎么优化？
A：可以用网页制做软件 Dreameweaver3。0 进行优化。
15；Q：IE5。0 的部分快捷键：
A：打开查找功能：Ctrl＋F
关闭浏览器窗口：Ctrl＋W
打开地址栏下拉列表框：F4
刷 新：F5
将当前Web页保存到收藏夹列表：Ctrl＋D
打开当前 IE 窗口的一个拷贝：Ctrl＋N
停止下载当前网页：Esc
光标迅速移动到网页的开头：Home
光标迅速移动到网页的尾部：End
打开新的地址键入窗口：Ctrl＋O
打开收藏夹：Ctrl＋I
打开历史记录文件夹：Ctrl＋H
打开浏览器设定的默认主页：Alt＋HOME
16；Q：网页上的图形格式：
A：图形的格式千奇百怪，但是一般浏览器支持的图形格式只有 。gif 和 。jpg（。jpe），这两种都是经过压缩的图形文档。所以文件较小，适合在网络上传送。如果你的图形是别的格式， 则必须使用图形处理软件来将其转存成 。GIF 或 。JPG 的图形格式。但到底该用那一种图形格式呢？ 先看看下面的比较：GIF 格式 JPEG 格式
压缩比例 较小 从大到小有四种选择
最多支援的颜色 256色 全彩（16百万色）
渐显功能（“隔行”方式） GIF89a有 无
背景透明功能 GIF89a有 无
动画 GIF89a有 无
结论是：比较大或颜色较多的图形就用 。JPG 的格式； 比较小或颜色较少， 而且需要有特殊功能的图，就用 。GIF 格式。注意：。GIF 还分为 GIF87a 和比较新的 GIF89a 两种格式，一些特殊的功能（像透明背景） 则是 GIF89a