0℃
2011年05月15日
⁄ [Delphi2010]
IOUtils单元,查找文件夹内信息的getfile函数,还可以在内部嵌套函数,提升其功能的扩展,非常好用!
DEMO下载:IOUnit2
代码部分:
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TForm1 = class(TForm)
mmo1: TMemo;
btn1: TButton;
btn2: TButton;
btn3: TButton;
btn4: TButton;
procedure btn1Click(Sender: TObject);
procedure btn2Click(Sender: TObject);
procedure btn3Click(Sender: TObject);
proced...
阅读全文
0℃
2011年05月15日
⁄ [Delphi2010]
任何数据类型中 Rtti 中都有对应的获取信息的类, 有序类型对应的是 TRttiOrdinalType.
DEMO下载Rtti3
代码部分:
//任何数据类型中 Rtti 中都有对应的获取信息的类, 有序类型对应的是 TRttiOrdinalType.
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TForm1 = class(TForm)
mmo1: TMemo;
btn1: TButton;
btn2: TButton;
btn3: TButton;
procedure btn1Click(Sender: TObject);
procedure btn2Click(Sender: TObject);...
阅读全文
0℃
2011年05月15日
⁄ [Delphi2010]
用 IOUtils 单元下的 TDirectory.GetFiles 获取文件列表太方便了;
DEMO下载IOUnit1
下面的例子只是 TDirectory.GetFiles 的典型应用...
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TForm1 = class(TForm)
btn1: TButton;
btn2: TButton;
btn3: TButton;
mmo1: TMemo;
lbl1: TLabel;
procedure btn1Click(Sender: TObject);
procedure btn2Click(Sender: TObject);
procedure btn3Click(Sender: TObject);
private
{ P...
阅读全文
1℃
2011年05月15日
⁄ [Delphi2010]
通过 Rtti 还能够调用一个类的方法, 也能读取或设置其属性值.
Demo下载Rtti单元读取设置一个类
代码部分:
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TForm1 = class(TForm)
btn1: TButton;
btn2: TButton;
btn3: TButton;
procedure btn1Click(Sender: TObject);
procedure btn2Click(Sender: TObject);
procedure btn3Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarati...
每日一练阅读全文
0℃
2011年05月15日
⁄ [Delphi2010]
delphi2010新增的Rtti单元可以轻松的获取某一个指定的类的信息。
Demo下载Rtti 单元(1)
程序代码:
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TForm1 = class(TForm)
mmo1: TMemo;
btn1: TButton;
btn2: TButton;
btn3: TButton;
btn4: TButton;
btn5: TButton;
procedure btn1Click(Sender: TObject);
procedure btn2Click(Sender: TObject);
procedure btn3Click(Sender: TObject);
procedure btn4Click(Sender: ...
每日一练阅读全文
0℃
2011年05月12日
⁄ [Delphi2010]
程序员职业之路已经完成了~今天开始每日一练,收集和向网络学习,提高自己。
delphi2010有一个新加的控件号称是 TTouchKeyboard, 触屏控件。
--------------------------------------------------------------------------------------------------------------------
代码部分:
---------------------------------------------------------------------------------------------------------------------
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls,...
每日一练阅读全文
0℃
1℃
2011年03月22日
⁄ [Delphi技巧]
今天在CSDN上看到有大牛更大家分享经验,于是抄录一份供以后使用
主要给出两种常用的线程形式。
1、长等待型线程示例,等待命令,执行不定长的工作,但每个工作的时间不会太长。
2、长工作型线程示例,执行一个很长时间的工作,但可以很快响应取消操作。
注:对于在线程中取消存储过程的执行仍然无解
以下程序所用的知识为:消息机制以及常用的API函数
主程序Unit1
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls,LongWaitTrd;
...
阅读全文
0℃
2011年03月19日
⁄ [Delphi2010]
现在在Hacker圈里,正活跃着这样一帮以Kayla为代表的年轻女孩,她们崇尚“Lulz”——在给别人制造麻烦的同时也带来乐趣,而不考虑任何法律后果。
下次你在商场看到一群十多岁的女孩,请注意,也许她们中间之一就是Kayla。在16岁的时候,她经常会出去和朋友待在一起,在美容院兼职,幻想着有一天能成为一名老师。
但是在这个光鲜外表的背后,她却是全球黑客组织Anonymous中一个成员,按照她自己所声称的,她已经攻陷了MasterCard和PayPal的网站。Kayla以一个极其隐蔽的身份活跃在网上,以至于我不能完全查明她的年龄和...
阅读全文
0℃
2011年03月17日
⁄ 技术资料
最近帮一个朋友写了一个dll.但是他用的是C#调用起来试了很久,看来C#要用delphi的东西还真不容易。
C#调用Delphi接口方法,有两种解决办法:
一、将Delphi程序编译成一个COM组件,然后在C#里引用COM组件。
二、非托管调用Dephi的DLL文件。
我们常用的是第二种方法,讲第二种方法之前首先讲解下DllImport。
DllImport是System.Runtime.InteropServices命名空间下的一个属性类,其功能是提供从非托管DLL导出的函数的必要调用信息。
DllImport属性应用于方法,要求最少要提供包含入口点的dll的名称。
DllImport的定义...
阅读全文
0℃
2011年03月06日
⁄ 技术资料
DELPHI XE可以下载了,把质量与新功能放一边,至少说明delphi还在不停的改进,
发布一些书籍,供需要的朋友!
http://u.115.com/file/f2cd31bea8
Delphi_7数据库开发技术与工程实践.pdf
http://u.115.com/file/f2aacad9da
Delphi_7.0数据库开发入门与范例解析.pdf
http://u.115.com/file/f2f7e03429
Delphi_7_组件编程参考手册.pdf
http://u.115.com/file/f2201cab44
DELPHI_7_程序设计与上机指导.pdf
http://u.115.com/file/f2ef5220fe
Delphi_6数据库实用程序设计100例.pdf
http://u.115.com/file/f2eaaccfa9
Delp...
阅读全文
1℃
2011年02月06日
⁄ [Delphi2010]
今天在用delphi2010调试一个以前的程序,因为以前的程序是delphi7下编写的,大家都知道delphi7下的用的是indy9,后面的主流版本都是用indy10啦。 所以以前用的
Temp1 := UTF8Decode(Temp);
Temp1 := Utf8ToAnsi(Temp);
Temp1 := UTF8Decode(Temp);
Temp1 := UTF8Encode(Temp);
这类函数在2010下是不推荐使用的,而且不能把uft8转成decode. 得到的中文字符全是??。
看来indy10的uft8处理有点麻烦。在这边我是用数据流的办法解决的:
var
idhtp: TIdHTTP;
Temp,temp1:AnsiStrin...
阅读全文





很搞 呵呵
忙什么呢。。都不跟新了。
呵呵,不错不错啦
呵呵,这种程序员式的幽默看过
不敢去做,没有勇气,打工仔就
倒霉孩子。。
挺佩服这个人的
确实启发很大