projconsts.pas

res可视化压缩

{* |<PRE>
================================================================================
** 单元名称：工程常量/公共变量申明
** 单元作者：HCH创 GuoQingaa 改
** 备    注：此为范例,每个工程根据实际工程名称修改,存放在工程目录
**
** 开发平台：PWinXP SP2 + RAD Studio 2007
** 兼容测试：PWin9X/2000/XP + Delphi 5-11
** 本 地 化：该单元中的字符串均符合本地化处理方式
** 单元标识：$Id: ProjConsts.pas,v 1.0 2007-4-11 17:36:16 Sesame Exp $
** 修改记录：2007-4-11  2008-6-12
**             创建单元
================================================================================
|</PRE>}

unit ProjConsts;

interface
{$I Compilers.inc}

uses
  Windows, Messages, SysUtils;
//==============================================================================
// 常量定义区域
//==============================================================================
const
  { 格式区域 }
  SF_DATE = 'YYYY-MM-DD';
  SF_TIME = 'HH:NN:SS';
  SF_TIMEALL = 'HH:NN:SS:ZZZ';
  SF_DATETIME = 'YYYY-MM-DD HH:NN:SS';
  SF_DATETIME_CH = 'YYYY年MM月DD HH时NN分SS秒';
  SF_DATE_INT = '%0:D-%1:D-%2:D';
  SF_DATETIME_INT = '%0:D-%1:D-%2:D %3:D:%4:D:%5:D';
  SF_TABLE = #8;
  SF_NEWLINE = #13#10;
  SF_NEWLINE2 = SF_NEWLINE + SF_NEWLINE;
  SF_NEWLINE3 = SF_NEWLINE2 + SF_NEWLINE;
  SF_NEWLINE4 = SF_NEWLINE2 + SF_NEWLINE2;
  SF_SPACE = '  ';
  SF_SPACE2 = SF_SPACE + SF_SPACE;
  SF_SPACE4 = SF_SPACE2 + SF_SPACE2;
  SF_SPACE6 = SF_SPACE4 + SF_SPACE2;
  SF_SPACE8 = SF_SPACE4 + SF_SPACE4;
  SF_SINGLELINE = '-----------------------------------------------------------';
  SF_DOUBLELINE = '===========================================================';
  MYUSER_MESSAGE=4518;//自定义消息号
  WM_UserMessage = WM_User + MYUSER_MESSAGE; //用户默认自定义消息号
//------------------------------------------------------------------------------
// 公司及作者相关信息
//------------------------------------------------------------------------------
  {$IFDEF GB2312}
  GC_INC_NAME = 'Open Sourse'; //公司或工作室名称
  GC_PRODUCT_NAME = 'Delphi工具系列'; //产品系列名称
  GC_STUDIO_NAME = ''; //工作组
  GC_COPYRIGHT = '版权所有 @ 2008 ' + GC_STUDIO_NAME;
  GC_LICENSE = ''; //版权信息(外部文件中)
  GC_URL = 'http://65517285.blog.51cto.com'; //网址
  GC_INC_EMAIL = '[e-mail]'; //管理员信箱
  GC_AUTHOR_NAME = '焦国庆'; //作者
  GC_EMAIL = '[e-mail]'; //作者信箱
  GC_INC = 'Xysoft';
  {$ELSE}
  GC_INC_NAME = 'Open Sourse'; //公司或工作室名称
  GC_PRODUCT_NAME = 'Delphi Tools'; //产品系列名称
  GC_STUDIO_NAME = ''; //工作组
  GC_COPYRIGHT = 'Copyright @ 2008 ' + GC_STUDIO_NAME +
    ' Corporation, All Rights Reserved';
  GC_LICENSE = ''; //版权信息(外部文件中)
  GC_URL = 'http://65517285.blog.51cto.com'; //网址
  GC_INC_EMAIL = '[e-mail]'; //管理员信箱
  GC_AUTHOR_NAME = 'GuoQingaa'; //作者
  GC_EMAIL = '[e-mail]'; //作者信箱
  {$ENDIF}

//------------------------------------------------------------------------------
// 当前工程相关信息
//------------------------------------------------------------------------------
  GC_PROJECTNAME = 'ResBuilder'; //工程名称(英文最佳)
  GC_VERSION = '1.1'; //当前程序主版本号
  GC_RootPath =  'C:\ResBuilder\';

  //软件的注册表根目录
  GC_REGROOT = 'SOFTWARE\HCH Software\' + GC_PROJECTNAME + '\';
  GC_INIFILE = GC_PROJECTNAME + '.INI'; //默认Ini文件名称
  GC_LOGFILE = GC_PROJECTNAME + '.LOG'; //默认日志文件名称
  GC_HELPFILE = GC_PROJECTNAME + '.CHM'; //默认帮助文件名称

  {$IFDEF GB2312}
  GC_APPNAME = '资源编译器'; //工程名称
  GC_APPTITLE = '可视化Delphi资源编译器'; //工程标题
  GC_ABOUT = '关于　' + GC_APPTITLE; //关于本程序
  //完整的版权信息
  GC_CopyrightAll = GC_APPTITLE + SF_NEWLINE +
    '版本号: %:0S' + SF_NEWLINE +
    '(最后修改日期: %1:S)' + SF_NEWLINE2 +
    GC_COPYRIGHT + SF_NEWLINE +
    '下载网站: ' + GC_URL + SF_NEWLINE +
    '技术支持: ' + GC_EMAIL + SF_NEWLINE;
  {$ELSE}
  GC_APPNAME = 'ResBuilder'; //工程名称
  GC_APPTITLE = 'Visual ResBuilder ' + GC_VERSION; //工程标题
  GC_ABOUT = 'About　' + GC_APPTITLE; //关于本程序
  //完整的版权信息
  GC_CopyrightAll = GC_APPTITLE + SF_NEWLINE +
    'Version: %:0S' + SF_NEWLINE +
    '(LastModifyDate: %1:S)' + SF_NEWLINE +
    GC_COPYRIGHT + SF_NEWLINE +
    'HomePage: ' + GC_URL + SF_NEWLINE +
    'Email: ' + GC_EMAIL + SF_NEWLINE;
  {$ENDIF}

  GC_ConfigFile = 'ResBuilder.Xml';//默认升级配置文件
  GC_TemplateFile = 'ResBuilder.mb'; //更新列表的模板文件名
  GC_DbccFile = 'Dbcc32.exe';//资源编译文件

//------------------------------------------------------------------------------
// 工程私有标志区域
//------------------------------------------------------------------------------
//标志
  FLAG_InitProgress = -1000; //初始化

//==============================================================================
// 资源定义区域
//==============================================================================

resourcestring

  RS_REGDW = '开源作品';

implementation

end.