易截截图软件、单文件、免安装、纯绿色、仅160KB

Delphi in a Unicode World Part I

 ---
Delphi in a Unicode World Part I: What is Unicode, Why do you need
it, and How do you work with it in Delphi?
By: Nick
Hodges
原文链接:http://dn.codegear.com/article/38437
Abstract: This article discusses Unicode, how Delphi developers
can benefit from using Unicode, and how Unicode will be implemented in Delphi
2009.
//
    Introduction
The Internet has broken down geographical barriers that enable world-wide
software distribution. As a result, applications can no longer live in a purely
ANSI-based environment. The world has embraced Unicode as the standard means of
transferring text and data. Since it provides support for virtually any writing
system in the world, Unicode text is now the norm throughout the global
technological ecosystem.
    What is Unicode?
Unicode is a character
encoding scheme that allows virtually all alphabets to be encoded into a single
character set. Unicode allows computers to manage and represent text most of the
world’s writing systems. Unicode is managed by The Unicode Consortium and codified in a standard.
More simply put, Unicode is a system for enabling everyone to use each other’s
alphabets. Heck, there is even a Unicode version of
Klingon.
This series of articles isn’t meant to give you a full rundown of exactly
what Unicode is and how it works; instead it is meant to get you going on using
Unicode within Delphi 2009. If you want a good overview of Unicode, Joel Spolsky
has a great article entitled “The Absolute Minimum
Every Software Developer Absolutely, Positively Must Know About Unicode and
Character Sets (No Excuses!)” which is highly recommended reading. As Joel
clearly points out “IT’S NOT THAT HARD”. This article, Part I of III, will
discuss why Unicode is important, and how Delphi will implement the new UnicodeString type.
    Why Unicode?
Among the many new features found in De


相关文档:

delphi code

http://hi.baidu.com/rainbow_chaser/blog/item/7eb5f001c0d864e508fa93ac.html
1.防止刷新时闪烁的终极解决办法
{ 防止刷新时闪烁的终极解决办法(对付双缓冲无效时) }
Perform($000B, 0, 0); //锁屏幕 防止闪烁
// 做一些会发生严重闪烁的事情..
//解锁屏幕并重画
Perform($000B, 1, 0);
RedrawWindow(Handle, nil, ......

delphi 生成xml 方法 与 delphi txt文件操作

Procedure TForm1.Button1Click(Sender: TObject);
Var
xmlstr,FileName: String;
f: Textfile;
Begin
xmlStr := '<?xml version="1.0" encoding="gb2312"?>';
xmlstr := xmlstr + '<user><name>张三</name><sex>男</sex></user>';
sh ......

Delphi 关键字详解

Delphi 关键字详解---absolute//它使得你能够创建一个新变量, 并且该变量的起始地址与另一个变量相同.
var
Str: string[32];
StrLen: Byte absolute Str;
//这个声明指定了变量StrLen起始地址与Str相同.
//由于字符串的第0个位置保存了字符串的长度, 所以StrLen的值即字符串长度.
begin
Str := 'abc';
Edit ......

delphi dll 实例 与 dll窗体实例

delphi dll 实例 与 dll窗体实例
本动态链接库方法有
Min,Max,SynAPP,ShowForm,showmyform
dll工程文件
Library Project1;
uses
  dllUnit1 in 'dllUnit1.pas' {Form1};
function Min(X, Y: Integer): Integer; export;
begin
if X < Y then Min := X else Min := Y;
end;
function Max(X, Y: Integer): ......

delphi 注册 com 对象的方法

delphi 注册 com 对象的方法
procedure TForm1.Button3Click(Sender: TObject);
var
 Sd: TSecurityDescriptor;
 begin
   InitializeSecurityDescriptor(@Sd, SECURITY_DESCRIPTOR_REVISION);
    SetSecurityDescriptorDacl(@Sd, true, Nil, false);
    RegSe ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号