Transcoder/uDCLConst.pas at master · Tango600/Transcoder · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
unit uDCLConst;
{$I DefineType.pas}

interface

uses
  uStringParams
{$IFDEF FPC}
  LConvEncoding
{$ENDIF};

const
  Version='10.0.23.285';


  DefaultSourceEncoding='cp1251';
{$IFDEF DELPHI}
  EncodingUTF8='utf8';
  UTF8BOM=#$EF#$BB#$BF;
  UTF16LEBOM=#$FF#$FE;
  DefaultInterfaceEncoding='cp1251';
{$ENDIF}
{$IFDEF FPC}
  DefaultInterfaceEncoding=EncodingUTF8;
{$ENDIF}

  FloatDelimiterFrom=',';
  FloatDelimiterTo='.';

  StopSimbols=DefaultParamsSeparator+DefaultValuesSeparator+DefaultParamDelim+'( )[],=\/+-^<>.%:;&$#@*'#39#10#13;


Type
  TIsDigitType=(idString, idDigit, idFloatDigit, idHex, idColor, idDateTime, idUserLevel);

const
  DefaultLanguage='RUS';
  DefaultLanguageID=1049;


implementation


end.