2010 年 11月随笔档案 - sunjun0427

Delphi在case语句中使用字符串

摘要：在case语句中使用字符串 (**** 转载敬请注明－本文出处：南山古桃(nsgtao)的百度空间：http://hi.baidu.com/nsgtao/ ****) 在 case 语句中使用字符串 --- by 熊恒(beta)我今天要介绍的是一个比较另类的方法。大家都知道，case 语句只能对顺序类型（ordinal type）管用，那么我们先看一下顺序类型到底有那些呢：1)整型；2)字符... 阅读全文

posted @ 2010-11-30 11:23 sunjun0427 阅读(17168) 评论(2) 推荐(1)

DelForEx的Ctrl+D与CnPack的函数过程例表冲突解决方法

摘要：将快捷键改为其他即可阅读全文

posted @ 2010-11-25 00:47 sunjun0427 阅读(405) 评论(0) 推荐(0)

Delphi2010 调用 delphi6，7 dll的PChar参数的兼容问题

摘要：Delphi2010 CallFunction:unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TForm1 = class(TForm) btn1: TButton; btn2: TButton; p... 阅读全文

posted @ 2010-11-25 00:02 sunjun0427 阅读(1157) 评论(0) 推荐(0)

Unit Rzbutton was compiled with a different version of Graphics.clHotLight(clMenuBar,clMenuHighlight)报错的解决方法

摘要：在D6下会出错是因为没有安装D6的升级包所致，只要安装了update2就没有问题阅读全文

posted @ 2010-11-24 00:17 sunjun0427 阅读(989) 评论(0) 推荐(0)

Delphi6 企业版升级包SP2下载链接地址

摘要：http://www.delphifans.com/SoftView/SoftView_333.html 阅读全文

posted @ 2010-11-23 23:51 sunjun0427 阅读(932) 评论(0) 推荐(0)

Delphi如何传递二维数组

摘要：unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TForm1 = class(TForm) Button1: TButton; procedure Button1Click(Sender: TObjec... 阅读全文

posted @ 2010-11-19 09:26 sunjun0427 阅读(2801) 评论(0) 推荐(0)

TRzComboBox的使用

摘要：TRzComboBox支持items显示值,values存储真实需要值,比如一个编号,名称对照表,可以将编号列表存入values,将名称表存入items中.表中数据为：id text0 a1 b2 c通过数据库连接查询出结果集放入 clientdataset1中whlie not eof dobeginrzcombobox1.AddItemValue(clientdataset1.FieldByN... 阅读全文

posted @ 2010-11-18 15:52 sunjun0427 阅读(1257) 评论(0) 推荐(0)

Setup Factory 会话变量

摘要：Session variables are special types of variables that are expanded at runtime when they are used. When they are used on screens, their values are automatically expanded for you, however if a session v... 阅读全文

posted @ 2010-11-10 10:01 sunjun0427 阅读(660) 评论(0) 推荐(0)

Delphi WebBrowser 响应回车Enter键(兼容Silverlight)

摘要：在Form放置一个ApplicationEvents控件，在OnMessage事件中写下面的代码：uses ActiveXprocedure TForm1.ApplicationEvents1Message(var Msg: tagMSG; var Handled: Boolean);const StdKeys = [VK_TAB, VK_RETURN, VK_DELETE, VK_BACK... 阅读全文

posted @ 2010-11-09 11:00 sunjun0427 阅读(1103) 评论(0) 推荐(0)

Delphi对Excel的所有操作

摘要：学完这个你就成为excel高手了！（Delphi对Excel的所有操作）逐个试试！一)使用动态创建的方法首先创建Excel对象，使用ComObj:varExcelApp:Variant;ExcelApp:=CreateOleObject('Excel.Application');1)显示当前窗口：ExcelApp.Visible:=True;2)更改Excel标题栏：ExcelApp.Captio... 阅读全文

posted @ 2010-11-05 09:38 sunjun0427 阅读(1718) 评论(0) 推荐(0)

托盘的实现(转)

摘要：unitUnit1;interfaceusesWindows,Messages,SysUtils,Classes,Graphics,Controls,Forms,Dialogs,shellapi,//ADDshellapiAppEvnts,ImgList,Menus;constghy_tray=wm_user+2;typeTForm1=class(TForm)ApplicationEvents1:... 阅读全文

posted @ 2010-11-05 09:32 sunjun0427 阅读(229) 评论(0) 推荐(0)

7 个非常好的免费 Delphi 组件集(转)

摘要：你是否在寻找一些免费且多功能的 Delphi 组件为你的程序添加更强的功能？不用再寻找了，下面列出了在互联网上最好的一些 Delphi 组件，他们可是免费并且包含所有源代码的。(1)JEDI - VCLJEDI-VCL(JVCL) 库构建于 JEDI 社区捐赠的代码。他由超过 400 个可以在你的 Delphi 和 Kylix 项目中立即重用的组件构成。整个 JEDI VCL 在 Mozilla ... 阅读全文

posted @ 2010-11-05 09:29 sunjun0427 阅读(652) 评论(0) 推荐(0)

Delphi两个遍历指定目录下指定类型文件的函数

摘要：// ================================================================// 遍历某个文件夹下某种文件,// 使用说明//  _GetFileList(ListBox1.Items,'c:\*.doc');// _GetFileList(MyTStringList,'c:\*.exe');// ====... 阅读全文

posted @ 2010-11-05 09:24 sunjun0427 阅读(454) 评论(0) 推荐(0)

Delphi 通过 Soap toolkit 3.0调用webservice

摘要：用Delphi 通过 Soap toolkit 3.0调用webservice先安装MS Soap toolkit 3.0unit CallWebServiceByComObject;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, Comobj, St... 阅读全文

posted @ 2010-11-04 15:18 sunjun0427 阅读(2692) 评论(0) 推荐(0)

Delphi OleVariant转化成string

摘要：uses Variants;VarToStr();如果返回的是一个数组的话varUTempPoint: Pointer;UOutArr: array[1..6] of string;//假设返回的是1维数组有6个元素begin UTempPoint := VarArrayLock(返回的OleVariant变量);//锁定输出变体数组 try Move(UTempPoint^,UOutA... 阅读全文

posted @ 2010-11-04 09:43 sunjun0427 阅读(3144) 评论(1) 推荐(0)