Changeset 534


Ignore:
Timestamp:
Mar 4, 2013, 9:34:37 PM (12 years ago)
Author:
chronos
Message:
  • Opraveno: Sestavení dbc_exportu.
Location:
tools/dbc_export
Files:
3 edited

Legend:

Unmodified
Added
Removed

  • tools/dbc_export

    • Property svn:ignore

      •  

        old new  
        22*.bak
        33backup
         4DBCExport.lps
         5lib

  • tools/dbc_export/DBCExport.lpi

    r415 r534  
    22<CONFIG>
    33  <ProjectOptions>
    4     <Version Value="7"/>
     4    <Version Value="9"/>
    55    <General>
    66      <Flags>
    77        <LRSInOutputDirectory Value="False"/>
    88      </Flags>
     9      <SessionStorage Value="InProjectDir"/>
    910      <MainUnit Value="0"/>
    10       <TargetFileExt Value=""/>
    1111      <Title Value="DBCExport"/>
    1212      <UseXPManifest Value="True"/>
    13       <ActiveEditorIndexAtStart Value="0"/>
    1413    </General>
    1514    <VersionInfo>
    1615      <Language Value=""/>
    1716      <CharSet Value=""/>
    18       <StringTable Comments="" CompanyName="" FileDescription="" FileVersion="0.0.0.0" InternalName="" LegalCopyright="" LegalTrademarks="" OriginalFilename="" ProductName="" ProductVersion="0.0.0.0"/>
    1917    </VersionInfo>
     18    <BuildModes Count="2">
     19      <Item1 Name="Release" Default="True"/>
     20      <Item2 Name="Debug">
     21        <CompilerOptions>
     22          <Version Value="11"/>
     23          <SearchPaths>
     24            <IncludeFiles Value="$(ProjOutDir)"/>
     25            <Libraries Value="/usr/lib/mysql/;/usr/lib64/mysql/"/>
     26            <UnitOutputDirectory Value="lib/$(TargetCPU)-$(TargetOS)"/>
     27          </SearchPaths>
     28          <Parsing>
     29            <SyntaxOptions>
     30              <SyntaxMode Value="Delphi"/>
     31              <CStyleOperator Value="False"/>
     32              <UseAnsiStrings Value="False"/>
     33            </SyntaxOptions>
     34          </Parsing>
     35          <CodeGeneration>
     36            <Checks>
     37              <IOChecks Value="True"/>
     38              <RangeChecks Value="True"/>
     39              <OverflowChecks Value="True"/>
     40              <StackChecks Value="True"/>
     41            </Checks>
     42            <VerifyObjMethodCallValidity Value="True"/>
     43          </CodeGeneration>
     44          <Linking>
     45            <Debugging>
     46              <UseHeaptrc Value="True"/>
     47              <UseExternalDbgSyms Value="True"/>
     48            </Debugging>
     49          </Linking>
     50          <Other>
     51            <Verbosity>
     52              <ShoLineNum Value="True"/>
     53            </Verbosity>
     54            <CompilerPath Value="$(CompPath)"/>
     55          </Other>
     56        </CompilerOptions>
     57      </Item2>
     58    </BuildModes>
    2059    <PublishOptions>
    2160      <Version Value="2"/>
    … …  
    2766      <local>
    2867        <FormatVersion Value="1"/>
    29         <CommandLineParams Value="-f ../../../trunk/source/3.3.2/dbc/GameTips.dbc -n test.dbc -c usuuuuuuuuuuuuuuuu -q &quot;SELECT T.entry as entry,T.Text as text1 FROM (SELECT * FROM gametips WHERE (Complete = 1) AND ((Language = 1)) AND (User IN (459,670,602,462,1,400,638,592,624,610,769,331,131,704,2,499,641,660,578,337,304,277,208,613,768,754,590,606,26,618,739,503,601,607,585,596,765,320,547,687)) AND VersionStart <= 9947 AND VersionEnd >= 9947) AS T GROUP BY T.entry&quot;"/>
     68        <CommandLineParams Value="-f ../../../trunk/source/3.3.2/dbc/GameTips.dbc -n test.dbc -c usuuuuuuuuuuuuuuuu -q &quot;SELECT T.entry as entry,T.Text as text1 FROM (SELECT * FROM gametips WHERE (Complete = 1) AND ((Language = 1)) AND (User IN (459,670,602,462,1,400,638,592,624,610,769,331,131,704,2,499,641,660,578,337,304,277,208,613,768,754,590,606,26,618,739,503,601,607,585,596,765,320,547,687)) AND VersionStart &lt;= 9947 AND VersionEnd >= 9947) AS T GROUP BY T.entry&quot;"/>
    3069        <LaunchingApplication PathPlusParams="/usr/X11R6/bin/xterm -T 'Lazarus Run Output' -e $(LazarusDir)/tools/runwait.sh $(TargetCmdLine)"/>
    3170      </local>
    3271    </RunParams>
    33     <Units Count="20">
     72    <Units Count="4">
    3473      <Unit0>
    3574        <Filename Value="DBCExport.pas"/>
    3675        <IsPartOfProject Value="True"/>
    3776        <UnitName Value="DBCExport"/>
    38         <CursorPos X="36" Y="85"/>
    39         <TopLine Value="58"/>
    40         <EditorIndex Value="0"/>
    41         <UsageCount Value="83"/>
    42         <Loaded Value="True"/>
    43         <SyntaxHighlighter Value="Delphi"/>
    4477      </Unit0>
    4578      <Unit1>
    46         <Filename Value="umemorystreamex.pas"/>
    47         <UnitName Value="UMemoryStreamEx"/>
    48         <CursorPos X="1" Y="1"/>
    49         <TopLine Value="1"/>
    50         <UsageCount Value="24"/>
    51         <SyntaxHighlighter Value="Delphi"/>
    52       </Unit1>
    53       <Unit2>
    54         <Filename Value="../../../../usr/share/fpcsrc/rtl/objpas/classes/classesh.inc"/>
    55         <CursorPos X="14" Y="719"/>
    56         <TopLine Value="703"/>
    57         <UsageCount Value="10"/>
    58       </Unit2>
    59       <Unit3>
    60         <Filename Value="../../../../usr/share/fpcsrc/rtl/objpas/classes/streams.inc"/>
    61         <CursorPos X="23" Y="36"/>
    62         <TopLine Value="33"/>
    63         <UsageCount Value="9"/>
    64       </Unit3>
    65       <Unit4>
    66         <Filename Value="dbc.pas"/>
    67         <UnitName Value="dbc"/>
    68         <CursorPos X="1" Y="1"/>
    69         <TopLine Value="1"/>
    70         <UsageCount Value="24"/>
    71         <SyntaxHighlighter Value="Delphi"/>
    72       </Unit4>
    73       <Unit5>
    74         <Filename Value="../../.local/share/applications/vmware-player.desktop"/>
    75         <CursorPos X="24" Y="6"/>
    76         <TopLine Value="1"/>
    77         <UsageCount Value="4"/>
    78         <SyntaxHighlighter Value="None"/>
    79       </Unit5>
    80       <Unit6>
    81         <Filename Value="../../../../usr/share/fpcsrc/packages/fcl-base/src/custapp.pp"/>
    82         <UnitName Value="CustApp"/>
    83         <CursorPos X="3" Y="166"/>
    84         <TopLine Value="164"/>
    85         <UsageCount Value="5"/>
    86       </Unit6>
    87       <Unit7>
    88         <Filename Value="../../../../usr/share/fpcsrc/rtl/inc/systemh.inc"/>
    89         <CursorPos X="22" Y="196"/>
    90         <TopLine Value="184"/>
    91         <UsageCount Value="7"/>
    92       </Unit7>
    93       <Unit8>
    94         <Filename Value="../../../../usr/share/fpcsrc/rtl/inc/strings.pp"/>
    95         <UnitName Value="strings"/>
    96         <CursorPos X="12" Y="100"/>
    97         <TopLine Value="66"/>
    98         <UsageCount Value="7"/>
    99       </Unit8>
    100       <Unit9>
    101         <Filename Value="../../../../usr/share/fpcsrc/rtl/x86_64/strings.inc"/>
    102         <CursorPos X="1" Y="1"/>
    103         <TopLine Value="51"/>
    104         <UsageCount Value="7"/>
    105       </Unit9>
    106       <Unit10>
    107         <Filename Value="../../../../usr/share/fpcsrc/rtl/inc/variants.pp"/>
    108         <UnitName Value="variants"/>
    109         <CursorPos X="9" Y="79"/>
    110         <TopLine Value="51"/>
    111         <UsageCount Value="6"/>
    112       </Unit10>
    113       <Unit11>
    11479        <Filename Value="USqlDatabase.pas"/>
    11580        <IsPartOfProject Value="True"/>
    11681        <UnitName Value="USqlDatabase"/>
    117         <CursorPos X="13" Y="308"/>
    118         <TopLine Value="222"/>
    119         <UsageCount Value="74"/>
    120         <SyntaxHighlighter Value="Delphi"/>
    121       </Unit11>
    122       <Unit12>
     82      </Unit1>
     83      <Unit2>
    12384        <Filename Value="UDBC.pas"/>
    12485        <IsPartOfProject Value="True"/>
    12586        <UnitName Value="UDBC"/>
    126         <CursorPos X="13" Y="114"/>
    127         <TopLine Value="121"/>
    128         <EditorIndex Value="1"/>
    129         <UsageCount Value="74"/>
    130         <Loaded Value="True"/>
    131         <SyntaxHighlighter Value="Delphi"/>
    132       </Unit12>
    133       <Unit13>
     87      </Unit2>
     88      <Unit3>
    13489        <Filename Value="ReadMe.txt"/>
    13590        <IsPartOfProject Value="True"/>
    136         <CursorPos X="51" Y="8"/>
    137         <TopLine Value="1"/>
    138         <UsageCount Value="74"/>
    139         <SyntaxHighlighter Value="None"/>
    140       </Unit13>
    141       <Unit14>
    142         <Filename Value="../../../../../usr/share/fpcsrc/packages/fcl-base/src/custapp.pp"/>
    143         <UnitName Value="CustApp"/>
    144         <CursorPos X="15" Y="42"/>
    145         <TopLine Value="28"/>
    146         <UsageCount Value="12"/>
    147       </Unit14>
    148       <Unit15>
    149         <Filename Value="../../../../../usr/share/fpcsrc/rtl/objpas/classes/classesh.inc"/>
    150         <CursorPos X="14" Y="253"/>
    151         <TopLine Value="234"/>
    152         <UsageCount Value="10"/>
    153       </Unit15>
    154       <Unit16>
    155         <Filename Value="../../../../../usr/share/fpcsrc/rtl/objpas/classes/lists.inc"/>
    156         <CursorPos X="3" Y="544"/>
    157         <TopLine Value="542"/>
    158         <UsageCount Value="10"/>
    159       </Unit16>
    160       <Unit17>
    161         <Filename Value="/usr/share/fpcsrc/rtl/objpas/sysutils/sysstrh.inc"/>
    162         <CursorPos X="28" Y="33"/>
    163         <TopLine Value="14"/>
    164         <UsageCount Value="10"/>
    165       </Unit17>
    166       <Unit18>
    167         <Filename Value="/usr/share/fpcsrc/rtl/objpas/classes/classesh.inc"/>
    168         <CursorPos X="15" Y="742"/>
    169         <TopLine Value="723"/>
    170         <UsageCount Value="10"/>
    171       </Unit18>
    172       <Unit19>
    173         <Filename Value="/usr/share/fpcsrc/rtl/objpas/classes/streams.inc"/>
    174         <CursorPos X="8" Y="390"/>
    175         <TopLine Value="387"/>
    176         <UsageCount Value="10"/>
    177       </Unit19>
     91      </Unit3>
    17892    </Units>
    179     <JumpHistory Count="29" HistoryIndex="28">
    180       <Position1>
    181         <Filename Value="DBCExport.pas"/>
    182         <Caret Line="193" Column="16" TopLine="171"/>
    183       </Position1>
    184       <Position2>
    185         <Filename Value="DBCExport.pas"/>
    186         <Caret Line="198" Column="37" TopLine="171"/>
    187       </Position2>
    188       <Position3>
    189         <Filename Value="DBCExport.pas"/>
    190         <Caret Line="212" Column="30" TopLine="190"/>
    191       </Position3>
    192       <Position4>
    193         <Filename Value="DBCExport.pas"/>
    194         <Caret Line="197" Column="32" TopLine="191"/>
    195       </Position4>
    196       <Position5>
    197         <Filename Value="DBCExport.pas"/>
    198         <Caret Line="195" Column="1" TopLine="173"/>
    199       </Position5>
    200       <Position6>
    201         <Filename Value="DBCExport.pas"/>
    202         <Caret Line="196" Column="1" TopLine="174"/>
    203       </Position6>
    204       <Position7>
    205         <Filename Value="DBCExport.pas"/>
    206         <Caret Line="196" Column="37" TopLine="174"/>
    207       </Position7>
    208       <Position8>
    209         <Filename Value="DBCExport.pas"/>
    210         <Caret Line="29" Column="1" TopLine="10"/>
    211       </Position8>
    212       <Position9>
    213         <Filename Value="DBCExport.pas"/>
    214         <Caret Line="82" Column="29" TopLine="61"/>
    215       </Position9>
    216       <Position10>
    217         <Filename Value="DBCExport.pas"/>
    218         <Caret Line="194" Column="1" TopLine="176"/>
    219       </Position10>
    220       <Position11>
    221         <Filename Value="DBCExport.pas"/>
    222         <Caret Line="206" Column="23" TopLine="185"/>
    223       </Position11>
    224       <Position12>
    225         <Filename Value="DBCExport.pas"/>
    226         <Caret Line="234" Column="42" TopLine="217"/>
    227       </Position12>
    228       <Position13>
    229         <Filename Value="DBCExport.pas"/>
    230         <Caret Line="238" Column="29" TopLine="219"/>
    231       </Position13>
    232       <Position14>
    233         <Filename Value="DBCExport.pas"/>
    234         <Caret Line="6" Column="92" TopLine="1"/>
    235       </Position14>
    236       <Position15>
    237         <Filename Value="DBCExport.pas"/>
    238         <Caret Line="53" Column="89" TopLine="19"/>
    239       </Position15>
    240       <Position16>
    241         <Filename Value="DBCExport.pas"/>
    242         <Caret Line="83" Column="22" TopLine="59"/>
    243       </Position16>
    244       <Position17>
    245         <Filename Value="DBCExport.pas"/>
    246         <Caret Line="93" Column="8" TopLine="63"/>
    247       </Position17>
    248       <Position18>
    249         <Filename Value="DBCExport.pas"/>
    250         <Caret Line="172" Column="16" TopLine="145"/>
    251       </Position18>
    252       <Position19>
    253         <Filename Value="UDBC.pas"/>
    254         <Caret Line="120" Column="30" TopLine="90"/>
    255       </Position19>
    256       <Position20>
    257         <Filename Value="UDBC.pas"/>
    258         <Caret Line="109" Column="14" TopLine="87"/>
    259       </Position20>
    260       <Position21>
    261         <Filename Value="UDBC.pas"/>
    262         <Caret Line="108" Column="19" TopLine="92"/>
    263       </Position21>
    264       <Position22>
    265         <Filename Value="UDBC.pas"/>
    266         <Caret Line="113" Column="47" TopLine="92"/>
    267       </Position22>
    268       <Position23>
    269         <Filename Value="UDBC.pas"/>
    270         <Caret Line="87" Column="1" TopLine="68"/>
    271       </Position23>
    272       <Position24>
    273         <Filename Value="UDBC.pas"/>
    274         <Caret Line="135" Column="15" TopLine="110"/>
    275       </Position24>
    276       <Position25>
    277         <Filename Value="UDBC.pas"/>
    278         <Caret Line="139" Column="15" TopLine="110"/>
    279       </Position25>
    280       <Position26>
    281         <Filename Value="UDBC.pas"/>
    282         <Caret Line="135" Column="15" TopLine="110"/>
    283       </Position26>
    284       <Position27>
    285         <Filename Value="UDBC.pas"/>
    286         <Caret Line="107" Column="18" TopLine="86"/>
    287       </Position27>
    288       <Position28>
    289         <Filename Value="UDBC.pas"/>
    290         <Caret Line="116" Column="17" TopLine="86"/>
    291       </Position28>
    292       <Position29>
    293         <Filename Value="UDBC.pas"/>
    294         <Caret Line="107" Column="18" TopLine="77"/>
    295       </Position29>
    296     </JumpHistory>
    29793  </ProjectOptions>
    29894  <CompilerOptions>
    299     <Version Value="8"/>
     95    <Version Value="11"/>
    30096    <SearchPaths>
    301       <IncludeFiles Value="$(ProjOutDir)/"/>
     97      <IncludeFiles Value="$(ProjOutDir)"/>
    30298      <Libraries Value="/usr/lib/mysql/;/usr/lib64/mysql/"/>
    303       <UnitOutputDirectory Value="bin"/>
     99      <UnitOutputDirectory Value="lib/$(TargetCPU)-$(TargetOS)"/>
    304100    </SearchPaths>
    305101    <Parsing>
    … …  
    307103        <SyntaxMode Value="Delphi"/>
    308104        <CStyleOperator Value="False"/>
     105        <AllowLabel Value="False"/>
     106        <CPPInline Value="False"/>
     107        <UseAnsiStrings Value="False"/>
    309108      </SyntaxOptions>
    310109    </Parsing>
    311110    <CodeGeneration>
    312       <Checks>
    313         <IOChecks Value="True"/>
    314         <RangeChecks Value="True"/>
    315         <OverflowChecks Value="True"/>
    316         <StackChecks Value="True"/>
    317       </Checks>
    318       <VerifyObjMethodCallValidity Value="True"/>
     111      <SmartLinkUnit Value="True"/>
     112      <Optimizations>
     113        <OptimizationLevel Value="2"/>
     114      </Optimizations>
    319115    </CodeGeneration>
     116    <Linking>
     117      <Debugging>
     118        <GenerateDebugInfo Value="False"/>
     119      </Debugging>
     120      <LinkSmart Value="True"/>
     121    </Linking>
    320122    <Other>
    321123      <Verbosity>
    … …  
    326128  </CompilerOptions>
    327129  <Debugging>
    328     <Watches Count="2">
    329       <Item1>
    330         <Expression Value="IndexTable"/>
    331       </Item1>
    332       <Item2>
    333         <Expression Value="entry"/>
    334       </Item2>
    335     </Watches>
    336130    <Exceptions Count="3">
    337131      <Item1>

  • tools/dbc_export/UDBC.pas

    r443 r534  
    2626  public
    2727    Cells: array of array of Variant;
    28     ColumnFormat: array of TColumnType;
     28    ColumnFormat: array of TDBCColumnType;
    2929    function DetectColumnType(Column: Integer): TDBCColumnType;
    3030    procedure LoadFromFile(FileName: string);
Note: See TracChangeset for help on using the changeset viewer.