C1 = 52845; C2 = 22719;
function Encrypt( S: String; Key: Word): String; //S:加密的字符串;Key:密钥 var
I: Integer; j: Integer; begin
Result := S;
for I := 1 to Length(S) do begin
Result[I] := char(byte(S[I]) xor (Key shr 8)); Key := (byte(Result[I]) + Key) * C1 + C2; end; s:=Result; Result:='';
for i:=1 to length(s) do begin
j:=Integer(s[i]);
6 / 27
Result:=Result + Char(65+(j div 26))+Char(65+(j mod 26)); end; end; 3.
主模块
系统的主界面,包括系统登陆。在没有进行登陆之前4个功能按钮为灰色。
第一个按钮为客房治理,其次是餐饮治理,再次是客户查询,最后是收费治理。
7 / 27
4. 客房治理模块
客房治理包括客房预定,入住,调整。其界面如下:
操作介绍:
预定:首先在证件编号文体框中输入相关的证件编号,按回车键,显示如下窗口:
8 / 27
酒店管理系统介绍
C1=52845;C2=22719;functionEncrypt(S:String;Key:Word):String;//S:加密的字符串;Key:密钥varI:Integer;j:Integer;beginResult:=S;forI:=1to
推荐度:
点击下载文档文档为doc格式