Changeset 28


Ignore:
Timestamp:
Nov 23, 2011, 7:17:55 PM (13 years ago)
Author:
george
Message:
  • Fixed: Compilation after last change.
Location:
trunk
Files:
8 edited

Legend:

Unmodified
Added
Removed

  • trunk/Application/UChronisClient.pas

    r27 r28  
    99
    1010type
     11  TChronisClient = class;
     12
    1113  TOrderDirection = (odNone, odAscending, odDescending);
    1214
    13   { TCondition }
     15  { TQuery }
    1416
    15   TCondition = class
     17  TQuery = class
     18    Client: TChronisClient;
    1619    OrderColumn: string;
    1720    OrderDirection: TOrderDirection;
    … …  
    2023    PageItemCount: Integer;
    2124    PageUse: Boolean;
    22     Columns: TListString;
    23     ColummsUse: Boolean;
     25    ColumnsFilter: TListString;
     26    ColummsFilterUse: Boolean;
    2427    constructor Create;
    2528    destructor Destroy; override;
     29    procedure Execute; virtual;
    2630  end;
    2731
    … …  
    3337
    3438  TChronisClient = class
    35     procedure GetItemList(Model: string; Condition: TCondition; ItemList: TItemList); virtual; abstract;
    36     procedure SetItemList(Model: string; Condition: TCondition; ItemList: TItemList); virtual; abstract;
     39    //procedure GetItemList(Model: string; Condition: TCondition; ItemList: TItemList); virtual; abstract;
     40    //procedure SetItemList(Model: string; Condition: TCondition; ItemList: TItemList); virtual; abstract;
    3741    constructor Create; virtual;
    3842  end;
    … …  
    4044implementation
    4145
     46{ TQuery }
     47
     48constructor TQuery.Create;
     49begin
     50
     51end;
     52
     53destructor TQuery.Destroy;
     54begin
     55  inherited Destroy;
     56end;
     57
     58procedure TQuery.Execute;
     59begin
     60
     61end;
     62
    4263{ TChronisClient }
    4364
    4465constructor TChronisClient.Create;
    4566begin
    46 
    47 end;
    48 
    49 
    50 { TCondition }
    51 
    52 constructor TCondition.Create;
    53 begin
    54   Columns := TListString.Create;
    55 end;
    56 
    57 destructor TCondition.Destroy;
    58 begin
    59   Columns.Free;
    60   inherited Destroy;
    6167end;
    6268

  • trunk/Application/UChronisClientDirect.pas

    r27 r28  
    1414  TChronisClientDirect = class(TChronisClient)
    1515    Server: TChronisServer;
    16     procedure GetItemList(Condition: TCondition; ItemList: TItemList); override;
    17     procedure SetItemList(Condition: TCondition; ItemList: TItemList); override;
     16    //procedure GetItemList(Condition: TCondition; ItemList: TItemList); override;
     17    //procedure SetItemList(Condition: TCondition; ItemList: TItemList); override;
    1818    constructor Create; override;
    1919    destructor Destroy; override;
    … …  
    2424{ TChronisClientDirect }
    2525
    26 procedure TChronisClientDirect.GetItemList(Condition: TCondition;
     26(*procedure TChronisClientDirect.GetItemList(Condition: TCondition;
    2727  ItemList: TItemList);
    2828begin
    … …  
    3434begin
    3535  inherited SetItemList(Condition, ItemList);
    36 end;
     36end;*)
    3737
    3838constructor TChronisClientDirect.Create;

  • trunk/Forms/UItemView.lfm

    r22 r28  
    5959        Top = 0
    6060        Width = 620
    61         Align = alTop
    6261        OnChange = TabControl1Change
    6362        TabIndex = 0
    64         TabOrder = 0
    6563        Tabs.Strings = (
    6664          'Tab1'
    … …  
    6967        )
    7068        TabStop = False
     69        Align = alTop
     70        TabOrder = 0
    7171      end
    7272      object ListView1: TListView

  • trunk/Forms/ULoginProfileForm.lfm

    r27 r28  
    11object LoginProfileForm: TLoginProfileForm
    22  Left = 314
    3   Height = 345
     3  Height = 395
    44  Top = 133
    5   Width = 486
     5  Width = 521
    66  Caption = 'Connection profile'
    7   ClientHeight = 345
    8   ClientWidth = 486
     7  ClientHeight = 395
     8  ClientWidth = 521
    99  OnClose = FormClose
    1010  OnCreate = FormCreate
    … …  
    1313  LCLVersion = '0.9.31'
    1414  object LabelServer: TLabel
    15     Left = 232
    16     Height = 14
     15    Left = 267
     16    Height = 18
    1717    Top = 63
    18     Width = 37
     18    Width = 47
    1919    Anchors = [akTop, akRight]
    2020    Caption = 'Server:'
    … …  
    2222  end
    2323  object EditServer: TEdit
    24     Left = 304
    25     Height = 21
     24    Left = 339
     25    Height = 27
    2626    Top = 56
    2727    Width = 178
    … …  
    3232  object ListBox1: TListBox
    3333    Left = 10
    34     Height = 241
    35     Top = 23
    36     Width = 215
     34    Height = 289
     35    Top = 25
     36    Width = 250
    3737    Anchors = [akTop, akLeft, akRight, akBottom]
    3838    ItemHeight = 0
    3939    OnSelectionChange = ListBox1SelectionChange
     40    ScrollWidth = 246
    4041    TabOrder = 1
     42    TopIndex = -1
    4143  end
    4244  object ButtonOk: TButton
    43     Left = 407
     45    Left = 442
    4446    Height = 25
    45     Top = 312
     47    Top = 362
    4648    Width = 75
    4749    Anchors = [akRight, akBottom]
    … …  
    5355  object Label1: TLabel
    5456    Left = 10
    55     Height = 14
     57    Height = 18
    5658    Top = 9
    57     Width = 40
     59    Width = 53
    5860    Caption = 'Profiles:'
    5961    ParentColor = False
    … …  
    6264    Left = 8
    6365    Height = 3
    64     Top = 304
    65     Width = 474
     66    Top = 354
     67    Width = 509
    6668    Anchors = [akLeft, akRight, akBottom]
    6769    BevelInner = bvSpace
    … …  
    7072  end
    7173  object SpinEditPort: TSpinEdit
    72     Left = 304
    73     Height = 21
     74    Left = 339
     75    Height = 27
    7476    Top = 84
    7577    Width = 178
    … …  
    8082  end
    8183  object Label2: TLabel
    82     Left = 232
    83     Height = 14
     84    Left = 267
     85    Height = 18
    8486    Top = 91
    85     Width = 25
     87    Width = 31
    8688    Anchors = [akTop, akRight]
    8789    Caption = 'Port:'
    … …  
    8991  end
    9092  object Label3: TLabel
    91     Left = 232
    92     Height = 14
     93    Left = 267
     94    Height = 18
    9395    Top = 120
    94     Width = 44
     96    Width = 58
    9597    Anchors = [akTop, akRight]
    9698    Caption = 'Protocol:'
    … …  
    98100  end
    99101  object ComboBoxProtocol: TComboBox
    100     Left = 304
    101     Height = 21
     102    Left = 339
     103    Height = 27
    102104    Top = 113
    103105    Width = 178
    104106    Anchors = [akTop, akRight]
    105     ItemHeight = 13
     107    ItemHeight = 0
    106108    OnChange = ComboBoxProtocolChange
    107109    Style = csDropDownList
    … …  
    109111  end
    110112  object Label4: TLabel
    111     Left = 232
    112     Height = 14
    113     Top = 153
    114     Width = 51
     113    Left = 267
     114    Height = 18
     115    Top = 154
     116    Width = 67
    115117    Anchors = [akTop, akRight]
    116118    Caption = 'Database:'
    … …  
    118120  end
    119121  object EditDatabase: TEdit
    120     Left = 304
    121     Height = 21
     122    Left = 339
     123    Height = 27
    122124    Top = 145
    123125    Width = 178
    … …  
    129131    Left = 9
    130132    Height = 25
    131     Top = 272
     133    Top = 322
    132134    Width = 75
     135    Anchors = [akLeft, akBottom]
    133136    Caption = 'Add'
    134137    OnClick = ButtonAddClick
    … …  
    138141    Left = 96
    139142    Height = 25
    140     Top = 272
     143    Top = 322
    141144    Width = 75
     145    Anchors = [akLeft, akBottom]
    142146    Caption = 'Delete'
    143147    OnClick = ButtonDeleteClick
    … …  
    145149  end
    146150  object ButtonCancel: TButton
    147     Left = 320
     151    Left = 355
    148152    Height = 25
    149153    Top = 312
    … …  
    155159  end
    156160  object EditName: TEdit
    157     Left = 303
    158     Height = 21
     161    Left = 338
     162    Height = 27
    159163    Top = 26
    160164    Width = 179
    … …  
    164168  end
    165169  object Label5: TLabel
    166     Left = 232
    167     Height = 14
    168     Top = 33
    169     Width = 32
     170    Left = 267
     171    Height = 18
     172    Top = 32
     173    Width = 44
    170174    Anchors = [akTop, akRight]
    171175    Caption = 'Name:'

  • trunk/Languages/chronis.cs.po

    r27 r28  
    204204#: TMAINFORM.ADISCONNECT.CAPTION
    205205msgid "Disconnect"
    206 msgstr ""
     206msgstr "Odpojit"
    207207
    208208#: TMAINFORM.AEXIT.CAPTION

  • trunk/USystem.pas

    r27 r28  
    66
    77uses
    8   Classes, SysUtils, SpecializedList, SpecializedDictionary,
     8  Classes, SysUtils, SpecializedList, SpecializedDictionary, USqlDatabase,
    99  Strings, UDataTypes, Dialogs, ComCtrls, StdCtrls, Controls, UChronisClient;
    1010
    … …  
    104104    Types: TChronisTypeList;
    105105    Client: TChronisClient;
     106    Database: TSqlDatabase;
    106107    function AddType(Name, DataType: string; TypeIndex: TDbValueType): Integer;
    107108    function AddGroup(Name: string; ParentGroupId: Integer = 0): Integer;
    … …  
    180181procedure TReport.Load(Obj: TChronisObject; Filter: string = '');
    181182var
    182   Properties: TItemList;
    183   Values: TItemList;
     183  Properties: TDbRows;
     184  Values: TDbRows;
    184185  I: Integer;
    185186  C: Integer;
    … …  
    193194    // Load column names
    194195    try
    195       Properties := TItemList.Create;
    196       Base.Client.GetItemList(PropertyTable, Condition, Properties);
    197       ?
     196      Properties := TDbRows.Create;
    198197      Base.Database.Query(Properties, 'SELECT * FROM `' + PropertyTable +
    199198        '` WHERE `Object`=' + IntToStr(Obj.Id));

  • trunk/chronis.lpi

    r27 r28  
    2424      <Item2 Name="Release">
    2525        <CompilerOptions>
    26           <Version Value="10"/>
     26          <Version Value="11"/>
    2727          <Target>
    2828            <Filename Value="chronis"/>
    … …  
    3030          <SearchPaths>
    3131            <IncludeFiles Value="$(ProjOutDir)"/>
    32             <Libraries Value="/usr/lib/mysql;/usr/lib64/mysql"/>
     32            <Libraries Value="/usr/lib/mysql/;/usr/lib64/mysql/"/>
    3333            <OtherUnitFiles Value="Common;Forms"/>
    3434            <UnitOutputDirectory Value="lib/$(TargetCPU)-$(TargetOS)"/>
    … …  
    5252          <Linking>
    5353            <Debugging>
    54               <DebugInfoType Value="dsAuto"/>
     54              <GenerateDebugInfo Value="False"/>
    5555              <UseLineInfoUnit Value="False"/>
    5656            </Debugging>
    … …  
    122122        <TopLine Value="330"/>
    123123        <CursorPos X="1" Y="347"/>
    124         <UsageCount Value="28"/>
     124        <UsageCount Value="27"/>
    125125        <DefaultSyntaxHighlighter Value="Delphi"/>
    126126      </Unit1>
    … …  
    134134        <TopLine Value="118"/>
    135135        <CursorPos X="25" Y="144"/>
    136         <UsageCount Value="82"/>
     136        <UsageCount Value="81"/>
    137137        <DefaultSyntaxHighlighter Value="Delphi"/>
    138138      </Unit2>
    … …  
    146146        <TopLine Value="1"/>
    147147        <CursorPos X="24" Y="14"/>
    148         <UsageCount Value="82"/>
     148        <UsageCount Value="81"/>
    149149        <DefaultSyntaxHighlighter Value="Delphi"/>
    150150      </Unit3>
    … …  
    165165        <TopLine Value="58"/>
    166166        <CursorPos X="73" Y="232"/>
    167         <UsageCount Value="248"/>
     167        <UsageCount Value="247"/>
    168168        <DefaultSyntaxHighlighter Value="Delphi"/>
    169169      </Unit5>
    … …  
    217217        <EditorIndex Value="13"/>
    218218        <WindowIndex Value="0"/>
    219         <TopLine Value="14"/>
    220         <CursorPos X="41" Y="18"/>
     219        <TopLine Value="47"/>
     220        <CursorPos X="3" Y="49"/>
    221221        <UsageCount Value="317"/>
    222222        <Loaded Value="True"/>
    … …  
    234234        <WindowIndex Value="0"/>
    235235        <TopLine Value="643"/>
    236         <CursorPos X="23" Y="649"/>
     236        <CursorPos X="67" Y="663"/>
    237237        <UsageCount Value="317"/>
    238238        <Loaded Value="True"/>
    … …  
    269269        <IsPartOfProject Value="True"/>
    270270        <UnitName Value="USystem"/>
    271         <IsVisibleTab Value="True"/>
    272271        <EditorIndex Value="11"/>
    273272        <WindowIndex Value="0"/>
    274         <TopLine Value="189"/>
    275         <CursorPos X="8" Y="197"/>
     273        <TopLine Value="390"/>
     274        <CursorPos X="1" Y="232"/>
    276275        <UsageCount Value="200"/>
    277276        <Loaded Value="True"/>
    … …  
    286285        <EditorIndex Value="9"/>
    287286        <WindowIndex Value="0"/>
    288         <TopLine Value="14"/>
    289         <CursorPos X="21" Y="32"/>
     287        <TopLine Value="34"/>
     288        <CursorPos X="116" Y="42"/>
    290289        <UsageCount Value="230"/>
    291290        <Loaded Value="True"/>
    … …  
    326325        <TopLine Value="487"/>
    327326        <CursorPos X="44" Y="500"/>
    328         <UsageCount Value="12"/>
     327        <UsageCount Value="11"/>
    329328      </Unit17>
    330329      <Unit18>
    … …  
    334333        <TopLine Value="1661"/>
    335334        <CursorPos X="24" Y="1673"/>
    336         <UsageCount Value="12"/>
     335        <UsageCount Value="11"/>
    337336      </Unit18>
    338337      <Unit19>
    … …  
    344343        <TopLine Value="246"/>
    345344        <CursorPos X="47" Y="256"/>
    346         <UsageCount Value="198"/>
     345        <UsageCount Value="204"/>
    347346        <Loaded Value="True"/>
    348347        <DefaultSyntaxHighlighter Value="Delphi"/>
    … …  
    354353        <TopLine Value="1446"/>
    355354        <CursorPos X="26" Y="1458"/>
    356         <UsageCount Value="3"/>
     355        <UsageCount Value="2"/>
    357356      </Unit20>
    358357      <Unit21>
    … …  
    361360        <TopLine Value="550"/>
    362361        <CursorPos X="1" Y="561"/>
    363         <UsageCount Value="14"/>
     362        <UsageCount Value="13"/>
    364363      </Unit21>
    365364      <Unit22>
    … …  
    372371        <TopLine Value="149"/>
    373372        <CursorPos X="44" Y="164"/>
    374         <UsageCount Value="134"/>
     373        <UsageCount Value="140"/>
    375374        <DefaultSyntaxHighlighter Value="Delphi"/>
    376375      </Unit22>
    … …  
    380379        <TopLine Value="51"/>
    381380        <CursorPos X="1" Y="63"/>
    382         <UsageCount Value="26"/>
     381        <UsageCount Value="25"/>
    383382        <DefaultSyntaxHighlighter Value="Delphi"/>
    384383      </Unit23>
    … …  
    388387        <TopLine Value="2274"/>
    389388        <CursorPos X="1" Y="2286"/>
    390         <UsageCount Value="26"/>
     389        <UsageCount Value="25"/>
    391390      </Unit24>
    392391      <Unit25>
    … …  
    395394        <TopLine Value="286"/>
    396395        <CursorPos X="3" Y="298"/>
    397         <UsageCount Value="26"/>
     396        <UsageCount Value="25"/>
    398397      </Unit25>
    399398      <Unit26>
    … …  
    402401        <TopLine Value="460"/>
    403402        <CursorPos X="10" Y="427"/>
    404         <UsageCount Value="26"/>
     403        <UsageCount Value="25"/>
    405404      </Unit26>
    406405      <Unit27>
    … …  
    409408        <TopLine Value="120"/>
    410409        <CursorPos X="1" Y="134"/>
    411         <UsageCount Value="6"/>
     410        <UsageCount Value="5"/>
    412411        <DefaultSyntaxHighlighter Value="Delphi"/>
    413412      </Unit27>
    … …  
    417416        <TopLine Value="1"/>
    418417        <CursorPos X="24" Y="4"/>
    419         <UsageCount Value="5"/>
     418        <UsageCount Value="4"/>
    420419        <DefaultSyntaxHighlighter Value="Delphi"/>
    421420      </Unit28>
    … …  
    426425        <TopLine Value="6"/>
    427426        <CursorPos X="26" Y="18"/>
    428         <UsageCount Value="4"/>
     427        <UsageCount Value="3"/>
    429428        <DefaultSyntaxHighlighter Value="Delphi"/>
    430429      </Unit29>
    … …  
    438437        <TopLine Value="40"/>
    439438        <CursorPos X="29" Y="54"/>
    440         <UsageCount Value="83"/>
     439        <UsageCount Value="89"/>
    441440        <DefaultSyntaxHighlighter Value="Delphi"/>
    442441      </Unit30>
    … …  
    447446        <TopLine Value="1207"/>
    448447        <CursorPos X="20" Y="1219"/>
    449         <UsageCount Value="33"/>
     448        <UsageCount Value="32"/>
    450449      </Unit31>
    451450      <Unit32>
    … …  
    454453        <TopLine Value="945"/>
    455454        <CursorPos X="29" Y="950"/>
    456         <UsageCount Value="32"/>
     455        <UsageCount Value="31"/>
    457456      </Unit32>
    458457      <Unit33>
    … …  
    462461        <TopLine Value="446"/>
    463462        <CursorPos X="58" Y="243"/>
    464         <UsageCount Value="30"/>
     463        <UsageCount Value="29"/>
    465464        <DefaultSyntaxHighlighter Value="Delphi"/>
    466465      </Unit33>
    … …  
    470469        <TopLine Value="495"/>
    471470        <CursorPos X="14" Y="510"/>
    472         <UsageCount Value="30"/>
     471        <UsageCount Value="29"/>
    473472      </Unit34>
    474473      <Unit35>
    475474        <Filename Value="../../PascalClassLibrary/Network/CoolWeb/Persistence/USqlDatabase.pas"/>
    476475        <UnitName Value="USqlDatabase"/>
     476        <IsVisibleTab Value="True"/>
    477477        <EditorIndex Value="4"/>
    478478        <WindowIndex Value="0"/>
    479         <TopLine Value="14"/>
    480         <CursorPos X="14" Y="27"/>
    481         <UsageCount Value="15"/>
     479        <TopLine Value="177"/>
     480        <CursorPos X="63" Y="198"/>
     481        <UsageCount Value="18"/>
    482482        <Loaded Value="True"/>
    483483      </Unit35>
    … …  
    491491        <WindowIndex Value="0"/>
    492492        <TopLine Value="1"/>
    493         <CursorPos X="41" Y="12"/>
    494         <UsageCount Value="33"/>
     493        <CursorPos X="52" Y="23"/>
     494        <UsageCount Value="39"/>
    495495        <Loaded Value="True"/>
    496496        <LoadedDesigner Value="True"/>
    … …  
    503503        <TopLine Value="1"/>
    504504        <CursorPos X="24" Y="4"/>
    505         <UsageCount Value="13"/>
     505        <UsageCount Value="16"/>
    506506        <Loaded Value="True"/>
    507507      </Unit37>
    … …  
    512512        <TopLine Value="68"/>
    513513        <CursorPos X="14" Y="81"/>
    514         <UsageCount Value="12"/>
     514        <UsageCount Value="11"/>
    515515      </Unit38>
    516516      <Unit39>
    … …  
    519519        <TopLine Value="239"/>
    520520        <CursorPos X="3" Y="245"/>
    521         <UsageCount Value="12"/>
     521        <UsageCount Value="11"/>
    522522      </Unit39>
    523523      <Unit40>
    … …  
    526526        <TopLine Value="104"/>
    527527        <CursorPos X="23" Y="112"/>
    528         <UsageCount Value="9"/>
     528        <UsageCount Value="8"/>
    529529      </Unit40>
    530530      <Unit41>
    … …  
    538538        <TopLine Value="4"/>
    539539        <CursorPos X="20" Y="19"/>
    540         <UsageCount Value="27"/>
     540        <UsageCount Value="33"/>
    541541        <DefaultSyntaxHighlighter Value="Delphi"/>
    542542      </Unit41>
    … …  
    546546        <TopLine Value="1575"/>
    547547        <CursorPos X="1" Y="1589"/>
    548         <UsageCount Value="12"/>
     548        <UsageCount Value="11"/>
    549549      </Unit42>
    550550      <Unit43>
    … …  
    553553        <TopLine Value="119"/>
    554554        <CursorPos X="1" Y="132"/>
    555         <UsageCount Value="10"/>
     555        <UsageCount Value="9"/>
    556556      </Unit43>
    557557      <Unit44>
    … …  
    562562        <TopLine Value="90"/>
    563563        <CursorPos X="3" Y="104"/>
    564         <UsageCount Value="11"/>
     564        <UsageCount Value="14"/>
    565565        <Loaded Value="True"/>
    566566      </Unit44>
    … …  
    571571        <TopLine Value="202"/>
    572572        <CursorPos X="10" Y="215"/>
    573         <UsageCount Value="10"/>
     573        <UsageCount Value="9"/>
    574574      </Unit45>
    575575      <Unit46>
    … …  
    579579        <EditorIndex Value="5"/>
    580580        <WindowIndex Value="0"/>
    581         <TopLine Value="22"/>
    582         <CursorPos X="42" Y="36"/>
    583         <UsageCount Value="23"/>
     581        <TopLine Value="31"/>
     582        <CursorPos X="1" Y="68"/>
     583        <UsageCount Value="29"/>
    584584        <Loaded Value="True"/>
    585585        <DefaultSyntaxHighlighter Value="Delphi"/>
    … …  
    593593        <TopLine Value="1"/>
    594594        <CursorPos X="1" Y="14"/>
    595         <UsageCount Value="23"/>
     595        <UsageCount Value="29"/>
    596596        <Loaded Value="True"/>
    597597        <DefaultSyntaxHighlighter Value="Delphi"/>
    … …  
    603603        <EditorIndex Value="7"/>
    604604        <WindowIndex Value="0"/>
    605         <TopLine Value="6"/>
    606         <CursorPos X="16" Y="19"/>
    607         <UsageCount Value="22"/>
     605        <TopLine Value="8"/>
     606        <CursorPos X="53" Y="32"/>
     607        <UsageCount Value="28"/>
    608608        <Loaded Value="True"/>
    609609        <DefaultSyntaxHighlighter Value="Delphi"/>
    610610      </Unit48>
    611611    </Units>
    612     <JumpHistory Count="30" HistoryIndex="28">
     612    <JumpHistory Count="30" HistoryIndex="29">
    613613      <Position1>
    614         <Filename Value="Application/UChronisClient.pas"/>
    615         <Caret Line="33" Column="69" TopLine="17"/>
     614        <Filename Value="USystem.pas"/>
     615        <Caret Line="628" Column="3" TopLine="626"/>
    616616      </Position1>
    617617      <Position2>
    618         <Filename Value="Application/UChronisClient.pas"/>
    619         <Caret Line="22" Column="34" TopLine="6"/>
     618        <Filename Value="USystem.pas"/>
     619        <Caret Line="134" Column="17" TopLine="120"/>
    620620      </Position2>
    621621      <Position3>
    622         <Filename Value="Application/UChronisClient.pas"/>
    623         <Caret Line="49" Column="15" TopLine="28"/>
     622        <Filename Value="USystem.pas"/>
     623        <Caret Line="633" Column="3" TopLine="631"/>
    624624      </Position3>
    625625      <Position4>
    626         <Filename Value="Application/UChronisClientDirect.pas"/>
    627         <Caret Line="16" Column="80" TopLine="1"/>
     626        <Filename Value="USystem.pas"/>
     627        <Caret Line="133" Column="16" TopLine="121"/>
    628628      </Position4>
    629629      <Position5>
    630         <Filename Value="Application/UChronisClientDirect.pas"/>
    631         <Caret Line="26" Column="3" TopLine="10"/>
     630        <Filename Value="USystem.pas"/>
     631        <Caret Line="629" Column="16" TopLine="626"/>
    632632      </Position5>
    633633      <Position6>
    634         <Filename Value="Forms/UMainForm.pas"/>
    635         <Caret Line="518" Column="19" TopLine="513"/>
     634        <Filename Value="USystem.pas"/>
     635        <Caret Line="133" Column="17" TopLine="120"/>
    636636      </Position6>
    637637      <Position7>
    638         <Filename Value="Application/UChronisClientDirect.pas"/>
    639         <Caret Line="14" Column="43" TopLine="2"/>
     638        <Filename Value="USystem.pas"/>
     639        <Caret Line="8" Column="61" TopLine="1"/>
    640640      </Position7>
    641641      <Position8>
    642         <Filename Value="Application/UChronisClientDirect.pas"/>
    643         <Caret Line="18" Column="43" TopLine="2"/>
     642        <Filename Value="USystem.pas"/>
     643        <Caret Line="182" Column="24" TopLine="169"/>
    644644      </Position8>
    645645      <Position9>
    646         <Filename Value="Application/UChronisClientDirect.pas"/>
    647         <Caret Line="46" Column="15" TopLine="23"/>
     646        <Filename Value="USystem.pas"/>
     647        <Caret Line="183" Column="20" TopLine="170"/>
    648648      </Position9>
    649649      <Position10>
    650         <Filename Value="Forms/UMainForm.pas"/>
    651         <Caret Line="75" Column="20" TopLine="68"/>
     650        <Filename Value="USystem.pas"/>
     651        <Caret Line="195" Column="30" TopLine="182"/>
    652652      </Position10>
    653653      <Position11>
    654         <Filename Value="Forms/UMainForm.pas"/>
    655         <Caret Line="672" Column="26" TopLine="666"/>
     654        <Filename Value="USystem.pas"/>
     655        <Caret Line="196" Column="25" TopLine="176"/>
    656656      </Position11>
    657657      <Position12>
    658         <Filename Value="Forms/UMainForm.pas"/>
    659         <Caret Line="74" Column="15" TopLine="62"/>
     658        <Filename Value="USystem.pas"/>
     659        <Caret Line="197" Column="29" TopLine="176"/>
    660660      </Position12>
    661661      <Position13>
    662         <Filename Value="Forms/UMainForm.pas"/>
    663         <Caret Line="656" Column="37" TopLine="643"/>
     662        <Filename Value="Application/UChronisClient.pas"/>
     663        <Caret Line="56" Column="57" TopLine="26"/>
    664664      </Position13>
    665665      <Position14>
    666         <Filename Value="Forms/UMainForm.pas"/>
    667         <Caret Line="654" Column="26" TopLine="643"/>
     666        <Filename Value="Application/UChronisClient.pas"/>
     667        <Caret Line="28" Column="32" TopLine="1"/>
    668668      </Position14>
    669669      <Position15>
    670         <Filename Value="Forms/UMainForm.pas"/>
    671         <Caret Line="649" Column="23" TopLine="643"/>
     670        <Filename Value="Application/UChronisClient.pas"/>
     671        <Caret Line="40" Column="7" TopLine="19"/>
    672672      </Position15>
    673673      <Position16>
    674         <Filename Value="USystem.pas"/>
    675         <Caret Line="106" Column="5" TopLine="92"/>
     674        <Filename Value="Application/UChronisClient.pas"/>
     675        <Caret Line="67" Column="1" TopLine="45"/>
    676676      </Position16>
    677677      <Position17>
    678678        <Filename Value="USystem.pas"/>
    679         <Caret Line="241" Column="3" TopLine="236"/>
     679        <Caret Line="197" Column="29" TopLine="176"/>
    680680      </Position17>
    681681      <Position18>
    682682        <Filename Value="USystem.pas"/>
    683         <Caret Line="133" Column="28" TopLine="119"/>
     683        <Caret Line="196" Column="9" TopLine="185"/>
    684684      </Position18>
    685685      <Position19>
    686686        <Filename Value="USystem.pas"/>
    687         <Caret Line="628" Column="3" TopLine="626"/>
     687        <Caret Line="106" Column="28" TopLine="78"/>
    688688      </Position19>
    689689      <Position20>
    690690        <Filename Value="USystem.pas"/>
    691         <Caret Line="134" Column="17" TopLine="120"/>
     691        <Caret Line="205" Column="44" TopLine="187"/>
    692692      </Position20>
    693693      <Position21>
    694694        <Filename Value="USystem.pas"/>
    695         <Caret Line="633" Column="3" TopLine="631"/>
     695        <Caret Line="107" Column="1" TopLine="73"/>
    696696      </Position21>
    697697      <Position22>
    698698        <Filename Value="USystem.pas"/>
    699         <Caret Line="133" Column="16" TopLine="121"/>
     699        <Caret Line="8" Column="75" TopLine="1"/>
    700700      </Position22>
    701701      <Position23>
    702702        <Filename Value="USystem.pas"/>
    703         <Caret Line="629" Column="16" TopLine="626"/>
     703        <Caret Line="197" Column="33" TopLine="179"/>
    704704      </Position23>
    705705      <Position24>
    706706        <Filename Value="USystem.pas"/>
    707         <Caret Line="133" Column="17" TopLine="120"/>
     707        <Caret Line="184" Column="18" TopLine="165"/>
    708708      </Position24>
    709709      <Position25>
    710710        <Filename Value="USystem.pas"/>
    711         <Caret Line="8" Column="61" TopLine="1"/>
     711        <Caret Line="196" Column="28" TopLine="178"/>
    712712      </Position25>
    713713      <Position26>
    714         <Filename Value="USystem.pas"/>
    715         <Caret Line="182" Column="24" TopLine="169"/>
     714        <Filename Value="Application/UChronisClientDirect.pas"/>
     715        <Caret Line="16" Column="7" TopLine="1"/>
    716716      </Position26>
    717717      <Position27>
    718         <Filename Value="USystem.pas"/>
    719         <Caret Line="183" Column="20" TopLine="170"/>
     718        <Filename Value="Forms/ULoginProfileForm.pas"/>
     719        <Caret Line="23" Column="52" TopLine="1"/>
    720720      </Position27>
    721721      <Position28>
    722         <Filename Value="USystem.pas"/>
    723         <Caret Line="195" Column="30" TopLine="182"/>
     722        <Filename Value="../../PascalClassLibrary/Network/CoolWeb/Persistence/USqlDatabase.pas"/>
     723        <Caret Line="187" Column="73" TopLine="177"/>
    724724      </Position28>
    725725      <Position29>
    726         <Filename Value="USystem.pas"/>
    727         <Caret Line="196" Column="27" TopLine="189"/>
     726        <Filename Value="Forms/ULoginForm.pas"/>
     727        <Caret Line="28" Column="66" TopLine="14"/>
    728728      </Position29>
    729729      <Position30>
    730         <Filename Value="Application/UChronisClient.pas"/>
    731         <Caret Line="36" Column="42" TopLine="22"/>
     730        <Filename Value="Forms/UMainForm.pas"/>
     731        <Caret Line="663" Column="67" TopLine="643"/>
    732732      </Position30>
    733733    </JumpHistory>
    734734  </ProjectOptions>
    735735  <CompilerOptions>
    736     <Version Value="10"/>
     736    <Version Value="11"/>
    737737    <Target>
    738738      <Filename Value="chronis"/>
    … …  
    740740    <SearchPaths>
    741741      <IncludeFiles Value="$(ProjOutDir)"/>
    742       <Libraries Value="/usr/lib/mysql;/usr/lib64/mysql"/>
     742      <Libraries Value="/usr/lib/mysql/;/usr/lib64/mysql/"/>
    743743      <OtherUnitFiles Value="Common;Forms;Application"/>
    744744      <UnitOutputDirectory Value="lib/$(TargetCPU)-$(TargetOS)"/>
    … …  
    762762    <Linking>
    763763      <Debugging>
    764         <GenerateDebugInfo Value="True"/>
    765764        <DebugInfoType Value="dsStabs"/>
    766765        <UseHeaptrc Value="True"/>
Note: See TracChangeset for help on using the changeset viewer.