2009年3月9日 星期一

读文件到十六进制的函数(Delphi 7 下可用) - 回复 "峰哥！！！" 的问题

万一| 万一的 Delphi 博客 |18:18:00

问题来源:http://www.cnblogs.com/del/archive/2009/03/09/1284244.html#1472084{函数} function ReadFileToHex(FileName: string): string; var b: Byte; begin Result := ''; if not FileExists(FileName) then Exit; with TMemoryStream.Create do begin ...

Firebird 2.0 API

CodeGear| CodeGear-CodeCentral Delphi |17:45:32

基于TSS/TCS多线程阻塞模式的文件传输程序

DELPHI盒子| Delphi盒子 |16:03:00

1.C/S模式，采用组件TServerSockt/TClientSocket实现。 2.使用Socket阻塞模式和多线程。 3.可以在内网稳定的传送大文件(笔者测试：3-4G良好)（仅使用线程不宜过多） 4.本程序容错上做的很不够好，期待高手继续改进，当然只要你愿意。笔者希望看到IOCP式的改进出现。?..

Random Thoughts on the Passing Scene #101

Nick Hodges| Nick Hodges |13:48:50

The list of speakers and agenda is up for DelphiLive!.  Looks like a star-studded cast of folks giving presentations, including a number of the R&D Engineers from here at Embarcadero. (The guy doing the Delphi Product Address looks partic...

Delphi Workshop in Belgium Last Week

Pawel Glowacki| Pawel Glowacki |13:45:43

Delphi is alive and kicking!!! Last week Delphi developers on RAD Studio workshop in Lier in Belgium were really happy to hear that Embarcadero CEO, Wayne Williams, is Delphi developer himself:-) Such small facts give us - Delphi developers world ...

写一个可拖动的 TShape - 回复 "韦韦" 的问题

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

问题来源:http://www.cnblogs.com/del/archive/2009/03/09/1234066.html#1471535本例效果图:自定义类(TMyShape)单元 :unit Unit2; interface uses Classes, Controls, ExtCtrls; type TMyShape = class(TShape) private fMouseFlag: Boolean; fx,fy...

Remove Duplicate Items in Delphi’s TStringList

About.com| About.com Delphi Programming |04:49:35

in Delphi TIPS :: Many Delphi controls like TListBox, TComboBox and TMemo, for example, expose a property which is of the TStrings type: Items for TListBox, Lines for TMemo. When...