- Timestamp:
- Nov 23, 2011, 7:17:55 PM (13 years ago)
- Location:
- trunk
- Files:
-
- 8 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/Application/UChronisClient.pas
r27 r28 9 9 10 10 type 11 TChronisClient = class; 12 11 13 TOrderDirection = (odNone, odAscending, odDescending); 12 14 13 { T Condition}15 { TQuery } 14 16 15 TCondition = class 17 TQuery = class 18 Client: TChronisClient; 16 19 OrderColumn: string; 17 20 OrderDirection: TOrderDirection; … … 20 23 PageItemCount: Integer; 21 24 PageUse: Boolean; 22 Columns : TListString;23 Columms Use: Boolean;25 ColumnsFilter: TListString; 26 ColummsFilterUse: Boolean; 24 27 constructor Create; 25 28 destructor Destroy; override; 29 procedure Execute; virtual; 26 30 end; 27 31 … … 33 37 34 38 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; 37 41 constructor Create; virtual; 38 42 end; … … 40 44 implementation 41 45 46 { TQuery } 47 48 constructor TQuery.Create; 49 begin 50 51 end; 52 53 destructor TQuery.Destroy; 54 begin 55 inherited Destroy; 56 end; 57 58 procedure TQuery.Execute; 59 begin 60 61 end; 62 42 63 { TChronisClient } 43 64 44 65 constructor TChronisClient.Create; 45 66 begin 46 47 end;48 49 50 { TCondition }51 52 constructor TCondition.Create;53 begin54 Columns := TListString.Create;55 end;56 57 destructor TCondition.Destroy;58 begin59 Columns.Free;60 inherited Destroy;61 67 end; 62 68 -
trunk/Application/UChronisClientDirect.pas
r27 r28 14 14 TChronisClientDirect = class(TChronisClient) 15 15 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; 18 18 constructor Create; override; 19 19 destructor Destroy; override; … … 24 24 { TChronisClientDirect } 25 25 26 procedure TChronisClientDirect.GetItemList(Condition: TCondition;26 (*procedure TChronisClientDirect.GetItemList(Condition: TCondition; 27 27 ItemList: TItemList); 28 28 begin … … 34 34 begin 35 35 inherited SetItemList(Condition, ItemList); 36 end; 36 end;*) 37 37 38 38 constructor TChronisClientDirect.Create; -
trunk/Forms/UItemView.lfm
r22 r28 59 59 Top = 0 60 60 Width = 620 61 Align = alTop62 61 OnChange = TabControl1Change 63 62 TabIndex = 0 64 TabOrder = 065 63 Tabs.Strings = ( 66 64 'Tab1' … … 69 67 ) 70 68 TabStop = False 69 Align = alTop 70 TabOrder = 0 71 71 end 72 72 object ListView1: TListView -
trunk/Forms/ULoginProfileForm.lfm
r27 r28 1 1 object LoginProfileForm: TLoginProfileForm 2 2 Left = 314 3 Height = 3 453 Height = 395 4 4 Top = 133 5 Width = 4865 Width = 521 6 6 Caption = 'Connection profile' 7 ClientHeight = 3 458 ClientWidth = 4867 ClientHeight = 395 8 ClientWidth = 521 9 9 OnClose = FormClose 10 10 OnCreate = FormCreate … … 13 13 LCLVersion = '0.9.31' 14 14 object LabelServer: TLabel 15 Left = 2 3216 Height = 1 415 Left = 267 16 Height = 18 17 17 Top = 63 18 Width = 3718 Width = 47 19 19 Anchors = [akTop, akRight] 20 20 Caption = 'Server:' … … 22 22 end 23 23 object EditServer: TEdit 24 Left = 3 0425 Height = 2 124 Left = 339 25 Height = 27 26 26 Top = 56 27 27 Width = 178 … … 32 32 object ListBox1: TListBox 33 33 Left = 10 34 Height = 2 4135 Top = 2 336 Width = 2 1534 Height = 289 35 Top = 25 36 Width = 250 37 37 Anchors = [akTop, akLeft, akRight, akBottom] 38 38 ItemHeight = 0 39 39 OnSelectionChange = ListBox1SelectionChange 40 ScrollWidth = 246 40 41 TabOrder = 1 42 TopIndex = -1 41 43 end 42 44 object ButtonOk: TButton 43 Left = 4 0745 Left = 442 44 46 Height = 25 45 Top = 3 1247 Top = 362 46 48 Width = 75 47 49 Anchors = [akRight, akBottom] … … 53 55 object Label1: TLabel 54 56 Left = 10 55 Height = 1 457 Height = 18 56 58 Top = 9 57 Width = 4059 Width = 53 58 60 Caption = 'Profiles:' 59 61 ParentColor = False … … 62 64 Left = 8 63 65 Height = 3 64 Top = 3 0465 Width = 47466 Top = 354 67 Width = 509 66 68 Anchors = [akLeft, akRight, akBottom] 67 69 BevelInner = bvSpace … … 70 72 end 71 73 object SpinEditPort: TSpinEdit 72 Left = 3 0473 Height = 2 174 Left = 339 75 Height = 27 74 76 Top = 84 75 77 Width = 178 … … 80 82 end 81 83 object Label2: TLabel 82 Left = 2 3283 Height = 1 484 Left = 267 85 Height = 18 84 86 Top = 91 85 Width = 2587 Width = 31 86 88 Anchors = [akTop, akRight] 87 89 Caption = 'Port:' … … 89 91 end 90 92 object Label3: TLabel 91 Left = 2 3292 Height = 1 493 Left = 267 94 Height = 18 93 95 Top = 120 94 Width = 4496 Width = 58 95 97 Anchors = [akTop, akRight] 96 98 Caption = 'Protocol:' … … 98 100 end 99 101 object ComboBoxProtocol: TComboBox 100 Left = 3 04101 Height = 2 1102 Left = 339 103 Height = 27 102 104 Top = 113 103 105 Width = 178 104 106 Anchors = [akTop, akRight] 105 ItemHeight = 13107 ItemHeight = 0 106 108 OnChange = ComboBoxProtocolChange 107 109 Style = csDropDownList … … 109 111 end 110 112 object Label4: TLabel 111 Left = 2 32112 Height = 1 4113 Top = 15 3114 Width = 51113 Left = 267 114 Height = 18 115 Top = 154 116 Width = 67 115 117 Anchors = [akTop, akRight] 116 118 Caption = 'Database:' … … 118 120 end 119 121 object EditDatabase: TEdit 120 Left = 3 04121 Height = 2 1122 Left = 339 123 Height = 27 122 124 Top = 145 123 125 Width = 178 … … 129 131 Left = 9 130 132 Height = 25 131 Top = 272133 Top = 322 132 134 Width = 75 135 Anchors = [akLeft, akBottom] 133 136 Caption = 'Add' 134 137 OnClick = ButtonAddClick … … 138 141 Left = 96 139 142 Height = 25 140 Top = 272143 Top = 322 141 144 Width = 75 145 Anchors = [akLeft, akBottom] 142 146 Caption = 'Delete' 143 147 OnClick = ButtonDeleteClick … … 145 149 end 146 150 object ButtonCancel: TButton 147 Left = 3 20151 Left = 355 148 152 Height = 25 149 153 Top = 312 … … 155 159 end 156 160 object EditName: TEdit 157 Left = 3 03158 Height = 2 1161 Left = 338 162 Height = 27 159 163 Top = 26 160 164 Width = 179 … … 164 168 end 165 169 object Label5: TLabel 166 Left = 2 32167 Height = 1 4168 Top = 3 3169 Width = 32170 Left = 267 171 Height = 18 172 Top = 32 173 Width = 44 170 174 Anchors = [akTop, akRight] 171 175 Caption = 'Name:' -
trunk/Languages/chronis.cs.po
r27 r28 204 204 #: TMAINFORM.ADISCONNECT.CAPTION 205 205 msgid "Disconnect" 206 msgstr " "206 msgstr "Odpojit" 207 207 208 208 #: TMAINFORM.AEXIT.CAPTION -
trunk/USystem.pas
r27 r28 6 6 7 7 uses 8 Classes, SysUtils, SpecializedList, SpecializedDictionary, 8 Classes, SysUtils, SpecializedList, SpecializedDictionary, USqlDatabase, 9 9 Strings, UDataTypes, Dialogs, ComCtrls, StdCtrls, Controls, UChronisClient; 10 10 … … 104 104 Types: TChronisTypeList; 105 105 Client: TChronisClient; 106 Database: TSqlDatabase; 106 107 function AddType(Name, DataType: string; TypeIndex: TDbValueType): Integer; 107 108 function AddGroup(Name: string; ParentGroupId: Integer = 0): Integer; … … 180 181 procedure TReport.Load(Obj: TChronisObject; Filter: string = ''); 181 182 var 182 Properties: T ItemList;183 Values: T ItemList;183 Properties: TDbRows; 184 Values: TDbRows; 184 185 I: Integer; 185 186 C: Integer; … … 193 194 // Load column names 194 195 try 195 Properties := TItemList.Create; 196 Base.Client.GetItemList(PropertyTable, Condition, Properties); 197 ? 196 Properties := TDbRows.Create; 198 197 Base.Database.Query(Properties, 'SELECT * FROM `' + PropertyTable + 199 198 '` WHERE `Object`=' + IntToStr(Obj.Id)); -
trunk/chronis.lpi
r27 r28 24 24 <Item2 Name="Release"> 25 25 <CompilerOptions> 26 <Version Value="1 0"/>26 <Version Value="11"/> 27 27 <Target> 28 28 <Filename Value="chronis"/> … … 30 30 <SearchPaths> 31 31 <IncludeFiles Value="$(ProjOutDir)"/> 32 <Libraries Value="/usr/lib/mysql ;/usr/lib64/mysql"/>32 <Libraries Value="/usr/lib/mysql/;/usr/lib64/mysql/"/> 33 33 <OtherUnitFiles Value="Common;Forms"/> 34 34 <UnitOutputDirectory Value="lib/$(TargetCPU)-$(TargetOS)"/> … … 52 52 <Linking> 53 53 <Debugging> 54 < DebugInfoType Value="dsAuto"/>54 <GenerateDebugInfo Value="False"/> 55 55 <UseLineInfoUnit Value="False"/> 56 56 </Debugging> … … 122 122 <TopLine Value="330"/> 123 123 <CursorPos X="1" Y="347"/> 124 <UsageCount Value="2 8"/>124 <UsageCount Value="27"/> 125 125 <DefaultSyntaxHighlighter Value="Delphi"/> 126 126 </Unit1> … … 134 134 <TopLine Value="118"/> 135 135 <CursorPos X="25" Y="144"/> 136 <UsageCount Value="8 2"/>136 <UsageCount Value="81"/> 137 137 <DefaultSyntaxHighlighter Value="Delphi"/> 138 138 </Unit2> … … 146 146 <TopLine Value="1"/> 147 147 <CursorPos X="24" Y="14"/> 148 <UsageCount Value="8 2"/>148 <UsageCount Value="81"/> 149 149 <DefaultSyntaxHighlighter Value="Delphi"/> 150 150 </Unit3> … … 165 165 <TopLine Value="58"/> 166 166 <CursorPos X="73" Y="232"/> 167 <UsageCount Value="24 8"/>167 <UsageCount Value="247"/> 168 168 <DefaultSyntaxHighlighter Value="Delphi"/> 169 169 </Unit5> … … 217 217 <EditorIndex Value="13"/> 218 218 <WindowIndex Value="0"/> 219 <TopLine Value=" 14"/>220 <CursorPos X=" 41" Y="18"/>219 <TopLine Value="47"/> 220 <CursorPos X="3" Y="49"/> 221 221 <UsageCount Value="317"/> 222 222 <Loaded Value="True"/> … … 234 234 <WindowIndex Value="0"/> 235 235 <TopLine Value="643"/> 236 <CursorPos X=" 23" Y="649"/>236 <CursorPos X="67" Y="663"/> 237 237 <UsageCount Value="317"/> 238 238 <Loaded Value="True"/> … … 269 269 <IsPartOfProject Value="True"/> 270 270 <UnitName Value="USystem"/> 271 <IsVisibleTab Value="True"/>272 271 <EditorIndex Value="11"/> 273 272 <WindowIndex Value="0"/> 274 <TopLine Value=" 189"/>275 <CursorPos X=" 8" Y="197"/>273 <TopLine Value="390"/> 274 <CursorPos X="1" Y="232"/> 276 275 <UsageCount Value="200"/> 277 276 <Loaded Value="True"/> … … 286 285 <EditorIndex Value="9"/> 287 286 <WindowIndex Value="0"/> 288 <TopLine Value=" 14"/>289 <CursorPos X=" 21" Y="32"/>287 <TopLine Value="34"/> 288 <CursorPos X="116" Y="42"/> 290 289 <UsageCount Value="230"/> 291 290 <Loaded Value="True"/> … … 326 325 <TopLine Value="487"/> 327 326 <CursorPos X="44" Y="500"/> 328 <UsageCount Value="1 2"/>327 <UsageCount Value="11"/> 329 328 </Unit17> 330 329 <Unit18> … … 334 333 <TopLine Value="1661"/> 335 334 <CursorPos X="24" Y="1673"/> 336 <UsageCount Value="1 2"/>335 <UsageCount Value="11"/> 337 336 </Unit18> 338 337 <Unit19> … … 344 343 <TopLine Value="246"/> 345 344 <CursorPos X="47" Y="256"/> 346 <UsageCount Value=" 198"/>345 <UsageCount Value="204"/> 347 346 <Loaded Value="True"/> 348 347 <DefaultSyntaxHighlighter Value="Delphi"/> … … 354 353 <TopLine Value="1446"/> 355 354 <CursorPos X="26" Y="1458"/> 356 <UsageCount Value=" 3"/>355 <UsageCount Value="2"/> 357 356 </Unit20> 358 357 <Unit21> … … 361 360 <TopLine Value="550"/> 362 361 <CursorPos X="1" Y="561"/> 363 <UsageCount Value="1 4"/>362 <UsageCount Value="13"/> 364 363 </Unit21> 365 364 <Unit22> … … 372 371 <TopLine Value="149"/> 373 372 <CursorPos X="44" Y="164"/> 374 <UsageCount Value="1 34"/>373 <UsageCount Value="140"/> 375 374 <DefaultSyntaxHighlighter Value="Delphi"/> 376 375 </Unit22> … … 380 379 <TopLine Value="51"/> 381 380 <CursorPos X="1" Y="63"/> 382 <UsageCount Value="2 6"/>381 <UsageCount Value="25"/> 383 382 <DefaultSyntaxHighlighter Value="Delphi"/> 384 383 </Unit23> … … 388 387 <TopLine Value="2274"/> 389 388 <CursorPos X="1" Y="2286"/> 390 <UsageCount Value="2 6"/>389 <UsageCount Value="25"/> 391 390 </Unit24> 392 391 <Unit25> … … 395 394 <TopLine Value="286"/> 396 395 <CursorPos X="3" Y="298"/> 397 <UsageCount Value="2 6"/>396 <UsageCount Value="25"/> 398 397 </Unit25> 399 398 <Unit26> … … 402 401 <TopLine Value="460"/> 403 402 <CursorPos X="10" Y="427"/> 404 <UsageCount Value="2 6"/>403 <UsageCount Value="25"/> 405 404 </Unit26> 406 405 <Unit27> … … 409 408 <TopLine Value="120"/> 410 409 <CursorPos X="1" Y="134"/> 411 <UsageCount Value=" 6"/>410 <UsageCount Value="5"/> 412 411 <DefaultSyntaxHighlighter Value="Delphi"/> 413 412 </Unit27> … … 417 416 <TopLine Value="1"/> 418 417 <CursorPos X="24" Y="4"/> 419 <UsageCount Value=" 5"/>418 <UsageCount Value="4"/> 420 419 <DefaultSyntaxHighlighter Value="Delphi"/> 421 420 </Unit28> … … 426 425 <TopLine Value="6"/> 427 426 <CursorPos X="26" Y="18"/> 428 <UsageCount Value=" 4"/>427 <UsageCount Value="3"/> 429 428 <DefaultSyntaxHighlighter Value="Delphi"/> 430 429 </Unit29> … … 438 437 <TopLine Value="40"/> 439 438 <CursorPos X="29" Y="54"/> 440 <UsageCount Value="8 3"/>439 <UsageCount Value="89"/> 441 440 <DefaultSyntaxHighlighter Value="Delphi"/> 442 441 </Unit30> … … 447 446 <TopLine Value="1207"/> 448 447 <CursorPos X="20" Y="1219"/> 449 <UsageCount Value="3 3"/>448 <UsageCount Value="32"/> 450 449 </Unit31> 451 450 <Unit32> … … 454 453 <TopLine Value="945"/> 455 454 <CursorPos X="29" Y="950"/> 456 <UsageCount Value="3 2"/>455 <UsageCount Value="31"/> 457 456 </Unit32> 458 457 <Unit33> … … 462 461 <TopLine Value="446"/> 463 462 <CursorPos X="58" Y="243"/> 464 <UsageCount Value=" 30"/>463 <UsageCount Value="29"/> 465 464 <DefaultSyntaxHighlighter Value="Delphi"/> 466 465 </Unit33> … … 470 469 <TopLine Value="495"/> 471 470 <CursorPos X="14" Y="510"/> 472 <UsageCount Value=" 30"/>471 <UsageCount Value="29"/> 473 472 </Unit34> 474 473 <Unit35> 475 474 <Filename Value="../../PascalClassLibrary/Network/CoolWeb/Persistence/USqlDatabase.pas"/> 476 475 <UnitName Value="USqlDatabase"/> 476 <IsVisibleTab Value="True"/> 477 477 <EditorIndex Value="4"/> 478 478 <WindowIndex Value="0"/> 479 <TopLine Value="1 4"/>480 <CursorPos X=" 14" Y="27"/>481 <UsageCount Value="1 5"/>479 <TopLine Value="177"/> 480 <CursorPos X="63" Y="198"/> 481 <UsageCount Value="18"/> 482 482 <Loaded Value="True"/> 483 483 </Unit35> … … 491 491 <WindowIndex Value="0"/> 492 492 <TopLine Value="1"/> 493 <CursorPos X=" 41" Y="12"/>494 <UsageCount Value="3 3"/>493 <CursorPos X="52" Y="23"/> 494 <UsageCount Value="39"/> 495 495 <Loaded Value="True"/> 496 496 <LoadedDesigner Value="True"/> … … 503 503 <TopLine Value="1"/> 504 504 <CursorPos X="24" Y="4"/> 505 <UsageCount Value="1 3"/>505 <UsageCount Value="16"/> 506 506 <Loaded Value="True"/> 507 507 </Unit37> … … 512 512 <TopLine Value="68"/> 513 513 <CursorPos X="14" Y="81"/> 514 <UsageCount Value="1 2"/>514 <UsageCount Value="11"/> 515 515 </Unit38> 516 516 <Unit39> … … 519 519 <TopLine Value="239"/> 520 520 <CursorPos X="3" Y="245"/> 521 <UsageCount Value="1 2"/>521 <UsageCount Value="11"/> 522 522 </Unit39> 523 523 <Unit40> … … 526 526 <TopLine Value="104"/> 527 527 <CursorPos X="23" Y="112"/> 528 <UsageCount Value=" 9"/>528 <UsageCount Value="8"/> 529 529 </Unit40> 530 530 <Unit41> … … 538 538 <TopLine Value="4"/> 539 539 <CursorPos X="20" Y="19"/> 540 <UsageCount Value=" 27"/>540 <UsageCount Value="33"/> 541 541 <DefaultSyntaxHighlighter Value="Delphi"/> 542 542 </Unit41> … … 546 546 <TopLine Value="1575"/> 547 547 <CursorPos X="1" Y="1589"/> 548 <UsageCount Value="1 2"/>548 <UsageCount Value="11"/> 549 549 </Unit42> 550 550 <Unit43> … … 553 553 <TopLine Value="119"/> 554 554 <CursorPos X="1" Y="132"/> 555 <UsageCount Value=" 10"/>555 <UsageCount Value="9"/> 556 556 </Unit43> 557 557 <Unit44> … … 562 562 <TopLine Value="90"/> 563 563 <CursorPos X="3" Y="104"/> 564 <UsageCount Value="1 1"/>564 <UsageCount Value="14"/> 565 565 <Loaded Value="True"/> 566 566 </Unit44> … … 571 571 <TopLine Value="202"/> 572 572 <CursorPos X="10" Y="215"/> 573 <UsageCount Value=" 10"/>573 <UsageCount Value="9"/> 574 574 </Unit45> 575 575 <Unit46> … … 579 579 <EditorIndex Value="5"/> 580 580 <WindowIndex Value="0"/> 581 <TopLine Value=" 22"/>582 <CursorPos X=" 42" Y="36"/>583 <UsageCount Value="2 3"/>581 <TopLine Value="31"/> 582 <CursorPos X="1" Y="68"/> 583 <UsageCount Value="29"/> 584 584 <Loaded Value="True"/> 585 585 <DefaultSyntaxHighlighter Value="Delphi"/> … … 593 593 <TopLine Value="1"/> 594 594 <CursorPos X="1" Y="14"/> 595 <UsageCount Value="2 3"/>595 <UsageCount Value="29"/> 596 596 <Loaded Value="True"/> 597 597 <DefaultSyntaxHighlighter Value="Delphi"/> … … 603 603 <EditorIndex Value="7"/> 604 604 <WindowIndex Value="0"/> 605 <TopLine Value=" 6"/>606 <CursorPos X=" 16" Y="19"/>607 <UsageCount Value="2 2"/>605 <TopLine Value="8"/> 606 <CursorPos X="53" Y="32"/> 607 <UsageCount Value="28"/> 608 608 <Loaded Value="True"/> 609 609 <DefaultSyntaxHighlighter Value="Delphi"/> 610 610 </Unit48> 611 611 </Units> 612 <JumpHistory Count="30" HistoryIndex="2 8">612 <JumpHistory Count="30" HistoryIndex="29"> 613 613 <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"/> 616 616 </Position1> 617 617 <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"/> 620 620 </Position2> 621 621 <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"/> 624 624 </Position3> 625 625 <Position4> 626 <Filename Value=" Application/UChronisClientDirect.pas"/>627 <Caret Line="1 6" Column="80" TopLine="1"/>626 <Filename Value="USystem.pas"/> 627 <Caret Line="133" Column="16" TopLine="121"/> 628 628 </Position4> 629 629 <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"/> 632 632 </Position5> 633 633 <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"/> 636 636 </Position6> 637 637 <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"/> 640 640 </Position7> 641 641 <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"/> 644 644 </Position8> 645 645 <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"/> 648 648 </Position9> 649 649 <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"/> 652 652 </Position10> 653 653 <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"/> 656 656 </Position11> 657 657 <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"/> 660 660 </Position12> 661 661 <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"/> 664 664 </Position13> 665 665 <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"/> 668 668 </Position14> 669 669 <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"/> 672 672 </Position15> 673 673 <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"/> 676 676 </Position16> 677 677 <Position17> 678 678 <Filename Value="USystem.pas"/> 679 <Caret Line=" 241" Column="3" TopLine="236"/>679 <Caret Line="197" Column="29" TopLine="176"/> 680 680 </Position17> 681 681 <Position18> 682 682 <Filename Value="USystem.pas"/> 683 <Caret Line="1 33" Column="28" TopLine="119"/>683 <Caret Line="196" Column="9" TopLine="185"/> 684 684 </Position18> 685 685 <Position19> 686 686 <Filename Value="USystem.pas"/> 687 <Caret Line=" 628" Column="3" TopLine="626"/>687 <Caret Line="106" Column="28" TopLine="78"/> 688 688 </Position19> 689 689 <Position20> 690 690 <Filename Value="USystem.pas"/> 691 <Caret Line=" 134" Column="17" TopLine="120"/>691 <Caret Line="205" Column="44" TopLine="187"/> 692 692 </Position20> 693 693 <Position21> 694 694 <Filename Value="USystem.pas"/> 695 <Caret Line=" 633" Column="3" TopLine="631"/>695 <Caret Line="107" Column="1" TopLine="73"/> 696 696 </Position21> 697 697 <Position22> 698 698 <Filename Value="USystem.pas"/> 699 <Caret Line=" 133" Column="16" TopLine="121"/>699 <Caret Line="8" Column="75" TopLine="1"/> 700 700 </Position22> 701 701 <Position23> 702 702 <Filename Value="USystem.pas"/> 703 <Caret Line=" 629" Column="16" TopLine="626"/>703 <Caret Line="197" Column="33" TopLine="179"/> 704 704 </Position23> 705 705 <Position24> 706 706 <Filename Value="USystem.pas"/> 707 <Caret Line="1 33" Column="17" TopLine="120"/>707 <Caret Line="184" Column="18" TopLine="165"/> 708 708 </Position24> 709 709 <Position25> 710 710 <Filename Value="USystem.pas"/> 711 <Caret Line=" 8" Column="61" TopLine="1"/>711 <Caret Line="196" Column="28" TopLine="178"/> 712 712 </Position25> 713 713 <Position26> 714 <Filename Value=" USystem.pas"/>715 <Caret Line="1 82" Column="24" TopLine="169"/>714 <Filename Value="Application/UChronisClientDirect.pas"/> 715 <Caret Line="16" Column="7" TopLine="1"/> 716 716 </Position26> 717 717 <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"/> 720 720 </Position27> 721 721 <Position28> 722 <Filename Value=" USystem.pas"/>723 <Caret Line="1 95" Column="30" TopLine="182"/>722 <Filename Value="../../PascalClassLibrary/Network/CoolWeb/Persistence/USqlDatabase.pas"/> 723 <Caret Line="187" Column="73" TopLine="177"/> 724 724 </Position28> 725 725 <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"/> 728 728 </Position29> 729 729 <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"/> 732 732 </Position30> 733 733 </JumpHistory> 734 734 </ProjectOptions> 735 735 <CompilerOptions> 736 <Version Value="1 0"/>736 <Version Value="11"/> 737 737 <Target> 738 738 <Filename Value="chronis"/> … … 740 740 <SearchPaths> 741 741 <IncludeFiles Value="$(ProjOutDir)"/> 742 <Libraries Value="/usr/lib/mysql ;/usr/lib64/mysql"/>742 <Libraries Value="/usr/lib/mysql/;/usr/lib64/mysql/"/> 743 743 <OtherUnitFiles Value="Common;Forms;Application"/> 744 744 <UnitOutputDirectory Value="lib/$(TargetCPU)-$(TargetOS)"/> … … 762 762 <Linking> 763 763 <Debugging> 764 <GenerateDebugInfo Value="True"/>765 764 <DebugInfoType Value="dsStabs"/> 766 765 <UseHeaptrc Value="True"/>
Note:
See TracChangeset
for help on using the changeset viewer.