.netµ÷ÓÃdelphiдµÄdll,³ö´íÎó
´íÎóÀàÐÍ£º³ö´íÎó³¢ÊÔ¶ÁÈ¡»òдÈëÊܱ£»¤µÄÄÚ´æ¡£Õâͨ³£Ö¸Ê¾ÆäËûÄÚ´æÒÑË𻵡£
C#Ô´Âë
[DllImport("Base64.dll")]
public static extern string Base64ToStr(string Base64);
protected void Page_Load(object sender, EventArgs e)
{
Response.Write(Base64ToStr("YWRtaW4="));
}
delphi Ô´Âëunit Base;
interface
uses ShareMem,SysUtils, Classes;
// ½«SourceSize³¤¶ÈµÄÔ´Source±àÂëΪBase64×Ö·û´®·µ»Ø
function Base64Encode(const Source; SourceSize: Integer): string; overload;
// ½«Source´ÓStartPos¿ªÊ¼µÄSize³¤¶ÈµÄÄÚÈÝÔ´±àÂëΪBase64£¬Ð´ÈëÁ÷Dest¡£Size=0Îļþ½áÊø
procedure Base64Encode(Source, Dest: TStream; StartPos: Int64 = 0; Size: Int64 = 0); overload;
// °Ñ×Ö·û´®Str±àÂëΪBase64×Ö·û´®·µ»Ø
function StrToBase64(Str: string): string;stdcall;
// °´¸ø¶¨µÄ±àÂëÔ´SourceºÍ³¤¶ÈSize¼ÆËã²¢·µ»Ø½âÂ뻺³åÇøÊµ¼ÊËùÐ賤¶È
function Base64DecodeBufSize(const Source; Size: Integer): Integer;
// ½«Base64±àÂë×Ö·û´®Source½âÂë´æ·ÅÔÚBufÖУ¬·µ»Ø½âÂ볤¶È
function Base64Decode(const Source: string; var Buf): Integer; overload;
// ½«Source´ÓStartPos¿ªÊ¼µÄSize³¤¶ÈµÄBase64±àÂëÄÚÈݽâÂ룬дÈëÁ÷Dest¡£Size=0Îļþ½áÊø
procedure Base64Decode(Source, Dest: TStream; StartPos: Int64 = 0; Size: Int64 = 0); overload;
// °ÑBase64×Ö·û´®½âÂëΪ×Ö·û´®·µ»Ø
function Base64ToStr(Base64: string): string;stdcall;
implementation
const
Base64_Ch
Ïà¹ØÎÊ´ð£º
·µ»ØµÄÄÚÈÝÊÇÈçÏ´úÂë,ÔõôÄÜÇþµÀ2b?
<p class="text1">1a </p>
<p class="text1">2b </p>
<p class="text1">3c </p>
<p cl ......
×î½ü»»Á˼ҹ«Ë¾£¬ÓôÃÆµÄÊǹØÓÚDelphiµÄÎÊÌ⣬¹«Ë¾Ö®Ç°ÓõÄÒ²ÊÇD°æDelphi7ÆóÒµ°æµÄ¡£ºóÀ´±»ËÍÁËÂÉʺ¯ÒԺ󣬾ÍÇ¿ÖÆ¸ÄÓÃDelphi7¸öÈ˰棬¾ç˵Õâ¸ö°æ±¾ÊÇÃâ·Ñ°æ£¬»òÕß˵ºÜ±ãÒË£¬Èç¹û²é³öÀ´£¬¾ÍÂò¸öºÃÁË¡£ÕâÏ¿ɺ᣿àÁËÎ ......
ÏëÇëÎʸ÷λ£ºÅ̵ãά»¤ÀïÃæ£ºÅÌÓ¯¿÷ÊýÁ¿=¿â´æÊýÁ¿+Èë¿âÊýÁ¿-³ö¿âÊýÁ¿£¬ÕâÑù×öÊǶԵÄÂð£¬
Â¥ÉÏÕý½â,ÕýÊýÅÌÓ¯ ¸ºÊýÅÌ¿÷
һ¥ÕýÈ·£¡
лл¸÷λÀ²
¾ÍÊÇ£ºÊDz»ÊÇ Êµ¼Ê¿â´æÀïµÄ¿â´æÁ¿ ÓëÄãÊÖ¶¯Êä½øÈ¥µÄÊýÁ¿Ö®¼äµ ......