荔园在线

荔园之美,在春之萌芽,在夏之绽放,在秋之收获,在冬之沉淀

[回到开始] [上一篇][下一篇]


发信人: georgehill (佐治·希尔【多情网虫无情网】), 信区: Program
标  题: Delphi实用编程经验二则
发信站: BBS 荔园晨风站 (Sun Mar 12 01:47:03 2000), 转信


资料整理·中国程序员网站


Delphi实用编程经验二则

(陕西 杨 波)



    Delphi是全新的可视化编程环境,为我们提供了一种方便、快捷的Windows应用程
序开发工具。
  下面是两则Delphi编程的实用经验,希望能与大家共享:
  1使用超文本链接标示语言(HTML)。使用Windows中的打开方式(如IE等)访问
HTML文件,受系统限制太大,不够灵活。Delphi提供了THTML控件,它能调用HTML文件,
但在它的属性中却没有详细说明怎样调用本机的HTML文件。其实,只要使用正确的URL
格式,是能够完成这一功能的,其格式如下:
  file:∥<host>/<path>
  举一个例子:如果有一个HTML文件路径为C:HelpHomeHtm;那么其正确的URL格式
应该为:file:∥C:HelpHomehtm。因此,对于控件HTML1调用该HTML文件则应该为:
HTML1RequestDoc(file:∥c:HelpHomeHtm)。这样,就可以自己编写一个程序来调
用HTML文件以形成独立的帮助文件系统。
  2使用SQL实现字段数据的模糊查询。Delphi作为一个强大的数据库应用开发工具
的一个重要标志,就是支持SQL编程。在实际的过程中,经常需要对某些字段进行模糊
查询。如对“姓名”字段进行查询,当输入“王”时,能自动地将王姓的所有记录列
出来。其实,通过结合SQL和Delphi的特点,就能很容易地完成这个功能。其基本原理
是:查询时,将查询的范围控制在姓名大于‘查询字符串+chr(0)’与小于‘查询字
符串+chr($ff)’之间,就能将满足条件的所有记录查询出来了。下面是具体的例子:
  Var
  NameStr:String; ∥设置字符串中间变量
  Begin
  NameStr:=′王′;
  Query1SQLClear {俏控制参数在NameStr+Chr(0)
  Query1params[1]AsString:=NameStr+chr($ff); ∥和NameStr+Chr($ff)
之间
  Query1Open; ∥打开数据库,执行SQL查询
  End;

--        那你可不可以教我,
        有什么办法可以不去喜欢一个人呢?

                -- Bye 赤明莉香 --
 我是来自大富翁的小美!^_^

※ 来源:·BBS 荔园晨风站 bbs.szu.edu.cn·[FROM: 192.168.1.115]


[回到开始] [上一篇][下一篇]

荔园在线首页 友情链接:深圳大学 深大招生 荔园晨风BBS S-Term软件 网络书店