9931.txt

关于编程技术技巧的文章

================================================================

                           《编 程 技 术》

                 一份属于广大编程爱好者的电子杂志

               这是一份完全关于探讨编程的免费电子杂志
               您可以任意传播本刊，但必须保持它的完整
              本刊承诺绝不向订户发送任何形式的垃圾邮件！
================================================================
              第31期 99/11/07          本期发送数: 5297 
================================================================

◆本期栏目◆
 *网友作品*
    UniView 1.2
    《户籍管理1.8》
    201电话卡密码破解程序
 *技术文档*
    用C＋＋Builder 建立数据库VCL使用经验
    用Delphi创建临时文件
    用VB5.0开发通信软件的技巧 
    开发win95屏幕保护预览程序
 *下载专区*
    4个ActiveX控件下载
 *有问必答*

****************************************************************
****************************************************************

◆网友作品◆

006.
名称:UniView
版本:1.2
作者：chcw
Email: [e-mail]
主页: 无
运行平台: Windows95&98
性质:免费软件
下载地址: http://www.newhua.com/down/UniView.zip (523KB)
功能简介:
UniView是功能强大的图片浏览器，它能对多种常见格式的图像文件进行浏
览和格式转换.
主要特点：
1.支持的图像格式: 
UniView可以读入以下图象格式文件: 
*.UFO(加密漫画文件格式，UniView无须口令，即可读入该种格式文件), 
*.AFI,*.VST, *.TGA, *.PNG, *.PCC, *.PCX, *.TIFF(包括多页TIFF文件), 
*.TIF, *.JPG, *.JPEG, *.BMP, *.GIF(包括动画GIF文件), *.WMF, *.EMF, 
*.ICO, *.FIF, *.PBM, *.PGM, *.PPM, *.MAC, *.IMG,*.PCD
UniView可以将读入的图象文件转化为以下格式: 
*.BMP, *.GIF, *.JPG, *.TIF, *.PCX, *.PNG, *.EMF, *.TGA. (以及将动
画GIF文件转换为*.AVI格式)
2.显示图像前对图像进行抖动预处理, 使图像得到优化的显示. 
3.支持对图像进行缩放, 旋转, 自动调整大小, 全屏幕显示, 手工滚动, 
打印等操作.
4. 支持对图片进行正向、逆向和随机方式的幻灯浏览.
5. 支持将图片以平铺、居中或拉伸方式设置为墙纸.	
6.支持文件的Drag & Drop(拖放)操作. 
7.支持对图像文件进行批量格式转换. 
8.支持对图像文件格式进行关联; 动态调整屏幕显示模式等操作. 

007.
软件名称：《户籍管理1.8》
下载地址：http://xf-bbs.hb.cninfo.net/~xcsoft/down/hjgl.zip
主页地址：http://xcsoft.yeah.net
硬件要求：386以上
内存：1M
硬盘：2M空间
运行平台：DOS或WIN95/98下的MS－DOS
支持的汉字平台：UCDOS等汉字平台或WIN95/98的PDOS95
软件性质：共享软件
软件介绍：
村务管理之户藉管理是村居管理户口的好软件！
一个非常适和村居基层单位部门使用的户口管理软件,
从此再也不必为查户口,登记户口烦恼了!!!

008.
201电话卡密码破解程序 201craker ( 严禁将本程序用于非法目的 )  
下载地址：
201电话卡密码破解程序 Ver1.1  68k  
http://www.zg169.net/~jamesxia/201c11.zip
201电话卡密码破解程序 Ver1.1 源程序  21k  
http://www.zg169.net/~jamesxia/201c11s.zip
主页地址： http://jamesxia.yeah.net

201电话卡是中国电信在各大城市发行的一种有帐号、密码及一定面额的电
话卡，可以在任何一部音频电话上拨打。主要用于各大城市的大学中！
201craker的作用就是测试201电话卡的密码。 
特点：  
1、全中文界面  
2、各项设置完全，全面适应各地不同的拨号方法。  
3、支持1~9位密码， 密码不足6位时加“#”。  
4、受到201电话卡拨号的限制，每测试一个密码约需要20秒左右的时间，
破解一个4位的密码需要50个小时左右。
5、本软件是自由软件，你可以自由传播本软件及修改源程序，但严禁将本
程序用于非法目的。  
6、本软件将不定期进行升级，欢迎访问我的主页。  


您自己开发过软件吗? 您有自己满意的作品吗? 您希望发布推广您的作品
吗? 本刊竭诚为您提供宣传空间。有意的朋友请把您的作品介绍以及下载
地址、您的网址、联系方法等相关信息发给我（具体格式请参照上面）。
本刊免费为您宣传三期。如有疑问可以与我联系。
我的信箱: [e-mail]

****************************************************************
****************************************************************

◆技术文档◆

              用C＋＋Builder 建立数据库VCL使用经验

                               杨超
 
　　随着数据库的广泛应用，数据库编程已经成为程序设计中发展迅猛的
一支。C＋＋ Builder在数据库开发方面具有的强大功能是无可比拟的，
你甚至可以不写一行程序就生成漂亮的数据库程序。

