摘要： 一．编写 RC 脚本文本 用记事本或其它文本编辑器编写一个扩展名为“.rc”的文件。格式如下： AVI 无声动画 BITMAP 位图文件 CURSOR 光标文件 ICON 图标文件 WAVE 声音文件 以上所列均为标准资源类型，也可以给资源自定义一个类型，如：“mytype”。不过两者在调用方式上有些不同（在后面示例“存取资源文件中的位图”中有详细描述）。二．根据 RC 脚本文件编译成 RES 资源文件 在命令提示符中输入以下内容： brcc32 FileName.rc //注：brcc32.exe在DelphiX\Bin目录中三．在Delphi单元中加入资源文件 将生成的... 阅读全文

摘要： SQL分类： DDL—数据定义语言(CREATE，ALTER，DROP，DECLARE) DML—数据操纵语言(SELECT，DELETE，UPDATE，INSERT) DCL—数据控制语言(GRANT，REVOKE，COMMIT，ROLLBACK) 首先,简要介绍基础语句： 1、说明：创建数据库CREATE DATABASE database-name 2、说明：删除数据库drop database dbname 3、说明：备份sql server --- 创建 备份数据的 deviceUSE masterEXEC sp_addumpdevice 'disk', 't 阅读全文

摘要： 在使用计算机的过程中，经常会碰到在Windows桌面上残留有程序运行后的留下一些痕迹，这时我们往往在Windows桌面上单击鼠标右键，然后选择刷新，使桌面变得干净、整洁。其实自己编代码来实现这个功能也很简单，调用一个函数SHChangeNotify即可。首先，在Delphi的单元文件的Uses部分手动添加上ShlObj，然后在按钮点击事件中加上代码如下：SHChangeNotify(SHCNE_ASSOCCHANGED, SHCNF_IDLIST, NiL, NiL); 阅读全文

摘要： DBCC CHECKIDENT( 'TableName', RESEED, 1) 阅读全文

摘要： 在Delphi中，用Length来取字符长度时，会将汉字当成两个字节来计算，Copy把汉字当成两个来处理，可能截取半个汉字，那我们如何知道是否取的是汉字呢？是否把一个汉字取完整了呢？其实，可以用ByteType对取出来的字符进行判断是一个单字符还是汉字的一部分！mbLeadByte: 汉字的第一个字节mbTrailByte: 汉字的第二个字节mbSingleByte: 单个的字符，不是中文字符。如果Copy出来的是汉字的第一个字节，就再多(或少)Copy一个，凑成完整的汉字。如下例：function GetText(strtxt:string;iLen:integer):string;begi 阅读全文

摘要： 我想让字符串在Canvas上显现出来，但不知道如何改变字底边的颜色，想变成透明或其它色彩都行，只是希望所输出的字符串不会影响到Canvas里边的图形。请问前辈们让如何做呢？Canvas.Font.Color:=clblue;//字体颜色//Canvas.Brush.Color:=clred;//底色Canvas.Brush.Style := bsClear;//透明canvas.textout(0,0,'avalokita');拉两个 TImageprocedure TfrmMain.FormCreate(Sender: TObject);beginImage1.Canvas. 阅读全文

摘要： 从一个char数组到别外一个char数组 1 procedure arrayAssignment(Src: array of AnsiChar;var Target: array of AnsiChar); 2 var 3 i, j: Integer; 4 begin 5 i := length(Src); 6 j := length(Target); 7 if j > i then 8 j := i; 9 for i := 0 to j - 1 do10 begin11 try12 Target[i] := Src[i];13 ex... 阅读全文

摘要： 在Delphi中用SPCOMM实现串口编程出处: http://www.ccw.com.cn/htm/app/aprog/01_1_8_4.aspDelphi是一种具有功能强大、简便易用和代码执行速度快等优点的可视化快速应用开发工具，它在构架企业信息系统方面发挥着越来越重要的作用，许多程序员愿意选择 Delphi作为开发工具编制各种应用程序。但是，美中不足之处是 Delphi没有自带的串口通信控件，在它的帮助文档里也没有提及串口通信，这就给编制通信程序的开发人员带来许多不便。目前，利用 Delphi实现串口通信的常用的方法有 3种：一是利用控件，如 MSCOMM控件和 SPCOMM控件；二是使 阅读全文

摘要： 环境:os:windows 2003 server enterprise edition 32bit(sp2)sqlserver:我这里是比较老的SQL Server2000 （SP4）发现了一个奇怪的问题,我获取了一个SQLServer2000数据库的备份文件(这个备份文件从哪里来的,无需追究,反正就是有一个SQL Server2000数据库的备份文件),没有任何关于这个备份文件的描述.1.如何获取数据库名称restore headeronly from disk='d:\publish\DBNAME.bak'2.如何获取数据库文件逻辑名称以及物理名称restore file 阅读全文

摘要： uses CnCommon;// 目录尾加'\'修正function MakePath(const Dir: string): string;// 路径尾去掉 '\'function MakeDir(const Path: string): string;// 取系统目录function GetSystemDir: string;// 取Program Files目录function GetProgramFilesDir: string;// 取Windows目录function GetWindowsDir: string;// 应用程序路径function A 阅读全文