//==============================================================================
// $修訂版本號: 1.0 $
// $日期      : 2007年5月17日 星期二 16:44:42 $
// $版本號    : 1.0.0 Goshgen 1 $
//
// 基類定義。
//
//
// $BeginLog$
// $Endlog  $
// $Copyright 版權(quán)所有 (c)2007 TRANSIT  保留所有權(quán)利$
//==============================================================================
{:
  。
}

unit uTaxiCallUtils;

interface

uses Classes, IniFiles;

var
  iniFile: TIniFile;
  {: 服務(wù)端IP。}
  gODMPServerIP  : string;
  {: 服務(wù)端Port。}
  gODMPServerPort: Integer;
  {: 百家姓。}
  gFirstName: string;
  {: 最大等待時間。}
  gMaxWaitTime : Integer;
  {: 召車時間欄目寬度。}
  gCallTimeWidth          : Integer;
  {: 召車狀態(tài)欄目寬度。}
  gCallTaskStatusWidth    : Integer;
  {: 召車車牌欄目寬度。}
  gCallRegistrationNOWidth: Integer;
  {: 召車電話欄目寬度。}
  gCallMobileWidth        : Integer;
  {: 系統(tǒng)日志欄目寬度。}
  gCallSysLogWidth        : Integer;
  {: 自動更新路徑。}
  gUpgradeUrl             : string;

  procedure readIni;
  procedure writeIni;

implementation

//------------------------------------------------------------------------------
//  私有方法 -- 配置ini
//------------------------------------------------------------------------------

procedure readIni;
begin
  gODMPServerIP   := iniFile.ReadString('CallerInfo', 'ServerIP', '127.0.0.1');
  gODMPServerPort := iniFile.ReadInteger('CallerInfo', 'ServerPort', 7821);
  gFirstName      := iniFile.ReadString('CallerInfo', 'FirstName', '');
  gMaxWaitTime    := iniFile.ReadInteger('CallerInfo', 'MaxWaitTime', 5);
  gUpgradeUrl     := iniFile.ReadString('CallerInfo', 'UpgradeURL', 'http://10.140.143.151/ITaxiCall/TaxiCall.inf');

  // 任務(wù)欄顯示
  gCallTimeWidth           := iniFile.ReadInteger('CallerTaskStatusBar', 'CallerTime', 130);
  gCallTaskStatusWidth     := iniFile.ReadInteger('CallerTaskStatusBar', 'CallTaskStatus', 100);
  gCallRegistrationNOWidth := iniFile.ReadInteger('CallerTaskStatusBar', 'CallRegistrationNO', 80);
  gCallMobileWidth         := iniFile.ReadInteger('CallerTaskStatusBar', 'CallMobile', 80);
  gCallSysLogWidth         := iniFile.ReadInteger('CallerTaskStatusBar', 'CallSysLog', 300);
end;

procedure writeIni;
begin
  iniFile.WriteString('CallerInfo', 'ServerIP', gODMPServerIP);
  iniFile.WriteInteger('CallerInfo', 'ServerPort', gODMPServerPort);
  iniFile.WriteString('CallerInfo', 'FirstName', gFirstName);
  iniFile.WriteInteger('CallerInfo', 'MaxWaitTime', gMaxWaitTime);
  iniFile.WriteString('CallerInfo', 'UpgradeURL', gUpgradeUrl);

  iniFile.WriteInteger('CallerTaskStatusBar', 'CallerTime',         gCallTimeWidth);
  iniFile.WriteInteger('CallerTaskStatusBar', 'CallTaskStatus',     gCallTaskStatusWidth);
  iniFile.WriteInteger('CallerTaskStatusBar', 'CallRegistrationNO', gCallRegistrationNOWidth);
  iniFile.WriteInteger('CallerTaskStatusBar', 'CallMobile',         gCallMobileWidth);
  iniFile.WriteInteger('CallerTaskStatusBar', 'CallSysLog',         gCallSysLogWidth);
end;

end.