第38章
作者:佚名    更新:2021-12-03 10:35
  然后安装引用 TTS 的 vtxtauto.tlb 类库文件,方法是点击菜单“工程-Import Type Library”,点“add”按钮,然后选中 Windows\speech 下的 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:浏览该网页后,在你的 Windows\Temporary Internet Files 文件夹下可以找到该背景音乐的缓存文件,拷贝出来即可使用。如果还是找不见该文件,可以打开网页的源文件,找到音乐文件的 URL 路径,用“蚂蚁”等 FTP 软件进行下载。
  2,Q:避免有人从你分帧的主页的帧中径直进入网站,而不是从 index.htm 中进入?
  A:在帧中的网页的〈head〉〈/head〉之间加入以下脚本代码:
  〈Script language="JavaScript"〉
  if (top==self)
  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 {text-transform:none;text-decoration:none;}
  a:hover {text-decoration:underline}
  --〉
  〈/style〉。
  8,Q:怎样在网页中加入 E-mail 链接并显示预定的主题?
  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 中所包含的就是关键字,你可以自行设置。