Unit CnBase64;
Interface
Uses
SysUtils, Windows;
Function Base64Encode(InputData: String; Var OutputData: String): byte;
{* 对数据进行BASE64编码,如编码成功返回Base64_OK
|
InputData:string – 要编码的数据
var OutputData: string – 编码后的数据
|}
Function Ba...阅读全文
我们在软件开发中,经常会碰到多处代码相同或相似的地方,如何处理这种情况,不仅对个人,而且对于一个团队,是一个重要的问题。代码复用的作用也不仅是使得代码编写简单、减少工作量。本文只讨论在一个只使用delphi作为开发工具的团队如何有效的进行代码复用,如何在开发进度、软件维护之间取得平衡。这里以作者领导的一...阅读全文
Semaphores are like mutexes on steroids. Not only do they provide for blocking thread synchronization, but they permit two or more threads, up to some specified maximum number, to work concurrently with a shared resource. As a result, they are unlike most other synchronizati...阅读全文
A frame, like a form, is a container for other components. It uses the same ownership mechanism as forms for automatic instantiation and destruction of the components on it, and the same parent-child relationships for synchroniz...阅读全文
{ Windows 2003 Server support.
阅读全文
转眼间,小小宝10个月了,在大人的鼓励下,轻松的迈出了第一步,很快就能连续行走,5米。10米,没几天就能在家里到处走了。
阅读全文
用Math.round(数字*100)/100.00或者数字.toFixed(2)
阅读全文
function exec (command)
{
window.oldOnError = window.onerror;
window._command = command;
window.onerror = function (err)
{
if (err.indexOf(‘utomation‘) != -1)
{
alert(‘命令‘ + window._command + ‘ 已经被用户禁止!‘);
return true;
}
e...阅读全文
注册:RegSvr32.EXE Mp3Play.OCX
卸载:RegSvr32.EXE Mp3Play.OCX /u
阅读全文
假定我们编好的Delphi服务程序名称为Server。
2.1 在服2.2 务器上运行服2.3 务程序Server;
2.4 在命令行输入dcomcnfg,2.5 回车;
2.6 打开组件服2.7 务》计算机》我的电脑 ,2.8 在我的电脑上点击右键,2.9 在【COM安全】选项卡上的【访问权限】和【启动激活权限】增加everyone;
2.10 打开组件服2.11 务》计算机》我的...阅读全文