home *** CD-ROM | disk | FTP | other *** search
/ Chip 2001 October / Chip_2001-10_cd1.bin / zkuste / delphi / kolekce / d456 / DCSLIB25.ZIP / DCConst.pas < prev    next >
Pascal/Delphi Source File  |  2001-06-28  |  10KB  |  267 lines
  1. {
  2.  BUSINESS CONSULTING
  3.  s a i n t - p e t e r s b u r g
  4.  
  5.          Components Library for Borland Delphi 4.x - 6.x
  6.          Copyright (c) 1998-2001 Alex'EM
  7.  
  8. }
  9. unit DCConst;
  10.  
  11. interface
  12. uses Messages;
  13.  
  14. resourcestring
  15.   INFO_FMT_VER     = 'Windows %s %d.%2d (Build %d)';
  16.   INFO_FMT_VERCSD  = 'Windows %s %d.%2d (Build %d: %s)';
  17.  
  18.   INFO_FMT_PROJECT = 'Version %d.%d (Build %d.%d)';
  19.   INFO_FMT_SYSTEM  = '%s';
  20.   INFO_FMT_MEMORY  = '─ε±≥≤∩φε Σδ  Windows: %39s';
  21.   INFO_FMT_URL     = 'Copyright⌐ 1996-2001 %s';
  22.  
  23.   EDIT_STR_WHERE   = 'where';
  24.   EDIT_STR_UNION   = 'union';
  25.   EDIT_FQW_LOCATE  = 'where %s = ''%s''';
  26.   EDIT_FQA_LOCATE  = '  and %s = ''%s''';
  27.   EDIT_FNW_LOCATE  = 'where %s = %s';
  28.   EDIT_FNA_LOCATE  = '  and %s = %s';
  29.   EDIT_FQW_LIKE    = 'where %s like ''%s%%''';
  30.   EDIT_FQA_LIKE    = '  and %s like ''%s%%''';
  31.  
  32.   EDIT_FMT_DEDATE  = '00|%0:s00|%0:s0000';                        // 8
  33.   EDIT_FMT_DETIME  = '00|%0:s00|%0:s0000|a| 00|%1:s00|%1:s00';    // 14
  34.  
  35. const
  36.   RES_MaxResourceIndex = 60000;
  37.   { DCCalendar.pas      }
  38.   RES_CALC_FMT_TODAY  = RES_MaxResourceIndex - 1;
  39.  
  40.   { DCChoice.pas        }
  41.   RES_EDIT_ERR_WRONG  = RES_MaxResourceIndex - 2;
  42.   RES_EDIT_ERR_EXCEPT = RES_MaxResourceIndex - 3;
  43.   RES_EDIT_ERR_EMPTY  = RES_MaxResourceIndex - 4;
  44.   RES_EDIT_ERR_DEC    = RES_MaxResourceIndex - 5;
  45.   RES_EDIT_ERR_FLOAT  = RES_MaxResourceIndex - 6;
  46.   RES_EDIT_ERR_CURR   = RES_MaxResourceIndex - 7;
  47.   RES_EDIT_ERR_UNIQ   = RES_MaxResourceIndex - 8;
  48.   RES_COMB_ERR_WRONG  = RES_MaxResourceIndex - 9;
  49.   RES_DATE_ERR_WRONG  = RES_MaxResourceIndex - 10;
  50.   RES_GRID_ERR_WRONG  = RES_MaxResourceIndex - 11;
  51.   RES_GRID_ERR_LOCATE = RES_MaxResourceIndex - 12;
  52.   RES_GRID_ERR_FIND   = RES_MaxResourceIndex - 13;
  53.  
  54.   { DCPopupWindow.pas   }
  55.   RES_STRN_VAL_QUERY  = RES_MaxResourceIndex - 14;
  56.   RES_STRN_VAL_FIND   = RES_MaxResourceIndex - 15;
  57.   RES_STRN_VAL_PROP   = RES_MaxResourceIndex - 16;
  58.   RES_STRN_VAL_PRINT  = RES_MaxResourceIndex - 17;
  59.  
  60.   { DCEditTools.psa     }
  61.   RES_GRID_REC_ROOT   = RES_MaxResourceIndex - 18;
  62.   RES_GRID_REC_VAL0   = RES_MaxResourceIndex - 19;
  63.   RES_GRID_REC_VAL1   = RES_MaxResourceIndex - 20;
  64.   RES_GRID_REC_VAL2   = RES_MaxResourceIndex - 21;
  65.  
  66.   { DCKnots.pas}
  67.   RES_GRID_STR_MSEL   = RES_MaxResourceIndex - 22;
  68.   RES_GRID_STR_SSEL   = RES_MaxResourceIndex - 23;
  69.  
  70.   { DCStringGrid.pas}
  71.   RES_GRID_ERR_EMPTY  = RES_MaxResourceIndex - 24;
  72.   RES_GRID_ERR_UNIQ   = RES_MaxResourceIndex - 25;
  73.   RES_GRID_ERR_DEC    = RES_MaxResourceIndex - 26;
  74.   RES_GRID_ERR_FLOAT  = RES_MaxResourceIndex - 27;
  75.   RES_GRID_ERR_CURR   = RES_MaxResourceIndex - 28;
  76.   RES_GRID_ERR_OPEN   = RES_MaxResourceIndex - 29;
  77.   RES_TREE_ERR_WRONG  = RES_MaxResourceIndex - 30;
  78.  
  79.   { DCFileCtrl.pas}
  80.   RES_FOLD_ERR_WRONG  = RES_MaxResourceIndex - 31;
  81.  
  82.   RES_STRN_VAL_CREATE = RES_MaxResourceIndex - 32;
  83.   RES_STRN_VAL_CANCEL = RES_MaxResourceIndex - 33;
  84.   RES_STRN_VAL_CLOSE  = RES_MaxResourceIndex - 34;
  85.  
  86.   RES_STRN_MSG_ONLOAD = RES_MaxResourceIndex - 35;
  87.   RES_STRN_MSG_DBGCEM = RES_MaxResourceIndex - 36;
  88.  
  89.   RES_FOLD_ERR_NOTFLD = RES_MaxResourceIndex - 37;
  90.   RES_BFLD_DBOCAPTION = RES_MaxResourceIndex - 38;
  91.  
  92.   RES_STRN_HNT_SELALL = RES_MaxResourceIndex - 39;
  93.   RES_STRN_HNT_DESALL = RES_MaxResourceIndex - 40;
  94.   RES_MASK_ERR_WRONG  = RES_MaxResourceIndex - 41;
  95.   RES_STRN_MSG_GRPBOX = RES_MaxResourceIndex - 42;
  96.  
  97.   {GroupBox}
  98.   RES_STRN_VAL_GRPBOX = RES_MaxResourceIndex - 43;
  99.  
  100.   CALC_BTN_WIDTH      = 14;
  101.   DEFAULT_BTN_WIDTH   = 16;
  102.  
  103.   clSelected          = $00BD0000;
  104.   clMessageWindow     = $00EFFFFF;
  105.   clLite              = $00E6E6E6;
  106.   clHintBackground    = $00DEFFFF;
  107.   clHintNormal        = $00E1D7D7;
  108.   clHintLight         = $00E1E3E3;
  109.   clHintDark          = $00717373;
  110.   clInvertMask        = $008FFFFF;
  111.   clShadowed          = $00D5D5D5;
  112.   clRowHighlight      = $007B5D5A;
  113.   clTextHighlight     = $007BFFFF;
  114.   clCaptionLightText  = $00E8EAEA;
  115.   clCaptionDarkText   = $00C8C8C8;
  116.   clSelectedRed       = $000000A7;
  117.   clSelectedLight     = $00FFAAAA;
  118.   clSelectedBlue      = $00A70000;
  119.   clDragArrow         = $000000FF;
  120.   clXPSelected        = $00D2BDB6;
  121.   clXPDropDown        = $00B59285;
  122.   clXPShadow          = $009D8D88;
  123.   clXPImageBackground = $00D1D8DB;
  124.   clXPDisabled        = $00A6A6A6;
  125.   clXPItemBackground  = $00F7F8F9;
  126.   clXPBorder          = $006A0A24;
  127.   clXPSelectedLight   = $00CAB2A9;
  128.   clLightBarrier      = $00909090;
  129.  
  130.   KNOT_BEGIN          = -01;
  131.   KNOT_END            = -02;
  132.  
  133.   STGird_Empty_Code   = '$EC';
  134.   STGird_Empty_Link   = '$EL';
  135.  
  136.   POPUP_MOVE_STEPX    = 10;
  137.   POPUP_MOVE_STEPY    = 10;
  138.  
  139.   {╤≥αφΣα≡≥φ√σ ε°ΦßΩΦ ΓετφΦΩα■∙Φσ KillFocus}
  140.   ERR_EDIT_NONE            = $0000;
  141.   ERR_EDIT_EMPTYVALUE      = $ED01;
  142.   ERR_COMBO_ILLIGALVALUE   = $ED02;
  143.   ERR_DATE_INCORRECTDATE   = $ED03;
  144.   ERR_GRID_ILLIGALVALUE    = $ED04;
  145.   ERR_GRID_EXCEPTONLOCATE  = $ED05;
  146.   ERR_GRID_EXCEPTONFIND    = $ED06;
  147.   ERR_GRID_EXCEPTONOPEN    = $ED07;
  148.   ERR_EDIT_INCORRECTDEC    = $ED08;
  149.   ERR_EDIT_INCORRECTCURR   = $ED09;
  150.   ERR_EDIT_INCORRECTFLOAT  = $ED10;
  151.   ERR_EDIT_NEEDUNIQ        = $ED11;
  152.   ERR_TREE_ILLIGALVALUE    = $ED12;
  153.   ERR_GRID_EXCEPTONREFRESH = $ED13;
  154.   ERR_BFLD_NOTFOLDER       = $ED14;
  155.   ERR_MASK_MATCH           = $ED15;
  156.  
  157.   CM_DC_BASE          = WM_USER + $250;
  158.   CM_THREAD_START     = CM_DC_BASE + $00;
  159.   CM_THREAD_TERMINATE = CM_DC_BASE + $01;
  160.   CM_THREAD_SETMODE   = CM_DC_BASE + $02;
  161.   CM_THREAD_STOP      = CM_DC_BASE + $03;
  162.   CM_THREAD_ITEMCLR   = CM_DC_BASE + $04;
  163.   CM_THREAD_ITEMADD   = CM_DC_BASE + $05;
  164.   CM_THREAD_SHOWBOX   = CM_DC_BASE + $06;
  165.   CM_THREAD_HIDEBOX   = CM_DC_BASE + $07;
  166.   CM_THREAD_LOCATED   = CM_DC_BASE + $08;
  167.   CM_THREAD_FINDCMPLT = CM_DC_BASE + $09;
  168.   CM_THREAD_FREEBOX   = CM_DC_BASE + $0A;
  169.   CM_THREAD_ERROR     = CM_DC_BASE + $0B;
  170.   CM_ERRORMESSAGE     = CM_DC_BASE + $0C;
  171.   CM_POPUPWINDOW      = CM_DC_BASE + $0D;
  172.   CM_INVALIDVALUE     = CM_DC_BASE + $0E;
  173.   CM_KNOTCHANGED      = CM_DC_BASE + $0F;
  174.   CM_SETALIGNMENT     = CM_DC_BASE + $10;
  175.   CM_POPUPBUTTONCLK   = CM_DC_BASE + $11;
  176.   CM_APPENDRECORD     = CM_DC_BASE + $12;
  177.   CM_REDRAWTAB        = CM_DC_BASE + $13;
  178.   CM_SETSELECTION     = CM_DC_BASE + $14;
  179.   CM_CLOSEUP          = CM_DC_BASE + $15;
  180.   CM_POPUPHINTINFO    = CM_DC_BASE + $16;
  181.  
  182.   GS_UPDATE_RECORDCOUNT  = CM_DC_BASE + $20;
  183.   GS_UPDATE_STATE        = CM_DC_BASE + $21;
  184.   GS_ERRORCODE           = CM_DC_BASE + $22;
  185.   GS_PROCESS_TERMINATED  = CM_DC_BASE + $23;
  186.  
  187.   CM_TRAYICON            = CM_DC_BASE + $30;
  188.  
  189.   MODE_SHOWWINDOW  = $000000A0;
  190.   MODE_HIDEWINDOW  = $000000A1;
  191.   MODE_FREEWINDOW  = $000000A2;
  192.  
  193.   {System Images}
  194.   DCGIM_SMALLICON  = $00000001;
  195.   DCGIM_LARGEICON  = $00000002;
  196.  
  197.   nsiOverlay0      = $00000000;
  198.   nsiOverlay1      = $00000001;
  199.   nsiOverlay2      = $00000002;
  200.   nsiOverlay3      = $00000003;
  201.   nsiNormalCheck0  = $00000004;
  202.   nsiNormalCheck1  = $00000005;
  203.   nsiNormalCheckX  = $00000006;
  204.   nsiShadowCheck0  = $00000007;
  205.   nsiShadowCheck1  = $00000008;
  206.   nsiShadowCheckX  = $00000009;
  207.  
  208.   MenuLineCaption  = '-';
  209.  
  210. type
  211.   TCharSet         = set of Char;
  212.  
  213.   TEdgeStyle       = (esNone,esRaised,esSunken);
  214.   TChoiceBtnStyle  = (btsForm, btsCombo, btsEllipsis, btsCustom);
  215.   TDeleteType      = (dtBackSpace, dtDelete);
  216.   TEventStyle      = (esNormal, esDropDown);
  217.   TButtonState     = (btRest, btDownMouseInRect, btRestMouseInRect);
  218.   TButtonStyle     = (stNormal, stFlat, stControlFlat, stShadowFlat,
  219.                       stOutBar, stIcon, stNone, stSingle, stXPStyle);
  220.   TAllignment      = (abLeft, abRight, abCenter, abImageTop, abImageBottom);
  221.   TControlStyle    = (fcsNormal, fsFlat, fsNone, fsSingle);
  222.   TAnchorStyle     = (asNone, asTR, asBL, asBR, asTLR, asBLR, asTBL, asTBR, asTBLR,
  223.                       asTCn, asCnR);
  224.   TDisableStyle    = (deNormal, deLite, deNone, deTrans);
  225.   TDateConvertMode = (dcmOnlyDate, dcmDayWDate);
  226.   TEdgeBorderStyle = (ebsNormal, ebsFlat, ebsNone, ebsShadowFlat);
  227.   TDrawBorerState  = (dsUp, dsDown);
  228.   TTransformStyle  = (tsDisable, tsSelect, tsNormal, tsInvert, tsTransparent, tsShadow, 
  229.                       tsBlur, tsXPStyle);
  230.   TNumericFormat   = (nmNone, nmInteger, nmDecimal, nmExponent, nmCurrency);
  231.   TPackedDataType  = (daInteger, daFloat, daString);
  232.   TDetailDataType  = (ddInteger, ddDate, ddFloat, ddCurrency, ddString);
  233.   TEditDataType    = (deInteger, deFloat, deCurrency);
  234.   TEditType        = (edEdit, edDate, edGrid, edChoice, edTree, edCombo, edCheck, edInfo);
  235.   TWindowAlignment = (wpNone, wpBottomLeft, wpBottomRight, wpOffset, wpTopRight);
  236.   TPopupBorderStyle= (brNone, brSingle, brRaised);
  237.   TDialogStyle     = (dsSimple, dsInvalidValue, dsCustom);
  238.   TClipFormValue   = (coHeader, coFooter);
  239.   TCursorMode      = (cmResize, cmMove, cmNone, cmGrid, cmButtons, cmFooter);
  240.   TJournalState    = (jsBrowse, jsEdit, jsLoad, jsSave, jsView);
  241.   TRecordState     = (rsInserted, rsUpdated, rsNotChanged);
  242.   TEditOption      = (eoCanEmpty, eoUnique, eoDropDown);
  243.   TDateEditKind    = (dkDate, dkDateTime);
  244.   TLiteTabPosition = (tbTop, tbBottom, tbLeft, tbRight);
  245.   TTreeEditStyle   = (teDropDown, teDropDownList);
  246.   TMessageStyle    = (msNormal, msRoundRect, msTail);
  247.   TSelectMode      = (smSelect, smDeselect, smInverse);
  248.   TBevelStyle      = (beNone, beLowered, beRaised, beFlat, beSingle);
  249.   TClipPopupStyle  = (cpPopupMenu, cpToolBar);
  250.   TDCDrawingStyle  = (dsNormal, dsFlat, dsXPStyle);
  251.   TCloseUpEvent    = procedure (State: Byte; bPerform: boolean = False) of object;
  252.   TChangingEvent   = procedure(Sender: TObject; var AllowChange: Boolean) of object;
  253.  
  254. implementation
  255.  {$R *.RES}
  256. end.
  257.  
  258.  
  259.  
  260.  
  261.  
  262.  
  263.  
  264.  
  265.  
  266.  
  267.