2011年11月_张志峰

12月 11月 10月 01月

转载 delphi实现文件下载的几种方法

笔者最近开发的系统中需要写一个下载文件的功能。以前用BCB调用API写的很烦琐，忽然想起有一个API就可以搞定了，于是一大早就来搜索。这个API就是UrlDownloadToFile。不仅如此，Delphi的一些控件也可以轻松实现下载，如NMHTTP，指定NMHTTP1.InputFileMode := ture; 指定Body为本地文件名，指定Get就可以下载了。下面是详细代码，均出自CSDN。

2011-11-28 15:19:57 729

原创 Delphi TreeView 设置树全部展开

以前总是循环展开，现在有这个属性，就简单多了RzTreeView_DWDept.FullExpand; 这样就可以全部展开了。还有一个问题，设置节点选中RzTreeView_DWDept.SetFocus;if RzTreeView_DWDept.Selected = nil then RzTreeView_DWDept.Selected := RzTreeVie

2011-11-25 13:42:59 3966

转载 Delphi 给窗体上面所有的控件都挂上一个事件处理过程华软源码

有的时候 ,我们希望给所有的控件的某个指定的事件挂接一个自定义的事件处理程序 ,例如 ,OnContextPopup 事件 ,那么该如何做呢？请参看下面的代码 ,下面的代码会给所有有 OnContextPopu 事件的控件都挂接指定的处理程序 : private { Private declarations } procedure AssignOnContextPop

2011-11-24 15:08:45 2458

原创如何在Eclipse中过滤版本控制文件

当我们使用版本管理工具的时候，比如 CVS、SVN或者harvest，都会在 checkout 到本地的源代码中发现很多代码之外的多余文件夹及文件，这些文件夹及文件对于版本管理工具而言非常重要，不能随便删除，但是在我们的项目开发中却显得有些碍手碍脚。在Eclipse中可以通过如下方式进行排除：方法一：“Project->Properties->Java Build Path”，右侧的面板中

2011-11-23 18:40:51 573

原创 delphi pchar char byte string转换问题

注：Delphi中的Char,PChar,PByte,Byte,String的相互转换，您是不是也遇到过，为此头疼过吗？你要是明白了他们的原理就会轻松了。话题064840的标题是： Q:关于PChar的用法 (200分)分类：非技术问题 PTiger (1998-10-19 18:33:00) 我要从tPing.ini中读取Host段中的Address键值，但是读不出。1、首先往t

2011-11-23 16:27:05 2713

原创 Delphi TAdvStringGrid的设置显示自动列宽

AdvStringGrid_IDX.AutoSizeColumns(False);

2011-11-21 10:10:23 2913

原创国际品牌代理集团及品牌公司旗下品牌

国际品牌代理集团及品牌公司旗下品牌1.ImagineX Group俊思集团BCBGMAXAZRIA、HUGO HUGO BOSS 、PAUL & JOE 、 MONDI 2.诗韵 THE SWANKBrioni, Bobby Jones, Christian Lacroix, Gianfranco Ferre, Givenchy, Kenzo, Loro Piana, Malo

2011-11-15 08:35:40 6085

原创在 PL/SQL 中调用存储过程 oracle

在 PL/SQL 中调用存储过程 oracle 1、在sql的执行窗口中只能这样调用"call OUT_TIME(); "，这样执行就是把”call OUT_TIME(); “当成一个sql语句，而exec OUT_TIME();不是一个sql语句，是一个执行体，执行体调用必须在命令窗口，把这句话当成一个整体，也就是plsql块，但是要在sql窗口中之行也可以，这样调用：begin

2011-11-14 14:38:59 1480 1

原创 Delphi OpenDialog1设置多个过滤条件

OpenDialog1.Filter := '97-2003Word程序(*.doc)|*.doc|2007程序(*.docx)|*.docx';

2011-11-07 11:51:19 3646

原创 Delphi ForceDirectories的用法

ForceDirectories(Dir)是Delphi和bcb中用来创建一个目录的函数。支持多级目录。编辑本段说明　　bool ForceDirectories(AnsiString Dir); 　　返回：返回创建目录是否成功。　　参数：Dir是创建目录路径。如："F:\\a\\b\\c"编辑本段与CreateDir区别　　ForceDirectories创建多级目录，父目录

2011-11-07 11:27:02 1889

原创 Delphi PageControl的TabSheet的页签的隐藏设置

Delphi PageControl的TabSheet的页签的隐藏设置把TabVisible的属性设置成False就可以了TabSheet_Operator.TabVisible := False; TabSheet_LimitEnumerate.TabVisible := False;

2011-11-07 10:31:23 6691

原创 eclipse打不开报(Failed to create the Java Virtual Machine)解决方法

方法如下：找到eclipse目录下的eclipse.ini，可以看到如下内容：-startupplugins/org.eclipse.equinox.launcher_1.1.0.v20100507.jar--launcher.libraryplugins/org.eclipse.equinox.launcher.win32.win32.x86_1.1.0.v20100503

2011-11-03 11:43:20 636