delphi xe10.1的datasnap 三层结构服务器和客户端源码

其中包含5个各种datasnap 三层结构服务器和客户端源码，是我在学习过程中从网上搜索到的学习资料，对初学者会有所帮助

using System;
using System.Linq;
using System.Text;

namespace Embarcadero.Datasnap.WindowsPhone7
{

/*
 * base64.java Ported to C#
 *
 * Brazil project web application toolkit
 * export version: 2.0 
 * Copyright （c） 2000-2002 Sun Microsystems Inc.
 *
 * Sun Public License Notice
 *
 * The contents of this file are subject to the Sun Public License
 * Version 1.0 （the “License“）. You may not use this file except in
 * compliance with the License. A copy of the License is included as
 * the file “license.terms“ and also available at
 * http://www.sun.com/
 * 
 * The Original Code is from:
 *    Brazil project web application toolkit release 2.0.
 * The Initial Developer of the Original Code is: cstevens.
 * Portions created by cstevens are Copyright （C） Sun Microsystems
 * Inc. All Rights Reserved.
 * 
 * Contributor（s）: cstevens suhler.
 *
 * Version:  1.9
 * Created by cstevens on 00/04/17
 *
 * Last modified by Embarcadero Technologies Inc. on 17/06/2011
 */
 
    /**
     * Utility to base64 encode and decode a string.
     * 
     */
 
    public class base64 {
	    static byte[] encodeData;
	    static String charSet = “ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/“;

	    static base64（） {
		    encodeData = new byte[64];
		    for （int i = 0; i < 64; i++） {
			    byte c = （byte） charSet.ElementAt（i）;
			    encodeData[i] = c;
		    }
	    }

	    private base64（） {
	    }
	    
	 /**
	 * base-64 encode a string
	 * @param s The ascii string to encode
	 * @returns The base64 encoded result
	 */

	    public static String encode（String s） {
            return encode（Encoding.UTF8.GetBytes（s））;
	    }
	    
	 /**
	 * base-64 encode a byte array
	 * @param src The byte array to encode
	 * @returns The base64 encoded result
	 */

	    public static String encode（byte[] src） {
		    return encode（src 0 src.Length）;
	    }
	    
	 /**
	 * base-64 encode a byte array 
	 * @param src The byte array to encode
	 * @param start The starting index
	 * @param length The number of bytes
	 * @returns The base64 encoded result
	 */

	    public static String encode（byte[] src int start int length） {
		    byte[] dst = new byte[（length + 2） / 3 * 4 + length / 72];
		    int x = 0;
		    int dstIndex = 0;
		    int state = 0; 
		    int old = 0; 
		    int len = 0; 
		    int max = length + start;
		    for （int srcIndex = start; srcIndex < max; srcIndex++） {
			    x = src[srcIndex];
			    switch （++state） {
			    case 1:
				    dst[dstIndex++] = encodeData[（x >> 2） & 0x3f];
				    break;
			    case 2:
				    dst[dstIndex++] = encodeData[（（old << 4） & 0x30）
						    | （（x >> 4） & 0xf）];
				    break;
			    case 3:
				    dst[dstIndex++] = encodeData[（（old << 2） & 0x3C）
						    | （（x >> 6） & 0x3）];
				    dst[dstIndex++] = encodeData[x & 0x3F];
				    state = 0;
				    break;
			    }
			    old = x;
			  

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件          0  2017-03-18 18:32  XE10三层夸平台服务器\Config.txt

     文件        514  2017-03-18 15:46  XE10三层夸平台服务器\DSnapSer.dpr

     文件      31525  2017-03-19 01:30  XE10三层夸平台服务器\DSnapSer.dproj

     文件        655  2017-03-19 01:30  XE10三层夸平台服务器\DSnapSer.dproj.local

     文件        334  2017-11-20 15:41  XE10三层夸平台服务器\DSnapSer.identcache

     文件     298828  2017-03-19 01:30  XE10三层夸平台服务器\DSnapSer.res

     文件        174  2017-11-20 15:41  XE10三层夸平台服务器\DSnapSer.stat

     文件     297086  2007-09-17 11:13  XE10三层夸平台服务器\DSnapSer_Icon.ico

     文件     807164  2017-03-21 23:59  XE10三层夸平台服务器\Main.dfm

     文件       5490  2017-03-21 23:59  XE10三层夸平台服务器\Main.pas

     文件       4882  2015-08-27 06:55  XE10三层夸平台服务器\proxy\csharp_silverlight\base64.cs

     文件        644  2015-08-27 06:55  XE10三层夸平台服务器\proxy\csharp_silverlight\DBXCallback.cs

     文件       4490  2015-08-27 06:55  XE10三层夸平台服务器\proxy\csharp_silverlight\DBXDataTypes.cs

     文件      10180  2015-08-27 06:55  XE10三层夸平台服务器\proxy\csharp_silverlight\DBXDefaultFormatter.cs

     文件        599  2015-08-27 06:55  XE10三层夸平台服务器\proxy\csharp_silverlight\DBXException.cs

     文件      25511  2015-08-27 06:55  XE10三层夸平台服务器\proxy\csharp_silverlight\DBXJSONTools.cs

     文件       2091  2015-08-27 06:55  XE10三层夸平台服务器\proxy\csharp_silverlight\DBXParameter.cs

     文件       2624  2015-08-27 06:55  XE10三层夸平台服务器\proxy\csharp_silverlight\DBXTools.cs

     文件      15845  2015-08-27 06:55  XE10三层夸平台服务器\proxy\csharp_silverlight\DBXValue.cs

     文件       5203  2015-08-27 06:55  XE10三层夸平台服务器\proxy\csharp_silverlight\DBXValueType.cs

     文件      15759  2015-08-27 06:55  XE10三层夸平台服务器\proxy\csharp_silverlight\DBXWritableValue.cs

     文件      50017  2015-08-27 06:55  XE10三层夸平台服务器\proxy\csharp_silverlight\DSAdmin.cs

     文件        639  2015-08-27 06:55  XE10三层夸平台服务器\proxy\csharp_silverlight\DSAdminRestClient.cs

     文件      16946  2015-08-27 06:55  XE10三层夸平台服务器\proxy\csharp_silverlight\DSCallbackChannelManager.cs

     文件        493  2015-08-27 06:55  XE10三层夸平台服务器\proxy\csharp_silverlight\DSHTTPRequestType.cs

     文件       4492  2015-08-27 06:55  XE10三层夸平台服务器\proxy\csharp_silverlight\DSRESTCommand.cs

     文件      49242  2015-08-27 06:55  XE10三层夸平台服务器\proxy\csharp_silverlight\DSRESTConnection.cs

     文件        800  2015-08-27 06:55  XE10三层夸平台服务器\proxy\csharp_silverlight\DSRESTParamDirection.cs

     文件       2062  2015-08-27 06:55  XE10三层夸平台服务器\proxy\csharp_silverlight\DSRESTParameter.cs

     文件       1468  2015-08-27 06:55  XE10三层夸平台服务器\proxy\csharp_silverlight\DSRESTParametermetaData.cs

............此处省略1557个文件信息