Changeset 55
- Timestamp:
- Jul 23, 2011, 11:23:39 PM (13 years ago)
- Location:
- trunk
- Files:
-
- 2 added
- 4 deleted
- 3 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/CGI.lpi
r54 r55 50 50 </Item3> 51 51 </RequiredPackages> 52 <Units Count="1 16">52 <Units Count="122"> 53 53 <Unit0> 54 54 <Filename Value="CGI.lpr"/> … … 57 57 <EditorIndex Value="0"/> 58 58 <WindowIndex Value="0"/> 59 <TopLine Value=" 4"/>60 <CursorPos X=" 1" Y="19"/>59 <TopLine Value="5"/> 60 <CursorPos X="36" Y="8"/> 61 61 <UsageCount Value="203"/> 62 62 <Loaded Value="True"/> … … 69 69 <TopLine Value="1"/> 70 70 <CursorPos X="1" Y="11"/> 71 <UsageCount Value=" 200"/>71 <UsageCount Value="199"/> 72 72 <DefaultSyntaxHighlighter Value="Delphi"/> 73 73 </Unit1> … … 78 78 <TopLine Value="291"/> 79 79 <CursorPos X="1" Y="311"/> 80 <UsageCount Value=" 90"/>80 <UsageCount Value="89"/> 81 81 <DefaultSyntaxHighlighter Value="Delphi"/> 82 82 </Unit2> 83 83 <Unit3> 84 84 <Filename Value="UXmlClasses.pas"/> 85 <UsageCount Value=" 90"/>85 <UsageCount Value="89"/> 86 86 <DefaultSyntaxHighlighter Value="Delphi"/> 87 87 </Unit3> … … 90 90 <IsPartOfProject Value="True"/> 91 91 <UnitName Value="UCore"/> 92 <WindowIndex Value="0"/> 93 <TopLine Value="1"/> 94 <CursorPos X="3" Y="8"/> 92 <EditorIndex Value="5"/> 93 <WindowIndex Value="0"/> 94 <TopLine Value="16"/> 95 <CursorPos X="39" Y="41"/> 95 96 <UsageCount Value="203"/> 97 <Loaded Value="True"/> 96 98 <DefaultSyntaxHighlighter Value="Delphi"/> 97 99 </Unit4> … … 102 104 <TopLine Value="217"/> 103 105 <CursorPos X="5" Y="236"/> 104 <UsageCount Value=" 90"/>106 <UsageCount Value="89"/> 105 107 <DefaultSyntaxHighlighter Value="Delphi"/> 106 108 </Unit5> … … 111 113 <TopLine Value="10"/> 112 114 <CursorPos X="27" Y="19"/> 113 <UsageCount Value=" 90"/>115 <UsageCount Value="89"/> 114 116 <DefaultSyntaxHighlighter Value="Delphi"/> 115 117 </Unit6> … … 119 121 <TopLine Value="17"/> 120 122 <CursorPos X="34" Y="30"/> 121 <UsageCount Value=" 90"/>123 <UsageCount Value="89"/> 122 124 <DefaultSyntaxHighlighter Value="Delphi"/> 123 125 </Unit7> … … 128 130 <TopLine Value="204"/> 129 131 <CursorPos X="25" Y="226"/> 130 <UsageCount Value=" 90"/>132 <UsageCount Value="89"/> 131 133 <DefaultSyntaxHighlighter Value="Delphi"/> 132 134 </Unit8> … … 137 139 <TopLine Value="102"/> 138 140 <CursorPos X="25" Y="107"/> 139 <UsageCount Value=" 90"/>141 <UsageCount Value="89"/> 140 142 <DefaultSyntaxHighlighter Value="Delphi"/> 141 143 </Unit9> … … 146 148 <TopLine Value="40"/> 147 149 <CursorPos X="9" Y="59"/> 148 <UsageCount Value="7 8"/>150 <UsageCount Value="77"/> 149 151 <DefaultSyntaxHighlighter Value="Delphi"/> 150 152 </Unit10> … … 154 156 <TopLine Value="91"/> 155 157 <CursorPos X="10" Y="110"/> 156 <UsageCount Value=" 60"/>158 <UsageCount Value="59"/> 157 159 <DefaultSyntaxHighlighter Value="Delphi"/> 158 160 </Unit11> 159 161 <Unit12> 160 162 <Filename Value="UConfig.pas"/> 161 <IsPartOfProject Value="True"/>162 163 <UnitName Value="UConfig"/> 163 164 <WindowIndex Value="0"/> 164 <TopLine Value="1 0"/>165 <CursorPos X=" 45" Y="25"/>166 <UsageCount Value="29 4"/>165 <TopLine Value="15"/> 166 <CursorPos X="38" Y="30"/> 167 <UsageCount Value="293"/> 167 168 <DefaultSyntaxHighlighter Value="Delphi"/> 168 169 </Unit12> … … 189 190 <TopLine Value="608"/> 190 191 <CursorPos X="44" Y="627"/> 191 <UsageCount Value="5 9"/>192 <UsageCount Value="58"/> 192 193 <DefaultSyntaxHighlighter Value="Delphi"/> 193 194 </Unit15> … … 198 199 <TopLine Value="39"/> 199 200 <CursorPos X="25" Y="58"/> 200 <UsageCount Value="5 9"/>201 <UsageCount Value="58"/> 201 202 <DefaultSyntaxHighlighter Value="Delphi"/> 202 203 </Unit16> … … 207 208 <TopLine Value="1"/> 208 209 <CursorPos X="69" Y="19"/> 209 <UsageCount Value="5 5"/>210 <UsageCount Value="54"/> 210 211 <DefaultSyntaxHighlighter Value="Delphi"/> 211 212 </Unit17> … … 216 217 <TopLine Value="1"/> 217 218 <CursorPos X="52" Y="124"/> 218 <UsageCount Value="5 2"/>219 <UsageCount Value="51"/> 219 220 <DefaultSyntaxHighlighter Value="Delphi"/> 220 221 </Unit18> … … 224 225 <TopLine Value="677"/> 225 226 <CursorPos X="14" Y="691"/> 226 <UsageCount Value="6 2"/>227 <UsageCount Value="61"/> 227 228 <DefaultSyntaxHighlighter Value="Delphi"/> 228 229 </Unit19> … … 232 233 <TopLine Value="10"/> 233 234 <CursorPos X="22" Y="23"/> 234 <UsageCount Value="6 1"/>235 <UsageCount Value="60"/> 235 236 <DefaultSyntaxHighlighter Value="Delphi"/> 236 237 </Unit20> … … 241 242 <TopLine Value="1140"/> 242 243 <CursorPos X="26" Y="1143"/> 243 <UsageCount Value="6 1"/>244 <UsageCount Value="60"/> 244 245 <DefaultSyntaxHighlighter Value="Delphi"/> 245 246 </Unit21> … … 249 250 <TopLine Value="43"/> 250 251 <CursorPos X="5" Y="61"/> 251 <UsageCount Value="6 1"/>252 <UsageCount Value="60"/> 252 253 <DefaultSyntaxHighlighter Value="Delphi"/> 253 254 </Unit22> … … 257 258 <TopLine Value="50"/> 258 259 <CursorPos X="10" Y="63"/> 259 <UsageCount Value="6 1"/>260 <UsageCount Value="60"/> 260 261 <DefaultSyntaxHighlighter Value="Delphi"/> 261 262 </Unit23> … … 266 267 <TopLine Value="17"/> 267 268 <CursorPos X="32" Y="36"/> 268 <UsageCount Value="1 80"/>269 <UsageCount Value="179"/> 269 270 <DefaultSyntaxHighlighter Value="Delphi"/> 270 271 </Unit24> … … 275 276 <TopLine Value="8"/> 276 277 <CursorPos X="17" Y="19"/> 277 <UsageCount Value=" 7"/>278 <UsageCount Value="6"/> 278 279 <DefaultSyntaxHighlighter Value="Delphi"/> 279 280 </Unit25> … … 284 285 <TopLine Value="25"/> 285 286 <CursorPos X="86" Y="94"/> 286 <UsageCount Value="1 80"/>287 <UsageCount Value="179"/> 287 288 <DefaultSyntaxHighlighter Value="Delphi"/> 288 289 </Unit26> … … 293 294 <TopLine Value="549"/> 294 295 <CursorPos X="19" Y="569"/> 295 <UsageCount Value="18 1"/>296 <UsageCount Value="180"/> 296 297 <DefaultSyntaxHighlighter Value="Delphi"/> 297 298 </Unit27> … … 302 303 <TopLine Value="1"/> 303 304 <CursorPos X="64" Y="14"/> 304 <UsageCount Value="18 1"/>305 <UsageCount Value="180"/> 305 306 <DefaultSyntaxHighlighter Value="Delphi"/> 306 307 </Unit28> … … 311 312 <TopLine Value="6"/> 312 313 <CursorPos X="5" Y="33"/> 313 <UsageCount Value="18 1"/>314 <UsageCount Value="180"/> 314 315 <DefaultSyntaxHighlighter Value="Delphi"/> 315 316 </Unit29> … … 320 321 <TopLine Value="99"/> 321 322 <CursorPos X="33" Y="117"/> 322 <UsageCount Value=" 8"/>323 <UsageCount Value="7"/> 323 324 <DefaultSyntaxHighlighter Value="Delphi"/> 324 325 </Unit30> … … 328 329 <TopLine Value="61"/> 329 330 <CursorPos X="14" Y="78"/> 330 <UsageCount Value=" 60"/>331 <UsageCount Value="59"/> 331 332 <DefaultSyntaxHighlighter Value="Delphi"/> 332 333 </Unit31> … … 336 337 <TopLine Value="519"/> 337 338 <CursorPos X="23" Y="526"/> 338 <UsageCount Value="5 6"/>339 <UsageCount Value="55"/> 339 340 <DefaultSyntaxHighlighter Value="Delphi"/> 340 341 </Unit32> 341 342 <Unit33> 342 343 <Filename Value="UConfigSample.pas"/> 343 <IsPartOfProject Value="True"/>344 344 <UnitName Value="UConfig"/> 345 345 <WindowIndex Value="0"/> 346 346 <TopLine Value="11"/> 347 <CursorPos X=" 19" Y="11"/>348 <UsageCount Value="36 2"/>347 <CursorPos X="51" Y="27"/> 348 <UsageCount Value="361"/> 349 349 <DefaultSyntaxHighlighter Value="Delphi"/> 350 350 </Unit33> … … 355 355 <TopLine Value="1"/> 356 356 <CursorPos X="16" Y="164"/> 357 <UsageCount Value="32 2"/>357 <UsageCount Value="321"/> 358 358 <DefaultSyntaxHighlighter Value="Delphi"/> 359 359 </Unit34> … … 364 364 <TopLine Value="81"/> 365 365 <CursorPos X="1" Y="96"/> 366 <UsageCount Value="32 1"/>366 <UsageCount Value="320"/> 367 367 <DefaultSyntaxHighlighter Value="Delphi"/> 368 368 </Unit35> … … 373 373 <TopLine Value="1"/> 374 374 <CursorPos X="18" Y="45"/> 375 <UsageCount Value="32 1"/>375 <UsageCount Value="320"/> 376 376 <DefaultSyntaxHighlighter Value="Delphi"/> 377 377 </Unit36> … … 382 382 <TopLine Value="142"/> 383 383 <CursorPos X="52" Y="165"/> 384 <UsageCount Value="32 1"/>384 <UsageCount Value="320"/> 385 385 <DefaultSyntaxHighlighter Value="Delphi"/> 386 386 </Unit37> … … 391 391 <TopLine Value="109"/> 392 392 <CursorPos X="36" Y="96"/> 393 <UsageCount Value="32 1"/>393 <UsageCount Value="320"/> 394 394 <DefaultSyntaxHighlighter Value="Delphi"/> 395 395 </Unit38> … … 400 400 <TopLine Value="44"/> 401 401 <CursorPos X="27" Y="61"/> 402 <UsageCount Value="32 1"/>402 <UsageCount Value="320"/> 403 403 <DefaultSyntaxHighlighter Value="Delphi"/> 404 404 </Unit39> … … 409 409 <TopLine Value="1"/> 410 410 <CursorPos X="50" Y="8"/> 411 <UsageCount Value="32 1"/>411 <UsageCount Value="320"/> 412 412 <DefaultSyntaxHighlighter Value="Delphi"/> 413 413 </Unit40> … … 418 418 <TopLine Value="1"/> 419 419 <CursorPos X="21" Y="1"/> 420 <UsageCount Value="3 20"/>420 <UsageCount Value="319"/> 421 421 <DefaultSyntaxHighlighter Value="Delphi"/> 422 422 </Unit41> … … 427 427 <TopLine Value="1"/> 428 428 <CursorPos X="53" Y="8"/> 429 <UsageCount Value="3 20"/>429 <UsageCount Value="319"/> 430 430 <DefaultSyntaxHighlighter Value="Delphi"/> 431 431 </Unit42> … … 436 436 <TopLine Value="1"/> 437 437 <CursorPos X="52" Y="92"/> 438 <UsageCount Value="3 20"/>438 <UsageCount Value="319"/> 439 439 <DefaultSyntaxHighlighter Value="Delphi"/> 440 440 </Unit43> … … 445 445 <TopLine Value="83"/> 446 446 <CursorPos X="47" Y="106"/> 447 <UsageCount Value="3 20"/>447 <UsageCount Value="319"/> 448 448 <DefaultSyntaxHighlighter Value="Delphi"/> 449 449 </Unit44> … … 454 454 <TopLine Value="1"/> 455 455 <CursorPos X="3" Y="687"/> 456 <UsageCount Value="3 20"/>456 <UsageCount Value="319"/> 457 457 <DefaultSyntaxHighlighter Value="Delphi"/> 458 458 </Unit45> … … 463 463 <TopLine Value="383"/> 464 464 <CursorPos X="15" Y="397"/> 465 <UsageCount Value="4 1"/>465 <UsageCount Value="40"/> 466 466 </Unit46> 467 467 <Unit47> … … 471 471 <TopLine Value="1"/> 472 472 <CursorPos X="1" Y="15"/> 473 <UsageCount Value="33 9"/>473 <UsageCount Value="338"/> 474 474 <DefaultSyntaxHighlighter Value="Delphi"/> 475 475 </Unit47> … … 479 479 <TopLine Value="690"/> 480 480 <CursorPos X="3" Y="695"/> 481 <UsageCount Value="4 1"/>481 <UsageCount Value="40"/> 482 482 <DefaultSyntaxHighlighter Value="Delphi"/> 483 483 </Unit48> … … 488 488 <TopLine Value="1"/> 489 489 <CursorPos X="43" Y="79"/> 490 <UsageCount Value="31 7"/>490 <UsageCount Value="316"/> 491 491 <DefaultSyntaxHighlighter Value="Delphi"/> 492 492 </Unit49> 493 493 <Unit50> 494 494 <Filename Value="../../PascalClassLibrary/Generics/TemplateGenerics/Generic/GenericList.inc"/> 495 <EditorIndex Value="4"/>496 495 <WindowIndex Value="0"/> 497 496 <TopLine Value="29"/> 498 497 <CursorPos X="15" Y="46"/> 499 498 <UsageCount Value="178"/> 500 <Loaded Value="True"/>501 499 </Unit50> 502 500 <Unit51> … … 506 504 <TopLine Value="1"/> 507 505 <CursorPos X="26" Y="18"/> 508 <UsageCount Value="8 1"/>506 <UsageCount Value="80"/> 509 507 </Unit51> 510 508 <Unit52> … … 514 512 <TopLine Value="1"/> 515 513 <CursorPos X="15" Y="20"/> 516 <UsageCount Value="9 4"/>514 <UsageCount Value="93"/> 517 515 </Unit52> 518 516 <Unit53> … … 522 520 <TopLine Value="1"/> 523 521 <CursorPos X="44" Y="17"/> 524 <UsageCount Value="9 3"/>522 <UsageCount Value="92"/> 525 523 </Unit53> 526 524 <Unit54> … … 530 528 <TopLine Value="1"/> 531 529 <CursorPos X="48" Y="25"/> 532 <UsageCount Value="1 2"/>530 <UsageCount Value="11"/> 533 531 </Unit54> 534 532 <Unit55> … … 538 536 <TopLine Value="1"/> 539 537 <CursorPos X="60" Y="11"/> 540 <UsageCount Value="1 1"/>538 <UsageCount Value="10"/> 541 539 </Unit55> 542 540 <Unit56> … … 546 544 <TopLine Value="92"/> 547 545 <CursorPos X="7" Y="119"/> 548 <UsageCount Value=" 7"/>546 <UsageCount Value="6"/> 549 547 </Unit56> 550 548 <Unit57> … … 552 550 <UnitName Value="UXmlClasses"/> 553 551 <WindowIndex Value="0"/> 554 <TopLine Value=" 16"/>555 <CursorPos X=" 1" Y="25"/>556 <UsageCount Value="2 2"/>552 <TopLine Value="27"/> 553 <CursorPos X="5" Y="44"/> 554 <UsageCount Value="26"/> 557 555 </Unit57> 558 556 <Unit58> … … 562 560 <TopLine Value="159"/> 563 561 <CursorPos X="14" Y="176"/> 564 <UsageCount Value="2 3"/>562 <UsageCount Value="22"/> 565 563 </Unit58> 566 564 <Unit59> … … 571 569 <TopLine Value="71"/> 572 570 <CursorPos X="40" Y="12"/> 573 <UsageCount Value=" 53"/>571 <UsageCount Value="68"/> 574 572 <DefaultSyntaxHighlighter Value="Delphi"/> 575 573 </Unit59> … … 580 578 <TopLine Value="1"/> 581 579 <CursorPos X="1" Y="1"/> 582 <UsageCount Value=" 9"/>580 <UsageCount Value="8"/> 583 581 </Unit60> 584 582 <Unit61> … … 588 586 <TopLine Value="1"/> 589 587 <CursorPos X="1" Y="1"/> 590 <UsageCount Value=" 9"/>588 <UsageCount Value="8"/> 591 589 </Unit61> 592 590 <Unit62> 593 591 <Filename Value="../../PascalClassLibrary/Network/CoolWeb/WebServer/UHTTPServer.pas"/> 594 592 <UnitName Value="UHTTPServer"/> 595 <WindowIndex Value="0"/> 596 <TopLine Value="180"/> 597 <CursorPos X="3" Y="182"/> 593 <EditorIndex Value="4"/> 594 <WindowIndex Value="0"/> 595 <TopLine Value="379"/> 596 <CursorPos X="1" Y="389"/> 598 597 <UsageCount Value="14"/> 598 <Loaded Value="True"/> 599 599 </Unit62> 600 600 <Unit63> 601 601 <Filename Value="../../PascalClassLibrary/Network/CoolWeb/WebServer/UHTTPServerCGI.pas"/> 602 602 <UnitName Value="UHTTPServerCGI"/> 603 <EditorIndex Value=" 3"/>604 <WindowIndex Value="0"/> 605 <TopLine Value=" 65"/>606 <CursorPos X=" 1" Y="86"/>607 <UsageCount Value="1 1"/>603 <EditorIndex Value="6"/> 604 <WindowIndex Value="0"/> 605 <TopLine Value="1"/> 606 <CursorPos X="21" Y="20"/> 607 <UsageCount Value="18"/> 608 608 <Loaded Value="True"/> 609 609 </Unit63> … … 613 613 <TopLine Value="168"/> 614 614 <CursorPos X="23" Y="185"/> 615 <UsageCount Value=" 8"/>615 <UsageCount Value="7"/> 616 616 <DefaultSyntaxHighlighter Value="Delphi"/> 617 617 </Unit64> … … 620 620 <UnitName Value="SpecializedList"/> 621 621 <WindowIndex Value="0"/> 622 <TopLine Value=" 1"/>623 <CursorPos X=" 31" Y="126"/>622 <TopLine Value="54"/> 623 <CursorPos X="26" Y="71"/> 624 624 <UsageCount Value="13"/> 625 625 </Unit65> … … 629 629 <TopLine Value="1"/> 630 630 <CursorPos X="14" Y="3"/> 631 <UsageCount Value="1 2"/>631 <UsageCount Value="11"/> 632 632 </Unit66> 633 633 <Unit67> … … 637 637 <TopLine Value="35"/> 638 638 <CursorPos X="24" Y="63"/> 639 <UsageCount Value="1 2"/>639 <UsageCount Value="11"/> 640 640 </Unit67> 641 641 <Unit68> 642 642 <Filename Value="../../PascalClassLibrary/Generics/TemplateGenerics/Generic/GenericListObject.inc"/> 643 <EditorIndex Value="2"/>644 643 <WindowIndex Value="0"/> 645 644 <TopLine Value="61"/> 646 645 <CursorPos X="23" Y="61"/> 647 <UsageCount Value="11"/> 648 <Loaded Value="True"/> 646 <UsageCount Value="18"/> 649 647 </Unit68> 650 648 <Unit69> … … 654 652 <TopLine Value="1"/> 655 653 <CursorPos X="1" Y="1"/> 656 <UsageCount Value=" 9"/>654 <UsageCount Value="8"/> 657 655 </Unit69> 658 656 <Unit70> … … 662 660 <TopLine Value="1531"/> 663 661 <CursorPos X="1" Y="1545"/> 664 <UsageCount Value="1 3"/>662 <UsageCount Value="12"/> 665 663 </Unit70> 666 664 <Unit71> … … 670 668 <TopLine Value="1"/> 671 669 <CursorPos X="1" Y="1"/> 672 <UsageCount Value="1 1"/>670 <UsageCount Value="10"/> 673 671 </Unit71> 674 672 <Unit72> … … 678 676 <TopLine Value="1"/> 679 677 <CursorPos X="1" Y="1"/> 680 <UsageCount Value=" 10"/>678 <UsageCount Value="9"/> 681 679 <DefaultSyntaxHighlighter Value="Delphi"/> 682 680 </Unit72> … … 687 685 <TopLine Value="10"/> 688 686 <CursorPos X="54" Y="31"/> 689 <UsageCount Value=" 10"/>687 <UsageCount Value="9"/> 690 688 </Unit73> 691 689 <Unit74> … … 695 693 <TopLine Value="1"/> 696 694 <CursorPos X="42" Y="14"/> 697 <UsageCount Value="1 2"/>695 <UsageCount Value="11"/> 698 696 </Unit74> 699 697 <Unit75> … … 703 701 <TopLine Value="1"/> 704 702 <CursorPos X="1" Y="1"/> 705 <UsageCount Value="1 2"/>703 <UsageCount Value="11"/> 706 704 </Unit75> 707 705 <Unit76> … … 711 709 <ResourceBaseClass Value="DataModule"/> 712 710 <UnitName Value="UMainModule"/> 713 <IsVisibleTab Value="True"/> 714 <EditorIndex Value="1"/> 715 <WindowIndex Value="0"/> 716 <TopLine Value="57"/> 717 <CursorPos X="44" Y="74"/> 718 <UsageCount Value="35"/> 711 <EditorIndex Value="2"/> 712 <WindowIndex Value="0"/> 713 <TopLine Value="233"/> 714 <CursorPos X="1" Y="261"/> 715 <UsageCount Value="50"/> 719 716 <Loaded Value="True"/> 720 717 <LoadedDesigner Value="True"/> … … 726 723 <TopLine Value="291"/> 727 724 <CursorPos X="1" Y="1"/> 728 <UsageCount Value=" 10"/>725 <UsageCount Value="9"/> 729 726 </Unit77> 730 727 <Unit78> … … 734 731 <TopLine Value="55"/> 735 732 <CursorPos X="8" Y="80"/> 736 <UsageCount Value=" 10"/>733 <UsageCount Value="9"/> 737 734 </Unit78> 738 735 <Unit79> … … 742 739 <TopLine Value="59"/> 743 740 <CursorPos X="10" Y="61"/> 744 <UsageCount Value=" 10"/>741 <UsageCount Value="9"/> 745 742 </Unit79> 746 743 <Unit80> … … 750 747 <TopLine Value="10"/> 751 748 <CursorPos X="1" Y="35"/> 752 <UsageCount Value="1 1"/>749 <UsageCount Value="10"/> 753 750 </Unit80> 754 751 <Unit81> … … 758 755 <TopLine Value="22"/> 759 756 <CursorPos X="1" Y="43"/> 760 <UsageCount Value=" 10"/>757 <UsageCount Value="9"/> 761 758 </Unit81> 762 759 <Unit82> … … 766 763 <TopLine Value="2"/> 767 764 <CursorPos X="14" Y="19"/> 768 <UsageCount Value="1 1"/>765 <UsageCount Value="10"/> 769 766 </Unit82> 770 767 <Unit83> … … 774 771 <ResourceBaseClass Value="DataModule"/> 775 772 <UnitName Value="UWebPage"/> 776 <WindowIndex Value="0"/> 777 <TopLine Value="4"/> 773 <EditorIndex Value="8"/> 774 <WindowIndex Value="0"/> 775 <TopLine Value="1"/> 778 776 <CursorPos X="14" Y="21"/> 779 <UsageCount Value="14"/> 777 <UsageCount Value="13"/> 778 <Loaded Value="True"/> 780 779 </Unit83> 781 780 <Unit84> … … 783 782 <UnitName Value="USqlDatabase"/> 784 783 <WindowIndex Value="0"/> 785 <TopLine Value=" 95"/>786 <CursorPos X=" 1" Y="110"/>787 <UsageCount Value="1 2"/>784 <TopLine Value="176"/> 785 <CursorPos X="32" Y="193"/> 786 <UsageCount Value="11"/> 788 787 </Unit84> 789 788 <Unit85> … … 795 794 <TopLine Value="48"/> 796 795 <CursorPos X="13" Y="342"/> 797 <UsageCount Value=" 30"/>796 <UsageCount Value="29"/> 798 797 <DefaultSyntaxHighlighter Value="Delphi"/> 799 798 </Unit85> … … 804 803 <TopLine Value="33"/> 805 804 <CursorPos X="14" Y="50"/> 806 <UsageCount Value="1 3"/>805 <UsageCount Value="12"/> 807 806 </Unit86> 808 807 <Unit87> … … 812 811 <TopLine Value="179"/> 813 812 <CursorPos X="14" Y="199"/> 814 <UsageCount Value="1 2"/>813 <UsageCount Value="11"/> 815 814 </Unit87> 816 815 <Unit88> … … 820 819 <TopLine Value="1"/> 821 820 <CursorPos X="79" Y="4"/> 822 <UsageCount Value="1 3"/>821 <UsageCount Value="12"/> 823 822 </Unit88> 824 823 <Unit89> … … 828 827 <TopLine Value="184"/> 829 828 <CursorPos X="3" Y="199"/> 830 <UsageCount Value="1 3"/>829 <UsageCount Value="12"/> 831 830 </Unit89> 832 831 <Unit90> … … 836 835 <TopLine Value="1289"/> 837 836 <CursorPos X="36" Y="1307"/> 838 <UsageCount Value="1 1"/>837 <UsageCount Value="10"/> 839 838 </Unit90> 840 839 <Unit91> … … 844 843 <TopLine Value="34"/> 845 844 <CursorPos X="3" Y="51"/> 846 <UsageCount Value=" 10"/>845 <UsageCount Value="9"/> 847 846 </Unit91> 848 847 <Unit92> … … 852 851 <TopLine Value="174"/> 853 852 <CursorPos X="14" Y="191"/> 854 <UsageCount Value="1 1"/>853 <UsageCount Value="10"/> 855 854 </Unit92> 856 855 <Unit93> 857 856 <Filename Value="/usr/share/fpcsrc/2.4.2/rtl/objpas/classes/classesh.inc"/> 858 857 <WindowIndex Value="0"/> 859 <TopLine Value=" 1847"/>860 <CursorPos X=" 3" Y="1814"/>861 <UsageCount Value="1 1"/>858 <TopLine Value="538"/> 859 <CursorPos X="24" Y="555"/> 860 <UsageCount Value="10"/> 862 861 </Unit93> 863 862 <Unit94> 864 863 <Filename Value="../../PascalClassLibrary/Network/CoolWeb/WebServer/UWebApp.pas"/> 865 864 <UnitName Value="UWebApp"/> 866 <EditorIndex Value=" 6"/>867 <WindowIndex Value="0"/> 868 <TopLine Value=" 57"/>869 <CursorPos X=" 1" Y="75"/>870 <UsageCount Value=" 14"/>865 <EditorIndex Value="7"/> 866 <WindowIndex Value="0"/> 867 <TopLine Value="101"/> 868 <CursorPos X="47" Y="122"/> 869 <UsageCount Value="21"/> 871 870 <Loaded Value="True"/> 872 871 </Unit94> … … 874 873 <Filename Value="/usr/share/fpcsrc/2.4.2/packages/fcl-base/src/custapp.pp"/> 875 874 <UnitName Value="CustApp"/> 876 <WindowIndex Value="0"/> 877 <TopLine Value="19"/> 878 <CursorPos X="3" Y="26"/> 879 <UsageCount Value="13"/> 875 <EditorIndex Value="1"/> 876 <WindowIndex Value="0"/> 877 <TopLine Value="49"/> 878 <CursorPos X="1" Y="53"/> 879 <UsageCount Value="15"/> 880 <Loaded Value="True"/> 880 881 </Unit95> 881 882 <Unit96> … … 884 885 <TopLine Value="2101"/> 885 886 <CursorPos X="3" Y="2108"/> 886 <UsageCount Value="1 1"/>887 <UsageCount Value="10"/> 887 888 </Unit96> 888 889 <Unit97> … … 891 892 <TopLine Value="180"/> 892 893 <CursorPos X="26" Y="197"/> 893 <UsageCount Value="1 1"/>894 <UsageCount Value="10"/> 894 895 </Unit97> 895 896 <Unit98> … … 899 900 <TopLine Value="3089"/> 900 901 <CursorPos X="27" Y="3106"/> 901 <UsageCount Value="1 2"/>902 <UsageCount Value="11"/> 902 903 </Unit98> 903 904 <Unit99> … … 910 911 <TopLine Value="17"/> 911 912 <CursorPos X="1" Y="47"/> 912 <UsageCount Value=" 26"/>913 <UsageCount Value="41"/> 913 914 <DefaultSyntaxHighlighter Value="Delphi"/> 914 915 </Unit99> … … 921 922 <WindowIndex Value="0"/> 922 923 <TopLine Value="26"/> 923 <CursorPos X=" 1" Y="57"/>924 <UsageCount Value=" 23"/>924 <CursorPos X="84" Y="45"/> 925 <UsageCount Value="38"/> 925 926 <DefaultSyntaxHighlighter Value="Delphi"/> 926 927 </Unit100> … … 934 935 <TopLine Value="66"/> 935 936 <CursorPos X="1" Y="97"/> 936 <UsageCount Value=" 23"/>937 <UsageCount Value="38"/> 937 938 <DefaultSyntaxHighlighter Value="Delphi"/> 938 939 </Unit101> … … 945 946 <WindowIndex Value="0"/> 946 947 <TopLine Value="26"/> 947 <CursorPos X="1" Y="5 7"/>948 <UsageCount Value=" 22"/>948 <CursorPos X="1" Y="53"/> 949 <UsageCount Value="37"/> 949 950 <DefaultSyntaxHighlighter Value="Delphi"/> 950 951 </Unit102> … … 958 959 <TopLine Value="24"/> 959 960 <CursorPos X="1" Y="55"/> 960 <UsageCount Value=" 22"/>961 <UsageCount Value="37"/> 961 962 <DefaultSyntaxHighlighter Value="Delphi"/> 962 963 </Unit103> … … 968 969 <UnitName Value="UVoIPPage"/> 969 970 <WindowIndex Value="0"/> 970 <TopLine Value=" 34"/>971 <CursorPos X=" 1" Y="65"/>972 <UsageCount Value=" 22"/>971 <TopLine Value="24"/> 972 <CursorPos X="51" Y="42"/> 973 <UsageCount Value="37"/> 973 974 <DefaultSyntaxHighlighter Value="Delphi"/> 974 975 </Unit104> … … 979 980 <ResourceBaseClass Value="DataModule"/> 980 981 <UnitName Value="UPlansPage"/> 981 <EditorIndex Value="5"/>982 982 <WindowIndex Value="0"/> 983 983 <TopLine Value="28"/> 984 984 <CursorPos X="23" Y="40"/> 985 <UsageCount Value="22"/> 986 <Loaded Value="True"/> 985 <UsageCount Value="37"/> 987 986 <DefaultSyntaxHighlighter Value="Delphi"/> 988 987 </Unit105> … … 996 995 <TopLine Value="36"/> 997 996 <CursorPos X="1" Y="67"/> 998 <UsageCount Value=" 22"/>997 <UsageCount Value="37"/> 999 998 <DefaultSyntaxHighlighter Value="Delphi"/> 1000 999 </Unit106> … … 1008 1007 <TopLine Value="8"/> 1009 1008 <CursorPos X="1" Y="39"/> 1010 <UsageCount Value=" 22"/>1009 <UsageCount Value="37"/> 1011 1010 <DefaultSyntaxHighlighter Value="Delphi"/> 1012 1011 </Unit107> … … 1017 1016 <ResourceBaseClass Value="DataModule"/> 1018 1017 <UnitName Value="UWebCamPage"/> 1019 <WindowIndex Value="0"/> 1020 <TopLine Value="47"/> 1021 <CursorPos X="1" Y="78"/> 1022 <UsageCount Value="22"/> 1018 <IsVisibleTab Value="True"/> 1019 <EditorIndex Value="3"/> 1020 <WindowIndex Value="0"/> 1021 <TopLine Value="26"/> 1022 <CursorPos X="9" Y="50"/> 1023 <UsageCount Value="37"/> 1024 <Loaded Value="True"/> 1025 <LoadedDesigner Value="True"/> 1023 1026 <DefaultSyntaxHighlighter Value="Delphi"/> 1024 1027 </Unit108> … … 1032 1035 <TopLine Value="38"/> 1033 1036 <CursorPos X="1" Y="68"/> 1034 <UsageCount Value=" 22"/>1037 <UsageCount Value="37"/> 1035 1038 <DefaultSyntaxHighlighter Value="Delphi"/> 1036 1039 </Unit109> … … 1044 1047 <TopLine Value="15"/> 1045 1048 <CursorPos X="1" Y="46"/> 1046 <UsageCount Value=" 22"/>1049 <UsageCount Value="37"/> 1047 1050 <DefaultSyntaxHighlighter Value="Delphi"/> 1048 1051 </Unit110> … … 1054 1057 <UnitName Value="UAboutPage"/> 1055 1058 <WindowIndex Value="0"/> 1056 <TopLine Value="5 4"/>1059 <TopLine Value="55"/> 1057 1060 <CursorPos X="1" Y="83"/> 1058 <UsageCount Value=" 22"/>1061 <UsageCount Value="37"/> 1059 1062 <DefaultSyntaxHighlighter Value="Delphi"/> 1060 1063 </Unit111> … … 1070 1073 <CursorPos X="50" Y="4"/> 1071 1074 </ExtraEditor1> 1072 <UsageCount Value=" 10"/>1075 <UsageCount Value="9"/> 1073 1076 <DefaultSyntaxHighlighter Value="LFM"/> 1074 1077 </Unit112> … … 1079 1082 <TopLine Value="344"/> 1080 1083 <CursorPos X="30" Y="361"/> 1081 <UsageCount Value=" 10"/>1084 <UsageCount Value="9"/> 1082 1085 </Unit113> 1083 1086 <Unit114> … … 1087 1090 <TopLine Value="475"/> 1088 1091 <CursorPos X="34" Y="492"/> 1089 <UsageCount Value=" 10"/>1092 <UsageCount Value="9"/> 1090 1093 </Unit114> 1091 1094 <Unit115> … … 1095 1098 <TopLine Value="23"/> 1096 1099 <CursorPos X="37" Y="23"/> 1100 <UsageCount Value="9"/> 1101 </Unit115> 1102 <Unit116> 1103 <Filename Value="Common/URegistry.pas"/> 1104 <IsPartOfProject Value="True"/> 1105 <UnitName Value="URegistry"/> 1106 <WindowIndex Value="0"/> 1107 <TopLine Value="1"/> 1108 <CursorPos X="26" Y="11"/> 1109 <UsageCount Value="31"/> 1110 <DefaultSyntaxHighlighter Value="Delphi"/> 1111 </Unit116> 1112 <Unit117> 1113 <Filename Value="/usr/share/fpcsrc/2.4.2/packages/fcl-registry/src/registry.pp"/> 1114 <UnitName Value="registry"/> 1115 <WindowIndex Value="0"/> 1116 <TopLine Value="72"/> 1117 <CursorPos X="62" Y="94"/> 1118 <UsageCount Value="13"/> 1119 </Unit117> 1120 <Unit118> 1121 <Filename Value="/usr/share/fpcsrc/2.4.2/packages/fcl-registry/src/xregreg.inc"/> 1122 <WindowIndex Value="0"/> 1123 <TopLine Value="35"/> 1124 <CursorPos X="22" Y="53"/> 1125 <UsageCount Value="13"/> 1126 </Unit118> 1127 <Unit119> 1128 <Filename Value="/usr/share/fpcsrc/2.4.2/packages/fcl-registry/src/xmlreg.pp"/> 1129 <UnitName Value="xmlreg"/> 1130 <WindowIndex Value="0"/> 1131 <TopLine Value="27"/> 1132 <CursorPos X="14" Y="74"/> 1133 <UsageCount Value="13"/> 1134 </Unit119> 1135 <Unit120> 1136 <Filename Value="/usr/share/fpcsrc/2.4.2/rtl/objpas/classes/stringl.inc"/> 1137 <WindowIndex Value="0"/> 1138 <TopLine Value="1"/> 1139 <CursorPos X="3" Y="1"/> 1097 1140 <UsageCount Value="10"/> 1098 </Unit115> 1141 </Unit120> 1142 <Unit121> 1143 <Filename Value="/usr/share/fpcsrc/2.4.2/rtl/objpas/sysutils/sysutilh.inc"/> 1144 <WindowIndex Value="0"/> 1145 <TopLine Value="59"/> 1146 <CursorPos X="29" Y="76"/> 1147 <UsageCount Value="10"/> 1148 </Unit121> 1099 1149 </Units> 1100 1150 <JumpHistory Count="30" HistoryIndex="29"> 1101 1151 <Position1> 1102 <Filename Value=" ../../PascalClassLibrary/Network/CoolWeb/WebServer/UWebApp.pas"/>1103 <Caret Line=" 97" Column="1" TopLine="79"/>1152 <Filename Value="CGI.lpr"/> 1153 <Caret Line="20" Column="1" TopLine="3"/> 1104 1154 </Position1> 1105 1155 <Position2> 1106 <Filename Value=" ../../PascalClassLibrary/Network/CoolWeb/WebServer/UWebApp.pas"/>1107 <Caret Line=" 98" Column="1" TopLine="79"/>1156 <Filename Value="CGI.lpr"/> 1157 <Caret Line="21" Column="1" TopLine="3"/> 1108 1158 </Position2> 1109 1159 <Position3> 1110 <Filename Value=" ../../PascalClassLibrary/Network/CoolWeb/WebServer/UWebApp.pas"/>1111 <Caret Line=" 99" Column="1" TopLine="79"/>1160 <Filename Value="CGI.lpr"/> 1161 <Caret Line="22" Column="1" TopLine="3"/> 1112 1162 </Position3> 1113 1163 <Position4> 1114 <Filename Value=" ../../PascalClassLibrary/Network/CoolWeb/WebServer/UWebApp.pas"/>1115 <Caret Line=" 100" Column="1" TopLine="79"/>1164 <Filename Value="CGI.lpr"/> 1165 <Caret Line="23" Column="1" TopLine="3"/> 1116 1166 </Position4> 1117 1167 <Position5> 1118 <Filename Value=" ../../PascalClassLibrary/Network/CoolWeb/WebServer/UWebApp.pas"/>1119 <Caret Line=" 102" Column="1" TopLine="79"/>1168 <Filename Value="CGI.lpr"/> 1169 <Caret Line="24" Column="1" TopLine="3"/> 1120 1170 </Position5> 1121 1171 <Position6> 1122 <Filename Value=" ../../PascalClassLibrary/Network/CoolWeb/WebServer/UWebApp.pas"/>1123 <Caret Line=" 104" Column="1" TopLine="79"/>1172 <Filename Value="CGI.lpr"/> 1173 <Caret Line="25" Column="1" TopLine="3"/> 1124 1174 </Position6> 1125 1175 <Position7> 1126 <Filename Value=" ../../PascalClassLibrary/Network/CoolWeb/WebServer/UWebApp.pas"/>1127 <Caret Line=" 105" Column="1" TopLine="79"/>1176 <Filename Value="CGI.lpr"/> 1177 <Caret Line="26" Column="1" TopLine="3"/> 1128 1178 </Position7> 1129 1179 <Position8> 1130 <Filename Value=" ../../PascalClassLibrary/Network/CoolWeb/WebServer/UWebApp.pas"/>1131 <Caret Line=" 106" Column="1" TopLine="79"/>1180 <Filename Value="CGI.lpr"/> 1181 <Caret Line="27" Column="1" TopLine="3"/> 1132 1182 </Position8> 1133 1183 <Position9> 1134 <Filename Value=" Modules/UMainModule.pas"/>1135 <Caret Line=" 75" Column="11" TopLine="60"/>1184 <Filename Value="CGI.lpr"/> 1185 <Caret Line="28" Column="1" TopLine="3"/> 1136 1186 </Position9> 1137 1187 <Position10> 1138 <Filename Value=" Modules/UMainModule.pas"/>1139 <Caret Line=" 199" Column="75" TopLine="197"/>1188 <Filename Value="CGI.lpr"/> 1189 <Caret Line="29" Column="1" TopLine="3"/> 1140 1190 </Position10> 1141 1191 <Position11> 1142 <Filename Value=" Modules/UMainModule.pas"/>1143 <Caret Line=" 74" Column="37" TopLine="57"/>1192 <Filename Value="CGI.lpr"/> 1193 <Caret Line="30" Column="1" TopLine="3"/> 1144 1194 </Position11> 1145 1195 <Position12> 1146 <Filename Value=" Modules/UMainModule.pas"/>1147 <Caret Line=" 75" Column="12" TopLine="57"/>1196 <Filename Value="CGI.lpr"/> 1197 <Caret Line="31" Column="1" TopLine="3"/> 1148 1198 </Position12> 1149 1199 <Position13> 1150 <Filename Value=" Modules/UMainModule.pas"/>1151 <Caret Line=" 74" Column="37" TopLine="57"/>1200 <Filename Value="CGI.lpr"/> 1201 <Caret Line="33" Column="1" TopLine="5"/> 1152 1202 </Position13> 1153 1203 <Position14> 1154 <Filename Value=" ../../PascalClassLibrary/Network/CoolWeb/WebServer/UWebApp.pas"/>1155 <Caret Line=" 73" Column="32" TopLine="57"/>1204 <Filename Value="Pages/UWebCamPage.pas"/> 1205 <Caret Line="59" Column="1" TopLine="26"/> 1156 1206 </Position14> 1157 1207 <Position15> 1158 <Filename Value=" Modules/UMainModule.pas"/>1159 <Caret Line="1 99" Column="1" TopLine="183"/>1208 <Filename Value="../../PascalClassLibrary/Network/CoolWeb/WebServer/UHTTPServer.pas"/> 1209 <Caret Line="175" Column="1" TopLine="158"/> 1160 1210 </Position15> 1161 1211 <Position16> 1162 <Filename Value=" Modules/UMainModule.pas"/>1163 <Caret Line=" 200" Column="1" TopLine="183"/>1212 <Filename Value="Pages/UWebCamPage.pas"/> 1213 <Caret Line="43" Column="1" TopLine="26"/> 1164 1214 </Position16> 1165 1215 <Position17> 1166 <Filename Value=" Modules/UMainModule.pas"/>1167 <Caret Line=" 72" Column="42" TopLine="58"/>1216 <Filename Value="../../PascalClassLibrary/Network/CoolWeb/WebServer/UWebApp.pas"/> 1217 <Caret Line="109" Column="1" TopLine="83"/> 1168 1218 </Position17> 1169 1219 <Position18> 1170 <Filename Value=" Modules/UMainModule.pas"/>1171 <Caret Line=" 74" Column="1" TopLine="58"/>1220 <Filename Value="../../PascalClassLibrary/Network/CoolWeb/WebServer/UHTTPServerCGI.pas"/> 1221 <Caret Line="14" Column="31" TopLine="1"/> 1172 1222 </Position18> 1173 1223 <Position19> 1174 <Filename Value=" Modules/UMainModule.pas"/>1175 <Caret Line=" 75" Column="1" TopLine="58"/>1224 <Filename Value="../../PascalClassLibrary/Network/CoolWeb/WebServer/UWebApp.pas"/> 1225 <Caret Line="114" Column="18" TopLine="107"/> 1176 1226 </Position19> 1177 1227 <Position20> 1178 <Filename Value=" Modules/UMainModule.pas"/>1179 <Caret Line=" 199" Column="1" TopLine="182"/>1228 <Filename Value="../../PascalClassLibrary/Network/CoolWeb/WebServer/UWebApp.pas"/> 1229 <Caret Line="25" Column="25" TopLine="8"/> 1180 1230 </Position20> 1181 1231 <Position21> 1182 <Filename Value=" Modules/UMainModule.pas"/>1183 <Caret Line=" 200" Column="1" TopLine="182"/>1232 <Filename Value="../../PascalClassLibrary/Network/CoolWeb/WebServer/UWebApp.pas"/> 1233 <Caret Line="34" Column="15" TopLine="8"/> 1184 1234 </Position21> 1185 1235 <Position22> 1186 <Filename Value=" Modules/UMainModule.pas"/>1187 <Caret Line=" 74" Column="1" TopLine="57"/>1236 <Filename Value="../../PascalClassLibrary/Network/CoolWeb/WebServer/UWebApp.pas"/> 1237 <Caret Line="119" Column="32" TopLine="113"/> 1188 1238 </Position22> 1189 1239 <Position23> 1190 <Filename Value=" Modules/UMainModule.pas"/>1191 <Caret Line="1 99" Column="1" TopLine="182"/>1240 <Filename Value="../../PascalClassLibrary/Network/CoolWeb/WebServer/UHTTPServerCGI.pas"/> 1241 <Caret Line="14" Column="31" TopLine="1"/> 1192 1242 </Position23> 1193 1243 <Position24> 1194 <Filename Value=" Modules/UMainModule.pas"/>1195 <Caret Line=" 200" Column="1" TopLine="182"/>1244 <Filename Value="../../PascalClassLibrary/Network/CoolWeb/WebServer/UHTTPServerCGI.pas"/> 1245 <Caret Line="17" Column="16" TopLine="1"/> 1196 1246 </Position24> 1197 1247 <Position25> 1198 <Filename Value=" Modules/UMainModule.pas"/>1199 <Caret Line=" 74" Column="1" TopLine="57"/>1248 <Filename Value="../../PascalClassLibrary/Network/CoolWeb/WebServer/UWebApp.pas"/> 1249 <Caret Line="25" Column="27" TopLine="9"/> 1200 1250 </Position25> 1201 1251 <Position26> 1202 <Filename Value="../../PascalClassLibrary/Network/CoolWeb/WebServer/U HTTPServerCGI.pas"/>1203 <Caret Line=" 86" Column="1" TopLine="65"/>1252 <Filename Value="../../PascalClassLibrary/Network/CoolWeb/WebServer/UWebApp.pas"/> 1253 <Caret Line="34" Column="53" TopLine="9"/> 1204 1254 </Position26> 1205 1255 <Position27> 1206 <Filename Value="../../PascalClassLibrary/Network/CoolWeb/WebServer/U WebApp.pas"/>1207 <Caret Line=" 75" Column="1" TopLine="57"/>1256 <Filename Value="../../PascalClassLibrary/Network/CoolWeb/WebServer/UHTTPServerCGI.pas"/> 1257 <Caret Line="14" Column="34" TopLine="1"/> 1208 1258 </Position27> 1209 1259 <Position28> 1210 <Filename Value=" Modules/UMainModule.pas"/>1211 <Caret Line=" 75" Column="12" TopLine="57"/>1260 <Filename Value="../../PascalClassLibrary/Network/CoolWeb/WebServer/UWebApp.pas"/> 1261 <Caret Line="118" Column="17" TopLine="113"/> 1212 1262 </Position28> 1213 1263 <Position29> 1214 <Filename Value=" Modules/UMainModule.pas"/>1215 <Caret Line="1 99" Column="50" TopLine="197"/>1264 <Filename Value="../../PascalClassLibrary/Network/CoolWeb/WebServer/UWebApp.pas"/> 1265 <Caret Line="115" Column="38" TopLine="113"/> 1216 1266 </Position29> 1217 1267 <Position30> 1218 <Filename Value="../../PascalClassLibrary/ Generics/TemplateGenerics/Generic/GenericListObject.inc"/>1219 <Caret Line=" 20" Column="14" TopLine="3"/>1268 <Filename Value="../../PascalClassLibrary/Network/CoolWeb/WebServer/UWebApp.pas"/> 1269 <Caret Line="120" Column="70" TopLine="103"/> 1220 1270 </Position30> 1221 1271 </JumpHistory> … … 1245 1295 <StackChecks Value="True"/> 1246 1296 </Checks> 1247 <VerifyObjMethodCallValidity Value="True"/>1248 1297 </CodeGeneration> 1249 1298 <Other> … … 1269 1318 <Item2> 1270 1319 <Kind Value="bpkSource"/> 1271 <Source Value=" Modules/UMainModule.pas"/>1272 <Line Value=" 199"/>1320 <Source Value="Pages/UWebCamPage.pas"/> 1321 <Line Value="43"/> 1273 1322 </Item2> 1274 1323 </BreakPoints> -
trunk/CGI.lpr
r54 r55 31 31 RegisterPage(TNetworkPage, NetworkPage, 'sit'); 32 32 RegisterPage(TAboutPage, AboutPage, ''); 33 //RegisterPage(TWebCamPage, WebCamPage, ''); 33 34 Run; 34 35 finally -
trunk/Modules/UMainModule.pas
r54 r55 7 7 uses 8 8 Classes, SysUtils, FileUtil, LResources, UHTTPServerCGI, UHTTPSessionMySQL, 9 UHTTPServer, USqlDatabase, U Config, DateUtils, UWebPage, UWebApp,9 UHTTPServer, USqlDatabase, URegistry, DateUtils, UWebPage, UWebApp, 10 10 UXmlClasses, UHtmlClasses, UCore, UHTTPServerTCP, 11 UHTTPSessionFile, UUser, SpecializedList; 11 UHTTPSessionFile, UUser, SpecializedList, Registry; 12 13 const 14 RegistryKey = '\Software\Chronosoft\ZdechovNET'; 12 15 13 16 type … … 39 42 User: TWebUser; 40 43 UserOnline: TWebOnlineUser; 44 FormatHTML: Boolean; 45 procedure LoadFromRegistry; 46 procedure SaveToRegistry; 41 47 procedure GeneratePage(HandlerData: THTTPHandlerData; Page: TWebPage); 42 48 procedure Run; … … 62 68 UserOnline.Update; 63 69 with HandlerData do begin 64 Style := Config.Style;65 BaseURL := Config.BaseURL;66 67 70 HtmlDocument.ContentLanguage := 'cs'; 68 71 GlobalTitle := 'ZděchovNET'; … … 81 84 with HtmlDocument.AsXmlDocument do 82 85 try 83 Formated := Config.FormatHTML;86 Formated := FormatHTML; 84 87 Response.Stream.WriteString(AsString); 85 88 finally … … 94 97 begin 95 98 with Database do begin 96 Hostname := Config.DatabaseHostName;97 Database := Config.DatabaseDatabase;98 UserName := Config.DatabaseUserName;99 Password := Config.DatabasePassword;100 99 Connect; 101 100 end; … … 229 228 end; 230 229 230 procedure TMainModule.LoadFromRegistry; 231 begin 232 with TRegistryEx.Create do 233 try 234 RootKey := HKEY_CURRENT_USER; 235 OpenKey(RegistryKey, True); 236 Style := ReadStringWithDefault('Style', 'Basic'); 237 BaseURL := ReadStringWithDefault('BaseURL', 'http://localhost'); 238 Database.Hostname := ReadStringWithDefault('DatabaseHostName', 'localhost'); 239 Database.Database := ReadStringWithDefault('DatabaseDatabase', 'web'); 240 Database.UserName := ReadStringWithDefault('DatabaseUserName', 'user'); 241 Database.Password := ReadStringWithDefault('DatabasePassword', 'password'); 242 FormatHTML := ReadBoolWithDefault('FormatHTML', False); 243 Application.HTTPServer.ShowExceptions := ReadBoolWithDefault('ShowException', False); 244 245 finally 246 Free; 247 end; 248 end; 249 250 procedure TMainModule.SaveToRegistry; 251 begin 252 253 end; 254 231 255 procedure TMainModule.Run; 232 256 begin 257 LoadFromRegistry; 258 //Application.HTTPServer.ShowExceptions := True; 233 259 InitDatabase; 234 Application.HTTPServer.ShowExceptions := Config.ShowException;235 260 //Database.Query('SELECT * FROM ssss'); 236 261 end;
Note:
See TracChangeset
for help on using the changeset viewer.