　　下面对C＋＋Builder中的几个数据库VCL的使用技巧做一下介绍：

　　一、DBGrid控件

　　1.设置DBGrid的字段显示宽度属性 

　　为了在DBGrid中建立较小的列，你必须建立一个显示标题，它等于或
小于字段值。例如，你希望建立一个只有三个字符宽的列，你的列标题显
示必须只有三个字符或更少。 

　　2.改变DBGrid的显示字段及日期显示格式 

　　(1)双击DBGrid对应的Table1,进入字段编辑器。

　　(2)点右键出现选单选“Add Fields…" ,出现添加字段对话框，选择
要添加的字段（该字段将在运行时由DBGrid显示）然后点OK按钮。 

　　(3)假设添加了“日期”字段，点该字段，在属性表中的：DisplayLabel
中填入你希望DBGrid显示的字段名。如果原来字段名是英文的，这里用中
文名后DBGrid将显示中文名。在DisplayFormat中填入：yyyy－mm－dd，
以后日期将按1999－05－28格式显示。

　　二、Tquery控件

　　Tquery 控件是数据库编程中非常重要的一个控件，它负责通过BDE与
数据库建立联系，通过SQL语句方便的建立查询。Query必须建立相应的SQL
才能生效。

　　Tquery的参数设置如下：

　　(1)在SQL属性中：Select ＊ from 表名 where 字段名=:变量名 

　　跟在“ : "后面的是变量。这样写后，在参数属性中就可以修改该变
量的数据类型等。 

　　(2)对变量的赋值： 

　　 Query1－〉Active=false; 

　　 Query1－〉Params－〉Items[0]－〉AsString=Edit1－〉Text; 

　　 Query1－〉Active=true;//查找符合变量的记录 

　　(3)用DBGrid显示结果 

　　DBGrid的DataSource与DataSource1连接，而DataSource1的DataSet与
Tquery1 连接。 

　　三、应用示例

　　通过Query控件嵌入SQL语句建立的查询比Table更简单、更高效。

　　用一个简单的代码来说明如何建立查询程序：

　　例如，要建立一个检索表1中书名为book1的程序则在表单上放置DBGrid,
DataSource,Query三个控件加入以下代码：

　　DBGrid1－〉DataSource=DataSource1;

　　DataSource1－〉DataSet=Tqery1;

　　Query1－〉Close();

　　Query1－〉SQL－〉Clear();

　　Query1－〉SQL－〉Add(″Select ＊ From 表 Where (书名=′book1′ ″);

　　Query1－〉ExecSQL(); 

　　Query－〉Active=true;

　　你就可以在生成的表格中看到所有名称为book1的记录。
 
****************************************************************

                      用Delphi创建临时文件
        
                             褚健耘

　　在用Delphi 3.0开发应用程序时，经常需要建立一个或多个临时文件
方便程序的开发。用完后，可以将其删除。如何在Delphi 3.0 中创建临时
文件，需要用到Windows的API函数GetTempFileName。下面将介绍该函数的
格式和使用它创建临时文件的方法。

　　一、函数格式：（用VB说明）

　　Private Declare Function GetTempFileName Lib "kernel32" Alias 
"GetTempFileNameA" (ByVal lpszPath As String, ByVal lpPrefixString 
As String, ByVal wUnique As Long, ByVal lpTempFileName As String) 
As Long 

　　参数说明: lpszPath参数表示创建新文件的路径名; lpPrefixString参
数表示给定文件名的前缀; wUnique参数应设置为0,表示文件名称自动产生
的随机号码; lpTempFileName参数表示一个字符串缓存区域,至少有256个字
符长度存放临时文件的名称。

　　二、创建含有如下控件的窗体：

　　控件      CAPTION      FONT       SIZE
　　FORM1   建立临时文件
　　EDIT1        空
　　BUTTON1 建立临时文件   宋体         12 
　　BUTTON2    退出        宋体         12

　　三、程序代码如下：

　　unit tempfiles;

　　interface

　　uses

　　 Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,

　　 StdCtrls;

　　type

　　 TForm1 = class(TForm)

　　 Edit1: TEdit;

　　 Button1: TButton;

　　 Button2: TButton;

　　 Label1: TLabel;

　　 procedure Button1Click(Sender: TObject);

　　 procedure Button2Click(Sender: TObject);

　　 private

　　 { Private declarations }

　　 public

　　 { Public declarations }

　　 end;

　　var

　　 Form1: TForm1;

　　implementation

　　{＄R ＊.DFM}

　　procedure TForm1.Button1Click(Sender: TObject);

　　var tempfilename:pchar;

　　 drivename:pchar;

　　begin

　　 drivename:=′c:′;

　　 getmem(tempfilename,256);

　　 gettempfilename(drivename,′text′,0,tempfilename);

　　 edit1.text:=tempfilename;

　　end;

　　procedure TForm1.Button2Click(Sender: TObject);

　　begin

　　 close;

　　end;

　　end.

　　按下F9键，执行本程序，单击“建立临时文件”按钮，在C盘当前目录
下新创建的临时文件的文件名称显示在编辑框控件中。用资源管理器可以
检查该临时文件是否存在。