2009年10月9日 星期五

使用泛型的 TArray 从动态数组中查找指定元素

万一| 万一的 Delphi 博客 |22:26:00

unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Button1: TButton; Button2: TButton; procedure Button1Click(Sender: TObject); ...

使用泛型的 TArray 为动态数组排序

万一| 万一的 Delphi 博客 |21:29:00

unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Memo1: TMemo; Button1: TButton; Button2: TButton; procedure Button1Click(S...

Random Thoughts on the Passing Scene #131

Nick Hodges| Nick Hodges |18:56:51

We are looking for folks to submit their Unicode migration stories to the Unicode Migration Best Practices Cookbook.  If you have a tip or two, or a good story to tell, please let us know and help out the Delphi community.  Looks like yo...

SendTextMessage 等方便的消息发送函数

万一| 万一的 Delphi 博客 |13:49:00

突然发现 Message 单元的最后给提供了几个方便的消息发送函数:SendTextMessage、SendStructMessage、SendGetStructMessage、SendGetIntMessage虽然函数实现的很简单, 但用他们发送文本、结构和整数, 的确方便了不少; 下面仅就 SendTextMessage 举例://例子是通过发送...

TEnum<T> Simple generics Enum example

CodeGear| CodeGear-CodeCentral Delphi |13:03:40

I'm a long time lover of Enumarated types, in this example code I use a generic record to wrap up the dirty details of a enumorated type.Small sample from the DPR:type TJim = (jjHigh,jjLow);var J: TEnum<TJim>; S: String; I: INteg...

Unicode Statistics Tool

CodeGear| CodeGear-CodeCentral Delphi |12:56:27

Parser.exe is based on Jacob Thurman's work, and should support Pascalcode all the way back to the early days. It may have some issues withsome really old and esoteric syntax.Please take it for a spin and give me some feedback. I'd like to knowif ...

WindowsAPI: MulDiv

万一| 万一的 Delphi 博客 |11:51:00

MulDiv(a, b, c) 中的 a、b、c 是三个 Integer, 同时返回一个 Integer.其计算方式类似于: a * b / c 或 a * b div c, 但也有区别.//例一: 相同处 var a,b,c,n1,n2: Integer; begin a := 4; b := 3; c := 2; n1 := a * b div c; n2 := MulDiv(a, b, c); ...

Delphi and Embarcadero Change Manager Working Together - Video

CodeGear| CodeGear-CDN Delphi |10:16:07

Allow Only One Application Execution per Windows Session

About.com| About.com Delphi Programming |01:00:18

in TIPS :: While there are ways to protect a Delphi application from misusage, there are situation when you want to have the weirdest protection available, but simple to implement....