- Timestamp:
- Feb 13, 2012, 1:47:33 PM (13 years ago)
- Location:
- trunk/IDE
- Files:
-
- 10 added
- 3 deleted
- 12 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/IDE
- Property svn:ignore
-
old new 1 1 lib 2 2 backup 3 Transpascal.dbg 4 Transpascal.lps 5 Transpascal.exe
-
- Property svn:ignore
-
trunk/IDE/Forms/UCodeForm.lfm
r30 r34 7 7 ClientHeight = 426 8 8 ClientWidth = 535 9 LCLVersion = '0.9. 29'9 LCLVersion = '0.9.31' 10 10 inline SynEditSource: TSynEdit 11 11 Left = 0 … … 24 24 Gutter.MouseActions = < 25 25 item 26 Shift = []27 ShiftMask = []28 Button = mbLeft29 26 ClickCount = ccAny 30 27 ClickDir = cdDown 31 Command = 13 32 MoveCaret = False 33 Option = 0 34 Priority = 0 35 end 36 item 37 Shift = [] 38 ShiftMask = [] 28 Command = emcOnMainGutterClick 29 end 30 item 39 31 Button = mbRight 40 ClickCount = ccSingle 41 ClickDir = cdUp 42 Command = 12 43 MoveCaret = False 44 Option = 0 45 Priority = 0 32 Command = emcContextMenu 46 33 end> 47 34 RightGutter.Width = 0 48 35 RightGutter.MouseActions = < 49 36 item 50 Shift = []51 ShiftMask = []52 Button = mbLeft53 37 ClickCount = ccAny 54 38 ClickDir = cdDown 55 Command = 13 56 MoveCaret = False 57 Option = 0 58 Priority = 0 59 end 60 item 61 Shift = [] 62 ShiftMask = [] 39 Command = emcOnMainGutterClick 40 end 41 item 63 42 Button = mbRight 64 ClickCount = ccSingle 65 ClickDir = cdUp 66 Command = 12 67 MoveCaret = False 68 Option = 0 69 Priority = 0 43 Command = emcContextMenu 70 44 end> 71 45 Highlighter = SynPasSyn1 … … 493 467 MouseActions = < 494 468 item 495 Shift = []496 469 ShiftMask = [ssShift, ssAlt] 497 Button = mbLeft 498 ClickCount = ccSingle 499 ClickDir = cdDown 500 Command = 1 501 MoveCaret = True 502 Option = 0 503 Priority = 0 470 ClickDir = cdDown 471 Command = emcStartSelections 472 MoveCaret = True 504 473 end 505 474 item 506 475 Shift = [ssShift] 507 476 ShiftMask = [ssShift, ssAlt] 508 Button = mbLeft 509 ClickCount = ccSingle 510 ClickDir = cdDown 511 Command = 1 477 ClickDir = cdDown 478 Command = emcStartSelections 512 479 MoveCaret = True 513 480 Option = 1 514 Priority = 0515 481 end 516 482 item 517 483 Shift = [ssAlt] 518 484 ShiftMask = [ssShift, ssAlt] 519 Button = mbLeft 520 ClickCount = ccSingle 521 ClickDir = cdDown 522 Command = 3 523 MoveCaret = True 524 Option = 0 525 Priority = 0 485 ClickDir = cdDown 486 Command = emcStartColumnSelections 487 MoveCaret = True 526 488 end 527 489 item 528 490 Shift = [ssShift, ssAlt] 529 491 ShiftMask = [ssShift, ssAlt] 530 Button = mbLeft 531 ClickCount = ccSingle 532 ClickDir = cdDown 533 Command = 3 492 ClickDir = cdDown 493 Command = emcStartColumnSelections 534 494 MoveCaret = True 535 495 Option = 1 536 Priority = 0 537 end 538 item 539 Shift = [] 540 ShiftMask = [] 496 end 497 item 541 498 Button = mbRight 542 ClickCount = ccSingle 543 ClickDir = cdUp 544 Command = 12 545 MoveCaret = False 546 Option = 0 547 Priority = 0 548 end 549 item 550 Shift = [] 551 ShiftMask = [] 552 Button = mbLeft 499 Command = emcContextMenu 500 end 501 item 553 502 ClickCount = ccDouble 554 503 ClickDir = cdDown 555 Command = 6 556 MoveCaret = True 557 Option = 0 558 Priority = 0 559 end 560 item 561 Shift = [] 562 ShiftMask = [] 563 Button = mbLeft 504 Command = emcSelectWord 505 MoveCaret = True 506 end 507 item 564 508 ClickCount = ccTriple 565 509 ClickDir = cdDown 566 Command = 7 567 MoveCaret = True 568 Option = 0 569 Priority = 0 570 end 571 item 572 Shift = [] 573 ShiftMask = [] 574 Button = mbLeft 510 Command = emcSelectLine 511 MoveCaret = True 512 end 513 item 575 514 ClickCount = ccQuad 576 515 ClickDir = cdDown 577 Command = 8 578 MoveCaret = True 579 Option = 0 580 Priority = 0 581 end 582 item 583 Shift = [] 584 ShiftMask = [] 516 Command = emcSelectPara 517 MoveCaret = True 518 end 519 item 585 520 Button = mbMiddle 586 ClickCount = ccSingle 587 ClickDir = cdDown 588 Command = 10 589 MoveCaret = True 590 Option = 0 591 Priority = 0 521 ClickDir = cdDown 522 Command = emcPasteSelection 523 MoveCaret = True 592 524 end 593 525 item 594 526 Shift = [ssCtrl] 595 527 ShiftMask = [ssShift, ssAlt, ssCtrl] 596 Button = mbLeft 597 ClickCount = ccSingle 598 ClickDir = cdUp 599 Command = 11 600 MoveCaret = False 601 Option = 0 602 Priority = 0 528 Command = emcMouseLink 603 529 end> 604 530 MouseSelActions = < 605 531 item 606 Shift = [] 607 ShiftMask = [] 608 Button = mbLeft 609 ClickCount = ccSingle 610 ClickDir = cdDown 611 Command = 9 612 MoveCaret = False 613 Option = 0 614 Priority = 0 532 ClickDir = cdDown 533 Command = emcStartDragMove 615 534 end> 616 535 Lines.Strings = ( 617 536 'SynEditSource' 618 537 ) 538 VisibleSpecialChars = [vscSpace, vscTabAtLast] 619 539 BracketHighlightStyle = sbhsBoth 620 540 OnChange = SynEditSourceChange … … 622 542 object SynGutterMarks1: TSynGutterMarks 623 543 Width = 24 544 MouseActions = <> 624 545 end 625 546 object SynGutterLineNumber1: TSynGutterLineNumber … … 635 556 object SynGutterChanges1: TSynGutterChanges 636 557 Width = 4 558 MouseActions = <> 637 559 ModifiedColor = 59900 638 560 SavedColor = clGreen … … 640 562 object SynGutterSeparator1: TSynGutterSeparator 641 563 Width = 2 564 MouseActions = <> 642 565 end 643 566 object SynGutterCodeFolding1: TSynGutterCodeFolding 644 567 MouseActions = < 645 568 item 646 Shift = []647 ShiftMask = []648 569 Button = mbRight 649 ClickCount = ccSingle 650 ClickDir = cdUp 651 Command = 16 652 MoveCaret = False 653 Option = 0 654 Priority = 0 570 Command = emcCodeFoldContextMenu 655 571 end 656 572 item 657 Shift = []658 573 ShiftMask = [ssShift] 659 574 Button = mbMiddle 660 575 ClickCount = ccAny 661 576 ClickDir = cdDown 662 Command = 14 663 MoveCaret = False 664 Option = 0 665 Priority = 0 577 Command = emcCodeFoldCollaps 666 578 end 667 579 item … … 671 583 ClickCount = ccAny 672 584 ClickDir = cdDown 673 Command = 14 674 MoveCaret = False 585 Command = emcCodeFoldCollaps 675 586 Option = 1 676 Priority = 0677 587 end 678 588 item 679 Shift = []680 ShiftMask = []681 Button = mbLeft682 589 ClickCount = ccAny 683 590 ClickDir = cdDown 684 Command = 0 685 MoveCaret = False 686 Option = 0 687 Priority = 0 591 Command = emcNone 688 592 end> 689 593 MarkupInfo.Background = clNone … … 691 595 MouseActionsExpanded = < 692 596 item 693 Shift = []694 ShiftMask = []695 Button = mbLeft696 597 ClickCount = ccAny 697 598 ClickDir = cdDown 698 Command = 14 699 MoveCaret = False 700 Option = 0 701 Priority = 0 599 Command = emcCodeFoldCollaps 702 600 end> 703 601 MouseActionsCollapsed = < … … 705 603 Shift = [ssCtrl] 706 604 ShiftMask = [ssCtrl] 707 Button = mbLeft708 605 ClickCount = ccAny 709 606 ClickDir = cdDown 710 Command = 15 711 MoveCaret = False 712 Option = 0 713 Priority = 0 607 Command = emcCodeFoldExpand 714 608 end 715 609 item 716 Shift = []717 610 ShiftMask = [ssCtrl] 718 Button = mbLeft719 611 ClickCount = ccAny 720 612 ClickDir = cdDown 721 Command = 15 722 MoveCaret = False 613 Command = emcCodeFoldExpand 723 614 Option = 1 724 Priority = 0725 615 end> 726 616 end 727 617 end 728 end729 object CoolDockClient1: TCDClient730 Floatable = False731 Master = MainForm.CoolDockMaster1732 left = 96733 top = 37734 618 end 735 619 object SynPasSyn1: TSynPasSyn … … 737 621 AsmAttri.FrameEdges = sfeAround 738 622 CommentAttri.FrameEdges = sfeAround 623 IDEDirectiveAttri.FrameEdges = sfeAround 739 624 IdentifierAttri.FrameEdges = sfeAround 740 625 KeyAttri.FrameEdges = sfeAround -
trunk/IDE/Forms/UCodeForm.pas
r30 r34 14 14 15 15 TCodeForm = class(TForm) 16 CoolDockClient1: TCDClient;17 16 SynEditSource: TSynEdit; 18 17 SynPasSyn1: TSynPasSyn; -
trunk/IDE/Forms/UCompiledForm.lfm
r30 r34 1 1 object CompiledForm: TCompiledForm 2 2 Left = 403 3 Height = 2403 Height = 303 4 4 Top = 186 5 Width = 3 205 Width = 398 6 6 Caption = 'Compiled code' 7 ClientHeight = 2408 ClientWidth = 3 209 LCLVersion = '0.9. 29'7 ClientHeight = 303 8 ClientWidth = 398 9 LCLVersion = '0.9.31' 10 10 inline SynEdit1: TSynEdit 11 11 Left = 0 12 Height = 24012 Height = 303 13 13 Top = 0 14 Width = 3 2014 Width = 398 15 15 Align = alClient 16 16 Font.Height = -13 … … 24 24 Gutter.MouseActions = < 25 25 item 26 Shift = []27 ShiftMask = []28 Button = mbLeft29 26 ClickCount = ccAny 30 27 ClickDir = cdDown 31 Command = 13 32 MoveCaret = False 33 Option = 0 34 Priority = 0 35 end 36 item 37 Shift = [] 38 ShiftMask = [] 28 Command = emcOnMainGutterClick 29 end 30 item 39 31 Button = mbRight 40 ClickCount = ccSingle 41 ClickDir = cdUp 42 Command = 12 43 MoveCaret = False 44 Option = 0 45 Priority = 0 32 Command = emcContextMenu 46 33 end> 47 34 RightGutter.Width = 0 48 35 RightGutter.MouseActions = < 49 36 item 50 Shift = []51 ShiftMask = []52 Button = mbLeft53 37 ClickCount = ccAny 54 38 ClickDir = cdDown 55 Command = 13 56 MoveCaret = False 57 Option = 0 58 Priority = 0 59 end 60 item 61 Shift = [] 62 ShiftMask = [] 39 Command = emcOnMainGutterClick 40 end 41 item 63 42 Button = mbRight 64 ClickCount = ccSingle 65 ClickDir = cdUp 66 Command = 12 67 MoveCaret = False 68 Option = 0 69 Priority = 0 43 Command = emcContextMenu 70 44 end> 71 45 Keystrokes = < … … 492 466 MouseActions = < 493 467 item 494 Shift = []495 468 ShiftMask = [ssShift, ssAlt] 496 Button = mbLeft 497 ClickCount = ccSingle 498 ClickDir = cdDown 499 Command = 1 500 MoveCaret = True 501 Option = 0 502 Priority = 0 469 ClickDir = cdDown 470 Command = emcStartSelections 471 MoveCaret = True 503 472 end 504 473 item 505 474 Shift = [ssShift] 506 475 ShiftMask = [ssShift, ssAlt] 507 Button = mbLeft 508 ClickCount = ccSingle 509 ClickDir = cdDown 510 Command = 1 476 ClickDir = cdDown 477 Command = emcStartSelections 511 478 MoveCaret = True 512 479 Option = 1 513 Priority = 0514 480 end 515 481 item 516 482 Shift = [ssAlt] 517 483 ShiftMask = [ssShift, ssAlt] 518 Button = mbLeft 519 ClickCount = ccSingle 520 ClickDir = cdDown 521 Command = 3 522 MoveCaret = True 523 Option = 0 524 Priority = 0 484 ClickDir = cdDown 485 Command = emcStartColumnSelections 486 MoveCaret = True 525 487 end 526 488 item 527 489 Shift = [ssShift, ssAlt] 528 490 ShiftMask = [ssShift, ssAlt] 529 Button = mbLeft 530 ClickCount = ccSingle 531 ClickDir = cdDown 532 Command = 3 491 ClickDir = cdDown 492 Command = emcStartColumnSelections 533 493 MoveCaret = True 534 494 Option = 1 535 Priority = 0 536 end 537 item 538 Shift = [] 539 ShiftMask = [] 495 end 496 item 540 497 Button = mbRight 541 ClickCount = ccSingle 542 ClickDir = cdUp 543 Command = 12 544 MoveCaret = False 545 Option = 0 546 Priority = 0 547 end 548 item 549 Shift = [] 550 ShiftMask = [] 551 Button = mbLeft 498 Command = emcContextMenu 499 end 500 item 552 501 ClickCount = ccDouble 553 502 ClickDir = cdDown 554 Command = 6 555 MoveCaret = True 556 Option = 0 557 Priority = 0 558 end 559 item 560 Shift = [] 561 ShiftMask = [] 562 Button = mbLeft 503 Command = emcSelectWord 504 MoveCaret = True 505 end 506 item 563 507 ClickCount = ccTriple 564 508 ClickDir = cdDown 565 Command = 7 566 MoveCaret = True 567 Option = 0 568 Priority = 0 569 end 570 item 571 Shift = [] 572 ShiftMask = [] 573 Button = mbLeft 509 Command = emcSelectLine 510 MoveCaret = True 511 end 512 item 574 513 ClickCount = ccQuad 575 514 ClickDir = cdDown 576 Command = 8 577 MoveCaret = True 578 Option = 0 579 Priority = 0 580 end 581 item 582 Shift = [] 583 ShiftMask = [] 515 Command = emcSelectPara 516 MoveCaret = True 517 end 518 item 584 519 Button = mbMiddle 585 ClickCount = ccSingle 586 ClickDir = cdDown 587 Command = 10 588 MoveCaret = True 589 Option = 0 590 Priority = 0 520 ClickDir = cdDown 521 Command = emcPasteSelection 522 MoveCaret = True 591 523 end 592 524 item 593 525 Shift = [ssCtrl] 594 526 ShiftMask = [ssShift, ssAlt, ssCtrl] 595 Button = mbLeft 596 ClickCount = ccSingle 597 ClickDir = cdUp 598 Command = 11 599 MoveCaret = False 600 Option = 0 601 Priority = 0 527 Command = emcMouseLink 602 528 end> 603 529 MouseSelActions = < 604 530 item 605 Shift = [] 606 ShiftMask = [] 607 Button = mbLeft 608 ClickCount = ccSingle 609 ClickDir = cdDown 610 Command = 9 611 MoveCaret = False 612 Option = 0 613 Priority = 0 531 ClickDir = cdDown 532 Command = emcStartDragMove 614 533 end> 615 534 Lines.Strings = ( 616 535 'SynEdit1' 617 536 ) 537 VisibleSpecialChars = [vscSpace, vscTabAtLast] 618 538 BracketHighlightStyle = sbhsBoth 619 539 inline SynLeftGutterPartList1: TSynGutterPartList 620 540 object SynGutterMarks1: TSynGutterMarks 621 541 Width = 24 542 MouseActions = <> 622 543 end 623 544 object SynGutterLineNumber1: TSynGutterLineNumber … … 633 554 object SynGutterChanges1: TSynGutterChanges 634 555 Width = 4 556 MouseActions = <> 635 557 ModifiedColor = 59900 636 558 SavedColor = clGreen … … 638 560 object SynGutterSeparator1: TSynGutterSeparator 639 561 Width = 2 562 MouseActions = <> 640 563 end 641 564 object SynGutterCodeFolding1: TSynGutterCodeFolding 642 565 MouseActions = < 643 566 item 644 Shift = []645 ShiftMask = []646 567 Button = mbRight 647 ClickCount = ccSingle 648 ClickDir = cdUp 649 Command = 16 650 MoveCaret = False 651 Option = 0 652 Priority = 0 568 Command = emcCodeFoldContextMenu 653 569 end 654 570 item 655 Shift = []656 571 ShiftMask = [ssShift] 657 572 Button = mbMiddle 658 573 ClickCount = ccAny 659 574 ClickDir = cdDown 660 Command = 14 661 MoveCaret = False 662 Option = 0 663 Priority = 0 575 Command = emcCodeFoldCollaps 664 576 end 665 577 item … … 669 581 ClickCount = ccAny 670 582 ClickDir = cdDown 671 Command = 14 672 MoveCaret = False 583 Command = emcCodeFoldCollaps 673 584 Option = 1 674 Priority = 0675 585 end 676 586 item 677 Shift = []678 ShiftMask = []679 Button = mbLeft680 587 ClickCount = ccAny 681 588 ClickDir = cdDown 682 Command = 0 683 MoveCaret = False 684 Option = 0 685 Priority = 0 589 Command = emcNone 686 590 end> 687 591 MarkupInfo.Background = clNone … … 689 593 MouseActionsExpanded = < 690 594 item 691 Shift = []692 ShiftMask = []693 Button = mbLeft694 595 ClickCount = ccAny 695 596 ClickDir = cdDown 696 Command = 14 697 MoveCaret = False 698 Option = 0 699 Priority = 0 597 Command = emcCodeFoldCollaps 700 598 end> 701 599 MouseActionsCollapsed = < … … 703 601 Shift = [ssCtrl] 704 602 ShiftMask = [ssCtrl] 705 Button = mbLeft706 603 ClickCount = ccAny 707 604 ClickDir = cdDown 708 Command = 15 709 MoveCaret = False 710 Option = 0 711 Priority = 0 605 Command = emcCodeFoldExpand 712 606 end 713 607 item 714 Shift = []715 608 ShiftMask = [ssCtrl] 716 Button = mbLeft717 609 ClickCount = ccAny 718 610 ClickDir = cdDown 719 Command = 15 720 MoveCaret = False 611 Command = emcCodeFoldExpand 721 612 Option = 1 722 Priority = 0723 613 end> 724 614 end 725 615 end 726 inline SynRightGutterPartList1: TSynRightGutterPartList727 end728 end729 object CoolDockClient1: TCDClient730 Floatable = False731 Master = MainForm.CoolDockMaster1732 left = 76733 top = 62734 616 end 735 617 object SynPasSyn1: TSynPasSyn 618 Enabled = False 619 AsmAttri.FrameEdges = sfeAround 620 CommentAttri.FrameEdges = sfeAround 621 IDEDirectiveAttri.FrameEdges = sfeAround 622 IdentifierAttri.FrameEdges = sfeAround 623 KeyAttri.FrameEdges = sfeAround 624 NumberAttri.FrameEdges = sfeAround 625 SpaceAttri.FrameEdges = sfeAround 626 StringAttri.FrameEdges = sfeAround 627 SymbolAttri.FrameEdges = sfeAround 628 CaseLabelAttri.FrameEdges = sfeAround 629 DirectiveAttri.FrameEdges = sfeAround 736 630 CompilerMode = pcmDelphi 737 631 NestedComments = False … … 741 635 object SynCppSyn1: TSynCppSyn 742 636 DefaultFilter = 'Soubory C++ (*.c,*.cpp,*.h,*.hpp,*.hh)|*.c;*.cpp;*.h;*.hpp;*.hh' 637 Enabled = False 638 AsmAttri.FrameEdges = sfeAround 639 CommentAttri.FrameEdges = sfeAround 640 DirecAttri.FrameEdges = sfeAround 641 IdentifierAttri.FrameEdges = sfeAround 642 InvalidAttri.FrameEdges = sfeAround 643 KeyAttri.FrameEdges = sfeAround 644 NumberAttri.FrameEdges = sfeAround 645 SpaceAttri.FrameEdges = sfeAround 646 StringAttri.FrameEdges = sfeAround 647 SymbolAttri.FrameEdges = sfeAround 743 648 left = 176 744 649 top = 85 … … 746 651 object SynXMLSyn1: TSynXMLSyn 747 652 DefaultFilter = 'XML Dokument (*.xml,*.xsd,*.xsl,*.xslt,*.dtd)|*.xml;*.xsd;*.xsl;*.xslt;*.dtd' 653 Enabled = False 654 ElementAttri.FrameEdges = sfeAround 655 AttributeAttri.FrameEdges = sfeAround 656 NamespaceAttributeAttri.FrameEdges = sfeAround 657 AttributeValueAttri.FrameEdges = sfeAround 658 NamespaceAttributeValueAttri.FrameEdges = sfeAround 659 TextAttri.FrameEdges = sfeAround 660 CDATAAttri.FrameEdges = sfeAround 661 EntityRefAttri.FrameEdges = sfeAround 662 ProcessingInstructionAttri.FrameEdges = sfeAround 663 CommentAttri.FrameEdges = sfeAround 664 DocTypeAttri.FrameEdges = sfeAround 665 SpaceAttri.FrameEdges = sfeAround 666 SymbolAttri.FrameEdges = sfeAround 748 667 WantBracesParsed = False 749 668 left = 178 -
trunk/IDE/Forms/UCompiledForm.pas
r30 r34 15 15 16 16 TCompiledForm = class(TForm) 17 CoolDockClient1: TCDClient;18 17 SynCppSyn1: TSynCppSyn; 19 18 SynEdit1: TSynEdit; -
trunk/IDE/Forms/UMainForm.lfm
r30 r34 5 5 Width = 695 6 6 Caption = 'Transpascal IDE' 7 ClientHeight = 4 787 ClientHeight = 482 8 8 ClientWidth = 695 9 9 Font.Height = -11 … … 20 20 Left = 0 21 21 Height = 5 22 Top = 47 322 Top = 477 23 23 Width = 695 24 24 Align = alBottom … … 27 27 object DockPanel: TPanel 28 28 Left = 0 29 Height = 44729 Height = 350 30 30 Top = 26 31 Width = 69531 Width = 490 32 32 Align = alClient 33 33 BevelOuter = bvNone … … 39 39 Top = 0 40 40 Width = 695 41 Caption = 'ToolBar1'42 41 TabOrder = 2 43 42 object ComboBoxProducer: TComboBox 44 43 Left = 192 45 Height = 2 444 Height = 21 46 45 Top = 2 47 46 Width = 135 48 47 Align = alLeft 49 ItemHeight = 048 ItemHeight = 13 50 49 ItemIndex = 1 51 50 Items.Strings = ( … … 73 72 Height = 24 74 73 Top = 2 75 Width = 1 2474 Width = 105 76 75 Align = alLeft 77 76 Caption = 'Log parsing to file' … … 80 79 object ComboBoxAnalyzer: TComboBox 81 80 Left = 40 82 Height = 2 481 Height = 21 83 82 Top = 2 84 83 Width = 124 85 84 Align = alLeft 86 ItemHeight = 085 ItemHeight = 13 87 86 Style = csDropDownList 88 87 TabOrder = 3 … … 112 111 Layout = tlCenter 113 112 ParentColor = False 113 end 114 end 115 object Splitter1: TSplitter 116 Left = 490 117 Height = 350 118 Top = 26 119 Width = 5 120 Align = alRight 121 ResizeAnchor = akRight 122 end 123 object PageControl1: TPageControl 124 Left = 495 125 Height = 350 126 Top = 26 127 Width = 200 128 ActivePage = TabSheet1 129 Align = alRight 130 TabIndex = 0 131 TabOrder = 4 132 TabPosition = tpRight 133 object TabSheet1: TTabSheet 134 Caption = 'Project' 135 end 136 object TabSheet2: TTabSheet 137 Caption = 'Code Tree' 138 end 139 end 140 object PageControl2: TPageControl 141 Left = 0 142 Height = 101 143 Top = 376 144 Width = 695 145 ActivePage = TabSheet4 146 Align = alBottom 147 TabIndex = 1 148 TabOrder = 5 149 TabPosition = tpBottom 150 object TabSheet3: TTabSheet 151 Caption = 'Messages' 152 end 153 object TabSheet4: TTabSheet 154 Caption = 'Compiled source' 114 155 end 115 156 end … … 137 178 Action = AProjectClose 138 179 end 180 object MenuItem12: TMenuItem 181 Caption = '-' 182 end 183 object MenuItem13: TMenuItem 184 Action = AExit 185 end 139 186 end 140 187 object MenuItem7: TMenuItem … … 142 189 object MenuItem8: TMenuItem 143 190 Action = ABuild 191 end 192 object MenuItem14: TMenuItem 193 Action = ARun 194 end 195 end 196 object MenuItem15: TMenuItem 197 Caption = 'View' 198 object MenuItem16: TMenuItem 199 Caption = 'New Item18' 200 end 201 object MenuItem17: TMenuItem 202 Caption = 'New Item19' 203 end 204 object MenuItem18: TMenuItem 205 Caption = 'New Item20' 206 end 207 end 208 object MenuItem9: TMenuItem 209 Caption = 'Help' 210 object MenuItem10: TMenuItem 211 Action = AHomepage 212 end 213 object MenuItem11: TMenuItem 214 Action = AAbout 144 215 end 145 216 end … … 184 255 ShortCut = 120 185 256 end 186 end 187 object CoolDockMaster1: TCDMaster 188 Customize = CDCustomize1 189 TabsEnabled = True 190 DefaultTabsPos = hpAuto 191 DefaultHeaderPos = hpAuto 192 DefaultMoveSpeed = 0 193 ShowIcons = False 194 left = 504 195 top = 104 196 end 197 object CoolDockClient1: TCDClient 198 Master = CoolDockMaster1 199 Panel = DockPanel 200 Dockable = False 201 Floatable = False 202 left = 504 203 top = 56 257 object AExit: TAction 258 Caption = 'Exit' 259 OnExecute = AExitExecute 260 end 261 object ARun: TAction 262 Caption = 'Run' 263 end 264 object AAbout: TAction 265 Caption = 'About...' 266 OnExecute = AAboutExecute 267 end 268 object AHomepage: TAction 269 Caption = 'Homepage' 270 OnExecute = AHomepageExecute 271 end 272 object AViewProject: TAction 273 Category = 'View' 274 Caption = 'Project manager' 275 end 276 object AViewObjectInspector: TAction 277 Category = 'View' 278 Caption = 'Object inspector' 279 end 280 object AViewSourceEditor: TAction 281 Category = 'View' 282 Caption = 'Source editor' 283 end 284 object AViewMessages: TAction 285 Category = 'View' 286 Caption = 'Messages' 287 end 204 288 end 205 289 object OpenDialog1: TOpenDialog … … 213 297 top = 104 214 298 end 215 object CDWindowList1: TCDWindowList216 left = 502217 top = 157218 end219 object CDLayoutList1: TCDLayoutList220 left = 502221 top = 205222 end223 object CDCustomize1: TCDCustomize224 Master = CoolDockMaster1225 LayoutList = CDLayoutList1226 left = 499227 top = 260228 end229 299 object ImageList1: TImageList 230 300 left = 624 231 301 top = 112 232 302 end 303 object DebugLog1: TDebugLog 304 WriteToFileEnable = False 305 FileName = 'DebugLog.txt' 306 MaxCount = 100 307 left = 344 308 top = 88 309 end 233 310 end -
trunk/IDE/Forms/UMainForm.pas
r30 r34 22 22 TMainForm = class(TForm) 23 23 ABuild: TAction; 24 AViewMessages: TAction; 25 AViewSourceEditor: TAction; 26 AViewObjectInspector: TAction; 27 AViewProject: TAction; 28 AHomepage: TAction; 29 ARun: TAction; 30 AAbout: TAction; 31 AExit: TAction; 24 32 AProjectNew: TAction; 25 33 AProjectOpen: TAction; … … 29 37 ActionList1: TActionList; 30 38 Button1: TButton; 31 CDCustomize1: TCDCustomize;32 CDLayoutList1: TCDLayoutList;33 CDWindowList1: TCDWindowList;34 39 CheckBoxLogParsing: TCheckBox; 35 40 ComboBoxAnalyzer: TComboBox; 36 41 ComboBoxProducer: TComboBox; 37 CoolDockClient1: TCDClient; 38 CoolDockMaster1: TCDMaster; 42 DebugLog1: TDebugLog; 39 43 ImageList1: TImageList; 40 44 Label1: TLabel; … … 42 46 MainMenu1: TMainMenu; 43 47 MenuItem1: TMenuItem; 48 MenuItem10: TMenuItem; 49 MenuItem11: TMenuItem; 50 MenuItem12: TMenuItem; 51 MenuItem13: TMenuItem; 52 MenuItem14: TMenuItem; 53 MenuItem15: TMenuItem; 54 MenuItem16: TMenuItem; 55 MenuItem17: TMenuItem; 56 MenuItem18: TMenuItem; 44 57 MenuItem2: TMenuItem; 45 58 MenuItem3: TMenuItem; … … 50 63 MenuItem8: TMenuItem; 51 64 DockPanel: TPanel; 65 MenuItem9: TMenuItem; 52 66 MenuItemOpenRecent: TMenuItem; 53 67 OpenDialog1: TOpenDialog; 68 PageControl1: TPageControl; 69 PageControl2: TPageControl; 54 70 SaveDialog1: TSaveDialog; 71 Splitter1: TSplitter; 55 72 Splitter3: TSplitter; 73 TabSheet1: TTabSheet; 74 TabSheet2: TTabSheet; 75 TabSheet3: TTabSheet; 76 TabSheet4: TTabSheet; 56 77 ToolBar1: TToolBar; 78 procedure AAboutExecute(Sender: TObject); 79 procedure AExitExecute(Sender: TObject); 80 procedure AHomepageExecute(Sender: TObject); 57 81 procedure AProjectCloseExecute(Sender: TObject); 58 82 procedure AProjectNewExecute(Sender: TObject); … … 60 84 procedure AProjectSaveAsExecute(Sender: TObject); 61 85 procedure AProjectSaveExecute(Sender: TObject); 86 procedure ABuildExecute(Sender: TObject); 62 87 procedure ComboBox1Change(Sender: TObject); 63 88 procedure ComboBoxProducerChange(Sender: TObject); 64 89 procedure FormShow(Sender: TObject); 65 90 procedure FormClose(Sender: TObject; var Action: TCloseAction); 66 procedure ABuildExecute(Sender: TObject);67 91 procedure FormCreate(Sender: TObject); 68 92 procedure FormDestroy(Sender: TObject); … … 91 115 92 116 uses 93 UMessagesForm, UCodeForm, UProjectManager; 117 UMessagesForm, UCodeForm, UProjectManager, UCommon, UAboutForm; 118 119 resourcestring 120 SNewProject = 'New project'; 94 121 95 122 { TMainForm } … … 144 171 Container2: TCDConjoinForm; 145 172 begin 146 ProjectManager.ManualDock(DockPanel, nil, alLeft); 173 CodeForm.ManualDock(DockPanel, nil, alClient); 174 CodeForm.Align := alClient; 175 CodeForm.Show; 176 MessagesForm.ManualDock(TabSheet3, nil, alClient); 177 MessagesForm.Align := alClient; 178 MessagesForm.Show; 179 ProjectManager.ManualDock(TabSheet1, nil, alClient); 180 ProjectManager.Align := alClient; 181 ProjectManager.Show; 182 CodeTreeForm.ManualDock(TabSheet2, nil, alClient); 183 CodeTreeForm.Align := alClient; 184 CodeTreeForm.Show; 185 CompiledForm.ManualDock(TabSheet4, nil, alClient); 186 CompiledForm.Align := alClient; 187 CompiledForm.Show; 188 189 (*ProjectManager.ManualDock(DockPanel, nil, alLeft); 147 190 ProjectManager.Show; 148 191 … … 176 219 177 220 Container1.Parent.Parent.Width := MainForm.Width - ProjectManager.Width - 200; 178 Container2.Parent.Parent.Height := MainForm.Height; 221 Container2.Parent.Parent.Height := MainForm.Height;*) 179 222 end; 180 223 … … 235 278 I: Integer; 236 279 begin 237 DebugLog.FileName := 'DebugLog.txt'; 238 DeleteFile(DebugLog.FileName); 280 DeleteFile(DebugLog1.FileName); 239 281 Compiler := TCompiler.Create; 240 282 Project := TProject.Create; … … 261 303 procedure TMainForm.CompilerDebugLog(Text: string); 262 304 begin 263 DebugLog .Add('', Text);305 DebugLog1.Add('', Text); 264 306 end; 265 307 … … 301 343 end; 302 344 345 procedure TMainForm.AExitExecute(Sender: TObject); 346 begin 347 Close; 348 end; 349 350 procedure TMainForm.AAboutExecute(Sender: TObject); 351 begin 352 AboutForm.ShowModal; 353 end; 354 355 procedure TMainForm.AHomepageExecute(Sender: TObject); 356 begin 357 OpenWebPage(ApplicationInfo.HomePage); 358 end; 359 303 360 procedure TMainForm.AProjectNewExecute(Sender: TObject); 304 361 begin 305 362 Project.Clear; 306 Project.Name := 'New project';363 Project.Name := SNewProject; 307 364 ProjectManager.UpdateProjectTree; 308 365 Caption := ApplicationInfo.Name + ' - ' + Project.Name; -
trunk/IDE/Forms/UMessagesForm.lfm
r30 r34 7 7 ClientHeight = 240 8 8 ClientWidth = 320 9 LCLVersion = '0.9. 29'9 LCLVersion = '0.9.31' 10 10 object ListView1: TListView 11 11 Left = 0 … … 35 35 OnSelectItem = ListView1SelectItem 36 36 end 37 object CoolDockClient1: TCDClient38 Floatable = False39 Master = MainForm.CoolDockMaster140 left = 7641 top = 7142 end43 37 end -
trunk/IDE/Forms/UMessagesForm.pas
r30 r34 14 14 15 15 TMessagesForm = class(TForm) 16 CoolDockClient1: TCDClient;17 16 ListView1: TListView; 18 17 procedure ListBoxMessagesSelectionChange(Sender: TObject; User: boolean); -
trunk/IDE/Transpascal.lpi
r30 r34 5 5 <PathDelim Value="\"/> 6 6 <General> 7 <SessionStorage Value="InProjectDir"/> 7 8 <MainUnit Value="0"/> 8 9 <Title Value="Transpascal IDE"/> … … 10 11 <UseXPManifest Value="True"/> 11 12 <Icon Value="0"/> 12 <ActiveWindowIndexAtStart Value="0"/>13 13 </General> 14 14 <i18n> 15 <EnableI18N LFM="False"/> 15 <EnableI18N Value="True"/> 16 <OutDir Value="Languages"/> 16 17 </i18n> 17 18 <VersionInfo> … … 20 21 <StringTable ProductVersion=""/> 21 22 </VersionInfo> 22 <BuildModes Count="1"> 23 <Item1 Name="default" Default="True"/> 23 <BuildModes Count="2"> 24 <Item1 Name="Debug" Default="True"/> 25 <Item2 Name="Release"> 26 <CompilerOptions> 27 <Version Value="11"/> 28 <PathDelim Value="\"/> 29 <Target> 30 <Filename Value="Transpascal"/> 31 </Target> 32 <SearchPaths> 33 <IncludeFiles Value="$(ProjOutDir)"/> 34 <OtherUnitFiles Value="Forms;Common"/> 35 <UnitOutputDirectory Value="lib\$(TargetCPU)-$(TargetOS)"/> 36 </SearchPaths> 37 <Parsing> 38 <SyntaxOptions> 39 <SyntaxMode Value="Delphi"/> 40 <CStyleOperator Value="False"/> 41 <AllowLabel Value="False"/> 42 <CPPInline Value="False"/> 43 </SyntaxOptions> 44 </Parsing> 45 <CodeGeneration> 46 <SmartLinkUnit Value="True"/> 47 <Optimizations> 48 <OptimizationLevel Value="2"/> 49 </Optimizations> 50 </CodeGeneration> 51 <Linking> 52 <Debugging> 53 <GenerateDebugInfo Value="False"/> 54 </Debugging> 55 <Options> 56 <Win32> 57 <GraphicApplication Value="True"/> 58 </Win32> 59 </Options> 60 </Linking> 61 <Other> 62 <CompilerMessages> 63 <UseMsgFile Value="True"/> 64 </CompilerMessages> 65 <CompilerPath Value="$(CompPath)"/> 66 </Other> 67 </CompilerOptions> 68 </Item2> 24 69 </BuildModes> 25 70 <PublishOptions> … … 35 80 </local> 36 81 </RunParams> 37 <RequiredPackages Count=" 6">82 <RequiredPackages Count="7"> 38 83 <Item1> 39 <PackageName Value="LCLBase"/> 40 <MinVersion Major="1" Release="1" Valid="True"/> 84 <PackageName Value="Common"/> 41 85 </Item1> 42 86 <Item2> 43 <PackageName Value="TemplateGenerics"/> 87 <PackageName Value="LCLBase"/> 88 <MinVersion Major="1" Valid="True" Release="1"/> 44 89 </Item2> 45 90 <Item3> 46 <PackageName Value="T ranspascalCompiler"/>91 <PackageName Value="TemplateGenerics"/> 47 92 </Item3> 48 93 <Item4> 49 <PackageName Value=" CoolDocking"/>94 <PackageName Value="TranspascalCompiler"/> 50 95 </Item4> 51 96 <Item5> 97 <PackageName Value="CoolDocking"/> 98 </Item5> 99 <Item6> 52 100 <PackageName Value="SynEdit"/> 53 101 <MinVersion Major="1" Valid="True"/> 54 </Item 5>55 <Item 6>102 </Item6> 103 <Item7> 56 104 <PackageName Value="LCL"/> 57 </Item 6>105 </Item7> 58 106 </RequiredPackages> 59 <Units Count=" 97">107 <Units Count="14"> 60 108 <Unit0> 61 109 <Filename Value="Transpascal.lpr"/> 62 110 <IsPartOfProject Value="True"/> 63 111 <UnitName Value="Transpascal"/> 64 <EditorIndex Value="4"/>65 <WindowIndex Value="0"/>66 <TopLine Value="1"/>67 <CursorPos X="1" Y="19"/>68 <UsageCount Value="215"/>69 <Loaded Value="True"/>70 <DefaultSyntaxHighlighter Value="Delphi"/>71 112 </Unit0> 72 113 <Unit1> … … 77 118 <ResourceBaseClass Value="Form"/> 78 119 <UnitName Value="UMainForm"/> 79 <EditorIndex Value="1"/>80 <WindowIndex Value="0"/>81 <TopLine Value="150"/>82 <CursorPos X="80" Y="177"/>83 <UsageCount Value="215"/>84 <Loaded Value="True"/>85 <LoadedDesigner Value="True"/>86 <DefaultSyntaxHighlighter Value="Delphi"/>87 120 </Unit1> 88 121 <Unit2> … … 90 123 <IsPartOfProject Value="True"/> 91 124 <UnitName Value="UTextSource"/> 92 <WindowIndex Value="0"/>93 <TopLine Value="1"/>94 <CursorPos X="1" Y="6"/>95 <UsageCount Value="215"/>96 <DefaultSyntaxHighlighter Value="Delphi"/>97 125 </Unit2> 98 126 <Unit3> 99 <Filename Value="USourceCode.pas"/> 100 <UnitName Value="USourceCode"/> 101 <WindowIndex Value="0"/> 102 <TopLine Value="745"/> 103 <CursorPos X="46" Y="759"/> 104 <UsageCount Value="116"/> 105 <DefaultSyntaxHighlighter Value="Delphi"/> 127 <Filename Value="UProject.pas"/> 128 <IsPartOfProject Value="True"/> 129 <UnitName Value="UProject"/> 106 130 </Unit3> 107 131 <Unit4> 108 <Filename Value="UCompiler.pas"/> 109 <UnitName Value="UCompiler"/> 110 <WindowIndex Value="0"/> 111 <TopLine Value="1"/> 112 <CursorPos X="40" Y="11"/> 113 <UsageCount Value="116"/> 114 <DefaultSyntaxHighlighter Value="Delphi"/> 132 <Filename Value="Forms\UProjectManager.pas"/> 133 <IsPartOfProject Value="True"/> 134 <ComponentName Value="ProjectManager"/> 135 <ResourceBaseClass Value="Form"/> 136 <UnitName Value="UProjectManager"/> 115 137 </Unit4> 116 138 <Unit5> 117 <Filename Value="Produce\UProducerAsm8051.pas"/> 118 <UnitName Value="UProducerAsm8051"/> 119 <WindowIndex Value="0"/> 120 <TopLine Value="187"/> 121 <CursorPos X="34" Y="201"/> 122 <UsageCount Value="116"/> 123 <DefaultSyntaxHighlighter Value="Delphi"/> 139 <Filename Value="Forms\UCodeForm.pas"/> 140 <IsPartOfProject Value="True"/> 141 <ComponentName Value="CodeForm"/> 142 <ResourceBaseClass Value="Form"/> 143 <UnitName Value="UCodeForm"/> 124 144 </Unit5> 125 145 <Unit6> 126 <Filename Value="Produce\UProducer.pas"/> 127 <UnitName Value="UProducer"/> 128 <WindowIndex Value="0"/> 129 <TopLine Value="1"/> 130 <CursorPos X="1" Y="14"/> 131 <UsageCount Value="116"/> 132 <DefaultSyntaxHighlighter Value="Delphi"/> 146 <Filename Value="Forms\UMessagesForm.pas"/> 147 <IsPartOfProject Value="True"/> 148 <ComponentName Value="MessagesForm"/> 149 <ResourceBaseClass Value="Form"/> 150 <UnitName Value="UMessagesForm"/> 133 151 </Unit6> 134 152 <Unit7> 135 <Filename Value="Produce\UProducerC.pas"/> 136 <UnitName Value="UProducerC"/> 137 <WindowIndex Value="0"/> 138 <TopLine Value="124"/> 139 <CursorPos X="42" Y="136"/> 140 <UsageCount Value="116"/> 141 <DefaultSyntaxHighlighter Value="Delphi"/> 153 <Filename Value="Forms\UCompiledForm.pas"/> 154 <IsPartOfProject Value="True"/> 155 <ComponentName Value="CompiledForm"/> 156 <HasResources Value="True"/> 157 <ResourceBaseClass Value="Form"/> 158 <UnitName Value="UCompiledForm"/> 142 159 </Unit7> 143 160 <Unit8> 144 <Filename Value="Analyze\UParser.pas"/> 145 <UnitName Value="UParser"/> 146 <WindowIndex Value="0"/> 147 <TopLine Value="442"/> 148 <CursorPos X="47" Y="455"/> 149 <UsageCount Value="116"/> 150 <DefaultSyntaxHighlighter Value="Delphi"/> 161 <Filename Value="Forms\UCodeTreeForm.pas"/> 162 <IsPartOfProject Value="True"/> 163 <ComponentName Value="CodeTreeForm"/> 164 <ResourceBaseClass Value="Form"/> 165 <UnitName Value="UCodeTreeForm"/> 151 166 </Unit8> 152 167 <Unit9> 153 <Filename Value="E:\Programy\Lazarus\fpc\2.4.0\source\packages\fcl-base\src\contnrs.pp"/> 154 <UnitName Value="contnrs"/> 155 <WindowIndex Value="0"/> 156 <TopLine Value="78"/> 157 <CursorPos X="27" Y="86"/> 158 <UsageCount Value="8"/> 159 <DefaultSyntaxHighlighter Value="Delphi"/> 168 <Filename Value="Common\URegistry.pas"/> 169 <IsPartOfProject Value="True"/> 170 <UnitName Value="URegistry"/> 160 171 </Unit9> 161 172 <Unit10> 162 <Filename Value="E:\Programy\Lazarus\fpc\2.4.0\source\rtl\objpas\sysutils\sysutilh.inc"/> 163 <WindowIndex Value="0"/> 164 <TopLine Value="61"/> 165 <CursorPos X="7" Y="68"/> 166 <UsageCount Value="18"/> 167 <DefaultSyntaxHighlighter Value="Delphi"/> 173 <Filename Value="Common\ULastOpenedList.pas"/> 174 <IsPartOfProject Value="True"/> 175 <UnitName Value="ULastOpenedList"/> 168 176 </Unit10> 169 177 <Unit11> 170 <Filename Value="E:\Programy\Lazarus\fpc\2.4.0\source\rtl\objpas\sysutils\sysutils.inc"/> 171 <WindowIndex Value="0"/> 172 <TopLine Value="139"/> 173 <CursorPos X="16" Y="146"/> 174 <UsageCount Value="18"/> 175 <DefaultSyntaxHighlighter Value="Delphi"/> 178 <Filename Value="UApplicationInfo.pas"/> 179 <IsPartOfProject Value="True"/> 180 <UnitName Value="UApplicationInfo"/> 176 181 </Unit11> 177 182 <Unit12> 178 <Filename Value="Produce\UProducerTreeView.pas"/> 179 <UnitName Value="UProducerTreeView"/> 180 <WindowIndex Value="0"/> 181 <TopLine Value="69"/> 182 <CursorPos X="1" Y="82"/> 183 <UsageCount Value="78"/> 184 <DefaultSyntaxHighlighter Value="Delphi"/> 183 <Filename Value="Common\UDebugLog.pas"/> 184 <IsPartOfProject Value="True"/> 185 <UnitName Value="UDebugLog"/> 185 186 </Unit12> 186 187 <Unit13> 187 <Filename Value="Produce\UProducerPascal.pas"/> 188 <UnitName Value="UProducerPascal"/> 189 <WindowIndex Value="0"/> 190 <TopLine Value="320"/> 191 <CursorPos X="1" Y="327"/> 192 <UsageCount Value="32"/> 193 <DefaultSyntaxHighlighter Value="Delphi"/> 188 <Filename Value="Forms\UAboutForm.pas"/> 189 <IsPartOfProject Value="True"/> 190 <ComponentName Value="AboutForm"/> 191 <HasResources Value="True"/> 192 <ResourceBaseClass Value="Form"/> 193 <UnitName Value="UAboutForm"/> 194 194 </Unit13> 195 <Unit14>196 <Filename Value="UProject.pas"/>197 <IsPartOfProject Value="True"/>198 <UnitName Value="UProject"/>199 <WindowIndex Value="0"/>200 <TopLine Value="1"/>201 <CursorPos X="14" Y="10"/>202 <UsageCount Value="223"/>203 <DefaultSyntaxHighlighter Value="Delphi"/>204 </Unit14>205 <Unit15>206 <Filename Value="Compiler\UCompiler.pas"/>207 <UnitName Value="UCompiler"/>208 <WindowIndex Value="0"/>209 <TopLine Value="70"/>210 <CursorPos X="53" Y="92"/>211 <UsageCount Value="96"/>212 <DefaultSyntaxHighlighter Value="Delphi"/>213 </Unit15>214 <Unit16>215 <Filename Value="Compiler\USourceCode.pas"/>216 <UnitName Value="USourceCode"/>217 <WindowIndex Value="0"/>218 <TopLine Value="3"/>219 <CursorPos X="32" Y="17"/>220 <UsageCount Value="97"/>221 <DefaultSyntaxHighlighter Value="Delphi"/>222 </Unit16>223 <Unit17>224 <Filename Value="Compiler\Analyze\UParser.pas"/>225 <UnitName Value="UParser"/>226 <WindowIndex Value="0"/>227 <TopLine Value="45"/>228 <CursorPos X="14" Y="58"/>229 <UsageCount Value="96"/>230 <DefaultSyntaxHighlighter Value="Delphi"/>231 </Unit17>232 <Unit18>233 <Filename Value="Forms\UProjectManager.pas"/>234 <IsPartOfProject Value="True"/>235 <ComponentName Value="ProjectManager"/>236 <ResourceBaseClass Value="Form"/>237 <UnitName Value="UProjectManager"/>238 <WindowIndex Value="0"/>239 <TopLine Value="68"/>240 <CursorPos X="39" Y="82"/>241 <UsageCount Value="207"/>242 <DefaultSyntaxHighlighter Value="Delphi"/>243 </Unit18>244 <Unit19>245 <Filename Value="Forms\UCodeForm.pas"/>246 <IsPartOfProject Value="True"/>247 <ComponentName Value="CodeForm"/>248 <ResourceBaseClass Value="Form"/>249 <UnitName Value="UCodeForm"/>250 <WindowIndex Value="0"/>251 <TopLine Value="36"/>252 <CursorPos X="52" Y="50"/>253 <UsageCount Value="207"/>254 <DefaultSyntaxHighlighter Value="Delphi"/>255 </Unit19>256 <Unit20>257 <Filename Value="Forms\UMessagesForm.pas"/>258 <IsPartOfProject Value="True"/>259 <ComponentName Value="MessagesForm"/>260 <ResourceBaseClass Value="Form"/>261 <UnitName Value="UMessagesForm"/>262 <WindowIndex Value="0"/>263 <TopLine Value="47"/>264 <CursorPos X="5" Y="54"/>265 <UsageCount Value="207"/>266 <DefaultSyntaxHighlighter Value="Delphi"/>267 </Unit20>268 <Unit21>269 <Filename Value="Forms\UCompiledForm.pas"/>270 <IsPartOfProject Value="True"/>271 <ComponentName Value="CompiledForm"/>272 <HasResources Value="True"/>273 <ResourceBaseClass Value="Form"/>274 <UnitName Value="UCompiledForm"/>275 <WindowIndex Value="0"/>276 <TopLine Value="2"/>277 <CursorPos X="14" Y="3"/>278 <UsageCount Value="206"/>279 <DefaultSyntaxHighlighter Value="Delphi"/>280 </Unit21>281 <Unit22>282 <Filename Value="Forms\UCodeTreeForm.pas"/>283 <IsPartOfProject Value="True"/>284 <ComponentName Value="CodeTreeForm"/>285 <ResourceBaseClass Value="Form"/>286 <UnitName Value="UCodeTreeForm"/>287 <WindowIndex Value="0"/>288 <TopLine Value="1"/>289 <CursorPos X="14" Y="3"/>290 <UsageCount Value="206"/>291 <DefaultSyntaxHighlighter Value="Delphi"/>292 </Unit22>293 <Unit23>294 <Filename Value="Compiler\Produce\UProducerTreeView.pas"/>295 <UnitName Value="UProducerTreeView"/>296 <WindowIndex Value="0"/>297 <TopLine Value="141"/>298 <CursorPos X="93" Y="154"/>299 <UsageCount Value="74"/>300 <DefaultSyntaxHighlighter Value="Delphi"/>301 </Unit23>302 <Unit24>303 <Filename Value="Common\URegistry.pas"/>304 <IsPartOfProject Value="True"/>305 <UnitName Value="URegistry"/>306 <WindowIndex Value="0"/>307 <TopLine Value="1"/>308 <CursorPos X="23" Y="22"/>309 <UsageCount Value="200"/>310 <DefaultSyntaxHighlighter Value="Delphi"/>311 </Unit24>312 <Unit25>313 <Filename Value="Common\ULastOpenedList.pas"/>314 <IsPartOfProject Value="True"/>315 <UnitName Value="ULastOpenedList"/>316 <WindowIndex Value="0"/>317 <TopLine Value="11"/>318 <CursorPos X="22" Y="24"/>319 <UsageCount Value="200"/>320 <DefaultSyntaxHighlighter Value="Delphi"/>321 </Unit25>322 <Unit26>323 <Filename Value="UApplicationInfo.pas"/>324 <IsPartOfProject Value="True"/>325 <UnitName Value="UApplicationInfo"/>326 <WindowIndex Value="0"/>327 <TopLine Value="43"/>328 <CursorPos X="27" Y="52"/>329 <UsageCount Value="200"/>330 <DefaultSyntaxHighlighter Value="Delphi"/>331 </Unit26>332 <Unit27>333 <Filename Value="Compiler\Produce\UProducerDynamicC.pas"/>334 <UnitName Value="UProducerDynamicC"/>335 <WindowIndex Value="0"/>336 <TopLine Value="268"/>337 <CursorPos X="39" Y="283"/>338 <UsageCount Value="107"/>339 <DefaultSyntaxHighlighter Value="Delphi"/>340 </Unit27>341 <Unit28>342 <Filename Value="Compiler\Produce\UProducerAsm8051.pas"/>343 <UnitName Value="UProducerAsm8051"/>344 <WindowIndex Value="0"/>345 <TopLine Value="143"/>346 <CursorPos X="68" Y="156"/>347 <UsageCount Value="71"/>348 <DefaultSyntaxHighlighter Value="Delphi"/>349 </Unit28>350 <Unit29>351 <Filename Value="Compiler\Produce\UProducerPascal.pas"/>352 <UnitName Value="UProducerPascal"/>353 <WindowIndex Value="0"/>354 <TopLine Value="309"/>355 <CursorPos X="64" Y="322"/>356 <UsageCount Value="104"/>357 <DefaultSyntaxHighlighter Value="Delphi"/>358 </Unit29>359 <Unit30>360 <Filename Value="Compiler\Analyze\UPascalParser.pas"/>361 <UnitName Value="UPascalParser"/>362 <WindowIndex Value="0"/>363 <TopLine Value="266"/>364 <CursorPos X="32" Y="279"/>365 <UsageCount Value="104"/>366 <DefaultSyntaxHighlighter Value="Delphi"/>367 </Unit30>368 <Unit31>369 <Filename Value="Compiler\Analyze\UGrammer.pas"/>370 <UnitName Value="UGrammer"/>371 <WindowIndex Value="0"/>372 <TopLine Value="15"/>373 <CursorPos X="1" Y="28"/>374 <UsageCount Value="21"/>375 <DefaultSyntaxHighlighter Value="Delphi"/>376 </Unit31>377 <Unit32>378 <Filename Value="Common\UDebugLog.pas"/>379 <IsPartOfProject Value="True"/>380 <UnitName Value="UDebugLog"/>381 <WindowIndex Value="0"/>382 <TopLine Value="1"/>383 <CursorPos X="28" Y="22"/>384 <UsageCount Value="328"/>385 <DefaultSyntaxHighlighter Value="Delphi"/>386 </Unit32>387 <Unit33>388 <Filename Value="E:\Programy\Lazarus\fpc\2.4.0\source\rtl\objpas\classes\streams.inc"/>389 <WindowIndex Value="0"/>390 <TopLine Value="365"/>391 <CursorPos X="5" Y="370"/>392 <UsageCount Value="1"/>393 <DefaultSyntaxHighlighter Value="Delphi"/>394 </Unit33>395 <Unit34>396 <Filename Value="Compiler\Produce\UProducerGCCC.pas"/>397 <UnitName Value="UProducerGCCC"/>398 <WindowIndex Value="0"/>399 <TopLine Value="26"/>400 <CursorPos X="14" Y="39"/>401 <UsageCount Value="101"/>402 <DefaultSyntaxHighlighter Value="Delphi"/>403 </Unit34>404 <Unit35>405 <Filename Value="Forms\UMainForm.lfm"/>406 <WindowIndex Value="0"/>407 <TopLine Value="1"/>408 <CursorPos X="1" Y="1"/>409 <UsageCount Value="136"/>410 <Loaded Value="True"/>411 <DefaultSyntaxHighlighter Value="LFM"/>412 </Unit35>413 <Unit36>414 <Filename Value="E:\usr\share\fpcsrc\packages\fcl-registry\src\registry.pp"/>415 <UnitName Value="registry"/>416 <WindowIndex Value="0"/>417 <TopLine Value="1"/>418 <CursorPos X="36" Y="55"/>419 <UsageCount Value="14"/>420 <DefaultSyntaxHighlighter Value="Delphi"/>421 </Unit36>422 <Unit37>423 <Filename Value="E:\usr\share\fpcsrc\packages\fcl-registry\src\regdef.inc"/>424 <WindowIndex Value="0"/>425 <TopLine Value="1"/>426 <CursorPos X="3" Y="21"/>427 <UsageCount Value="14"/>428 <DefaultSyntaxHighlighter Value="Delphi"/>429 </Unit37>430 <Unit38>431 <Filename Value="E:\lazarus\trunk\lcl\interfaces\gtk2\gtk2widgetset.inc"/>432 <WindowIndex Value="0"/>433 <TopLine Value="1377"/>434 <CursorPos X="32" Y="1396"/>435 <UsageCount Value="14"/>436 <DefaultSyntaxHighlighter Value="Delphi"/>437 </Unit38>438 <Unit39>439 <Filename Value="Generics\Generic\GenericObjectList.inc"/>440 <WindowIndex Value="0"/>441 <TopLine Value="27"/>442 <CursorPos X="84" Y="48"/>443 <UsageCount Value="8"/>444 <DefaultSyntaxHighlighter Value="Delphi"/>445 </Unit39>446 <Unit40>447 <Filename Value="Generics\Generic\GenericList.inc"/>448 <WindowIndex Value="0"/>449 <TopLine Value="100"/>450 <CursorPos X="43" Y="102"/>451 <UsageCount Value="8"/>452 <DefaultSyntaxHighlighter Value="Delphi"/>453 </Unit40>454 <Unit41>455 <Filename Value="E:\Projekty\PascalClassLibrary\Docking\CoolDocking\UCoolDockStyleTabs.pas"/>456 <UnitName Value="UCoolDockStyleTabs"/>457 <WindowIndex Value="0"/>458 <TopLine Value="1"/>459 <CursorPos X="44" Y="6"/>460 <UsageCount Value="12"/>461 <DefaultSyntaxHighlighter Value="Delphi"/>462 </Unit41>463 <Unit42>464 <Filename Value="E:\Programy\Lazarus\fpc\2.4.3\source\rtl\win32\system.pp"/>465 <UnitName Value="System"/>466 <WindowIndex Value="0"/>467 <TopLine Value="22"/>468 <CursorPos X="2" Y="35"/>469 <UsageCount Value="12"/>470 <DefaultSyntaxHighlighter Value="Delphi"/>471 </Unit42>472 <Unit43>473 <Filename Value="E:\Projekty\PascalClassLibrary\Generics\TemplateGenerics\Generic\GenericList.inc"/>474 <WindowIndex Value="0"/>475 <TopLine Value="1"/>476 <CursorPos X="23" Y="5"/>477 <UsageCount Value="84"/>478 <DefaultSyntaxHighlighter Value="Delphi"/>479 </Unit43>480 <Unit44>481 <Filename Value="E:\Programy\Lazarus\fpc\2.4.3\source\rtl\objpas\sysutils\sysstrh.inc"/>482 <WindowIndex Value="0"/>483 <TopLine Value="107"/>484 <CursorPos X="10" Y="120"/>485 <UsageCount Value="72"/>486 <DefaultSyntaxHighlighter Value="Delphi"/>487 </Unit44>488 <Unit45>489 <Filename Value="Compiler\Produce\UProducer.pas"/>490 <UnitName Value="UProducer"/>491 <WindowIndex Value="0"/>492 <TopLine Value="1"/>493 <CursorPos X="1" Y="12"/>494 <UsageCount Value="71"/>495 <DefaultSyntaxHighlighter Value="Delphi"/>496 </Unit45>497 <Unit46>498 <Filename Value="..\Compiler\UCompiler.pas"/>499 <UnitName Value="UCompiler"/>500 <WindowIndex Value="0"/>501 <TopLine Value="43"/>502 <CursorPos X="31" Y="56"/>503 <UsageCount Value="42"/>504 <DefaultSyntaxHighlighter Value="Delphi"/>505 </Unit46>506 <Unit47>507 <Filename Value="..\Compiler\Produce\UProducer.pas"/>508 <UnitName Value="UProducer"/>509 <WindowIndex Value="0"/>510 <TopLine Value="1"/>511 <CursorPos X="56" Y="9"/>512 <UsageCount Value="32"/>513 <DefaultSyntaxHighlighter Value="Delphi"/>514 </Unit47>515 <Unit48>516 <Filename Value="..\Compiler\Analyze\UAnalyzer.pas"/>517 <UnitName Value="UAnalyzer"/>518 <WindowIndex Value="0"/>519 <TopLine Value="1"/>520 <CursorPos X="46" Y="10"/>521 <UsageCount Value="41"/>522 <DefaultSyntaxHighlighter Value="Delphi"/>523 </Unit48>524 <Unit49>525 <Filename Value="..\Compiler\Analyze\UAnalyzerPascal.pas"/>526 <UnitName Value="UAnalyzerPascal"/>527 <WindowIndex Value="0"/>528 <TopLine Value="877"/>529 <CursorPos X="65" Y="890"/>530 <UsageCount Value="41"/>531 <DefaultSyntaxHighlighter Value="Delphi"/>532 </Unit49>533 <Unit50>534 <Filename Value="..\Compiler\Produce\UProducerPascal.pas"/>535 <UnitName Value="UProducerPascal"/>536 <WindowIndex Value="0"/>537 <TopLine Value="248"/>538 <CursorPos X="37" Y="261"/>539 <UsageCount Value="41"/>540 <DefaultSyntaxHighlighter Value="Delphi"/>541 </Unit50>542 <Unit51>543 <Filename Value="..\Compiler\Produce\UProducerDynamicC.pas"/>544 <UnitName Value="UProducerDynamicC"/>545 <WindowIndex Value="0"/>546 <TopLine Value="10"/>547 <CursorPos X="40" Y="23"/>548 <UsageCount Value="29"/>549 <DefaultSyntaxHighlighter Value="Delphi"/>550 </Unit51>551 <Unit52>552 <Filename Value="..\Compiler\Produce\UProducerAsm8051.pas"/>553 <UnitName Value="UProducerAsm8051"/>554 <WindowIndex Value="0"/>555 <TopLine Value="107"/>556 <CursorPos X="22" Y="110"/>557 <UsageCount Value="4"/>558 <DefaultSyntaxHighlighter Value="Delphi"/>559 </Unit52>560 <Unit53>561 <Filename Value="..\Compiler\Produce\UProducerGCCC.pas"/>562 <UnitName Value="UProducerGCCC"/>563 <WindowIndex Value="0"/>564 <TopLine Value="16"/>565 <CursorPos X="33" Y="26"/>566 <UsageCount Value="11"/>567 <DefaultSyntaxHighlighter Value="Delphi"/>568 </Unit53>569 <Unit54>570 <Filename Value="..\Compiler\USourceCode.pas"/>571 <UnitName Value="USourceCode"/>572 <WindowIndex Value="0"/>573 <TopLine Value="1"/>574 <CursorPos X="45" Y="9"/>575 <UsageCount Value="41"/>576 <DefaultSyntaxHighlighter Value="Delphi"/>577 </Unit54>578 <Unit55>579 <Filename Value="..\Compiler\TranspascalCompiler.pas"/>580 <UnitName Value="TranspascalCompiler"/>581 <WindowIndex Value="0"/>582 <TopLine Value="1"/>583 <CursorPos X="55" Y="19"/>584 <UsageCount Value="4"/>585 <DefaultSyntaxHighlighter Value="Delphi"/>586 </Unit55>587 <Unit56>588 <Filename Value="..\Compiler\Analyze\UGrammer.pas"/>589 <UnitName Value="UGrammer"/>590 <WindowIndex Value="0"/>591 <TopLine Value="1"/>592 <CursorPos X="26" Y="5"/>593 <UsageCount Value="4"/>594 <DefaultSyntaxHighlighter Value="Delphi"/>595 </Unit56>596 <Unit57>597 <Filename Value="..\Compiler\Analyze\UAnalyzers.pas"/>598 <UnitName Value="UAnalyzers"/>599 <WindowIndex Value="0"/>600 <TopLine Value="1"/>601 <CursorPos X="37" Y="12"/>602 <UsageCount Value="30"/>603 <DefaultSyntaxHighlighter Value="Delphi"/>604 </Unit57>605 <Unit58>606 <Filename Value="..\Compiler\Produce\UProducers.pas"/>607 <UnitName Value="UProducers"/>608 <WindowIndex Value="0"/>609 <TopLine Value="12"/>610 <CursorPos X="38" Y="26"/>611 <UsageCount Value="30"/>612 <DefaultSyntaxHighlighter Value="Delphi"/>613 </Unit58>614 <Unit59>615 <Filename Value="E:\Programy\Lazarus\lcl\stdctrls.pp"/>616 <UnitName Value="StdCtrls"/>617 <WindowIndex Value="0"/>618 <TopLine Value="250"/>619 <CursorPos X="15" Y="368"/>620 <UsageCount Value="12"/>621 <DefaultSyntaxHighlighter Value="Delphi"/>622 </Unit59>623 <Unit60>624 <Filename Value="E:\Programy\Lazarus\lcl\include\fileutil.inc"/>625 <WindowIndex Value="0"/>626 <TopLine Value="628"/>627 <CursorPos X="1" Y="649"/>628 <UsageCount Value="30"/>629 <DefaultSyntaxHighlighter Value="Delphi"/>630 </Unit60>631 <Unit61>632 <Filename Value="E:\Projekty\PascalClassLibrary\Generics\TemplateGenerics\Generic\GenericObjectList.inc"/>633 <WindowIndex Value="0"/>634 <TopLine Value="70"/>635 <CursorPos X="1" Y="78"/>636 <UsageCount Value="13"/>637 <DefaultSyntaxHighlighter Value="Delphi"/>638 </Unit61>639 <Unit62>640 <Filename Value="E:\Projekty\PascalClassLibrary\Generics\TemplateGenerics\Specialized\SpecializedObjectList.pas"/>641 <UnitName Value="SpecializedObjectList"/>642 <WindowIndex Value="0"/>643 <TopLine Value="1"/>644 <CursorPos X="1" Y="1"/>645 <UsageCount Value="10"/>646 <DefaultSyntaxHighlighter Value="Delphi"/>647 </Unit62>648 <Unit63>649 <Filename Value="E:\Programy\Lazarus\fpc\2.4.3\source\rtl\objpas\classes\classesh.inc"/>650 <WindowIndex Value="0"/>651 <TopLine Value="284"/>652 <CursorPos X="15" Y="297"/>653 <UsageCount Value="18"/>654 <DefaultSyntaxHighlighter Value="Delphi"/>655 </Unit63>656 <Unit64>657 <Filename Value="E:\Programy\Lazarus\fpc\2.4.3\source\rtl\objpas\classes\stringl.inc"/>658 <WindowIndex Value="0"/>659 <TopLine Value="428"/>660 <CursorPos X="3" Y="441"/>661 <UsageCount Value="15"/>662 <DefaultSyntaxHighlighter Value="Delphi"/>663 </Unit64>664 <Unit65>665 <Filename Value="E:\Programy\Lazarus\components\synedit\synedit.pp"/>666 <UnitName Value="SynEdit"/>667 <WindowIndex Value="0"/>668 <TopLine Value="4144"/>669 <CursorPos X="21" Y="4146"/>670 <UsageCount Value="14"/>671 <DefaultSyntaxHighlighter Value="Delphi"/>672 </Unit65>673 <Unit66>674 <Filename Value="E:\Programy\Lazarus\components\synedit\syneditmiscclasses.pp"/>675 <UnitName Value="SynEditMiscClasses"/>676 <WindowIndex Value="0"/>677 <TopLine Value="93"/>678 <CursorPos X="43" Y="112"/>679 <UsageCount Value="14"/>680 <DefaultSyntaxHighlighter Value="Delphi"/>681 </Unit66>682 <Unit67>683 <Filename Value="E:\Programy\Lazarus\lcl\include\treeview.inc"/>684 <WindowIndex Value="0"/>685 <TopLine Value="60"/>686 <CursorPos X="1" Y="73"/>687 <UsageCount Value="11"/>688 <DefaultSyntaxHighlighter Value="Delphi"/>689 </Unit67>690 <Unit68>691 <Filename Value="E:\Programy\Lazarus\lcl\comctrls.pp"/>692 <UnitName Value="ComCtrls"/>693 <WindowIndex Value="0"/>694 <TopLine Value="2650"/>695 <CursorPos X="27" Y="2663"/>696 <UsageCount Value="11"/>697 <DefaultSyntaxHighlighter Value="Delphi"/>698 </Unit68>699 <Unit69>700 <Filename Value="E:\Programy\Lazarus\lcl\include\listitem.inc"/>701 <WindowIndex Value="0"/>702 <TopLine Value="529"/>703 <CursorPos X="27" Y="546"/>704 <UsageCount Value="11"/>705 <DefaultSyntaxHighlighter Value="Delphi"/>706 </Unit69>707 <Unit70>708 <Filename Value="E:\Programy\Lazarus\fpc\2.4.3\source\rtl\objpas\classes\persist.inc"/>709 <WindowIndex Value="0"/>710 <TopLine Value="18"/>711 <CursorPos X="34" Y="27"/>712 <UsageCount Value="10"/>713 <DefaultSyntaxHighlighter Value="Delphi"/>714 </Unit70>715 <Unit71>716 <Filename Value="E:\Programy\Lazarus\fpc\2.4.3\source\rtl\objpas\rtlconst.inc"/>717 <WindowIndex Value="0"/>718 <TopLine Value="21"/>719 <CursorPos X="3" Y="34"/>720 <UsageCount Value="10"/>721 <DefaultSyntaxHighlighter Value="Delphi"/>722 </Unit71>723 <Unit72>724 <Filename Value="E:\Programy\Lazarus\fpc\2.4.3\source\packages\fcl-base\src\contnrs.pp"/>725 <UnitName Value="contnrs"/>726 <WindowIndex Value="0"/>727 <TopLine Value="59"/>728 <CursorPos X="26" Y="72"/>729 <UsageCount Value="12"/>730 <DefaultSyntaxHighlighter Value="Delphi"/>731 </Unit72>732 <Unit73>733 <Filename Value="E:\Programy\Lazarus\fpc\2.4.3\source\rtl\objpas\classes\lists.inc"/>734 <WindowIndex Value="0"/>735 <TopLine Value="841"/>736 <CursorPos X="3" Y="843"/>737 <UsageCount Value="12"/>738 <DefaultSyntaxHighlighter Value="Delphi"/>739 </Unit73>740 <Unit74>741 <Filename Value="E:\Projekty\PascalClassLibrary\Generics\TemplateGenerics\Specialized\SpecializedList.pas"/>742 <UnitName Value="SpecializedList"/>743 <WindowIndex Value="0"/>744 <TopLine Value="28"/>745 <CursorPos X="1" Y="1"/>746 <UsageCount Value="12"/>747 <DefaultSyntaxHighlighter Value="Delphi"/>748 </Unit74>749 <Unit75>750 <Filename Value="E:\Projekty\PascalClassLibrary\Generics\TemplateGenerics\Generic\GenericMatrix.inc"/>751 <WindowIndex Value="0"/>752 <TopLine Value="14"/>753 <CursorPos X="31" Y="21"/>754 <UsageCount Value="11"/>755 <DefaultSyntaxHighlighter Value="Delphi"/>756 </Unit75>757 <Unit76>758 <Filename Value="E:\Projekty\PascalClassLibrary\Generics\TemplateGenerics\Specialized\SpecializedMatrix.pas"/>759 <UnitName Value="SpecializedMatrix"/>760 <WindowIndex Value="0"/>761 <TopLine Value="1"/>762 <CursorPos X="1" Y="1"/>763 <UsageCount Value="11"/>764 <DefaultSyntaxHighlighter Value="Delphi"/>765 </Unit76>766 <Unit77>767 <Filename Value="..\..\..\FreePascalManager\trunk\Instance\1\Lazarus\lcl\include\control.inc"/>768 <WindowIndex Value="0"/>769 <TopLine Value="3171"/>770 <CursorPos X="1" Y="3187"/>771 <UsageCount Value="10"/>772 <DefaultSyntaxHighlighter Value="Delphi"/>773 </Unit77>774 <Unit78>775 <Filename Value="..\..\..\FreePascalManager\trunk\Instance\1\Lazarus\lcl\interfaces\gtk2\gtk2listviewtreemodel.pas"/>776 <UnitName Value="Gtk2ListViewTreeModel"/>777 <WindowIndex Value="0"/>778 <TopLine Value="198"/>779 <CursorPos X="57" Y="219"/>780 <UsageCount Value="10"/>781 <DefaultSyntaxHighlighter Value="Delphi"/>782 </Unit78>783 <Unit79>784 <Filename Value="..\..\..\FreePascalManager\trunk\Instance\1\Lazarus\lcl\interfaces\gtk2\gtk2proc.inc"/>785 <WindowIndex Value="0"/>786 <TopLine Value="3618"/>787 <CursorPos X="54" Y="3631"/>788 <UsageCount Value="10"/>789 <DefaultSyntaxHighlighter Value="Delphi"/>790 </Unit79>791 <Unit80>792 <Filename Value="..\..\..\PascalClassLibrary\Docking\CoolDocking\Managers\UCDManagerTabs.pas"/>793 <UnitName Value="UCDManagerTabs"/>794 <WindowIndex Value="0"/>795 <TopLine Value="172"/>796 <CursorPos X="1" Y="188"/>797 <UsageCount Value="10"/>798 </Unit80>799 <Unit81>800 <Filename Value="..\..\..\FreePascalManager\trunk\Instance\1\Lazarus\lcl\interfaces\gtk2\gtk2wsforms.pp"/>801 <UnitName Value="Gtk2WSForms"/>802 <WindowIndex Value="0"/>803 <TopLine Value="123"/>804 <CursorPos X="30" Y="131"/>805 <UsageCount Value="10"/>806 <DefaultSyntaxHighlighter Value="Delphi"/>807 </Unit81>808 <Unit82>809 <Filename Value="..\..\..\..\lazarus\lcl\interfaces\gtk2\gtk2lclintf.inc"/>810 <EditorIndex Value="0"/>811 <WindowIndex Value="0"/>812 <TopLine Value="789"/>813 <CursorPos X="43" Y="806"/>814 <UsageCount Value="13"/>815 <Loaded Value="True"/>816 </Unit82>817 <Unit83>818 <Filename Value="..\..\..\PascalClassLibrary\Generics\TemplateGenerics\Generic\GenericList.inc"/>819 <WindowIndex Value="0"/>820 <TopLine Value="11"/>821 <CursorPos X="1" Y="28"/>822 <UsageCount Value="10"/>823 </Unit83>824 <Unit84>825 <Filename Value="..\..\..\PascalClassLibrary\Docking\CoolDocking\UCDManager.pas"/>826 <UnitName Value="UCDManager"/>827 <WindowIndex Value="0"/>828 <TopLine Value="674"/>829 <CursorPos X="57" Y="691"/>830 <UsageCount Value="12"/>831 </Unit84>832 <Unit85>833 <Filename Value="..\..\..\..\lazarus\lcl\include\customcontrol.inc"/>834 <WindowIndex Value="0"/>835 <TopLine Value="62"/>836 <CursorPos X="1" Y="79"/>837 <UsageCount Value="12"/>838 </Unit85>839 <Unit86>840 <Filename Value="..\..\..\..\lazarus\lcl\include\wincontrol.inc"/>841 <WindowIndex Value="0"/>842 <TopLine Value="7596"/>843 <CursorPos X="1" Y="7613"/>844 <UsageCount Value="12"/>845 </Unit86>846 <Unit87>847 <Filename Value="..\..\..\..\lazarus\lcl\interfaces\gtk2\gtk2callback.inc"/>848 <WindowIndex Value="0"/>849 <TopLine Value="1727"/>850 <CursorPos X="21" Y="1743"/>851 <UsageCount Value="12"/>852 </Unit87>853 <Unit88>854 <Filename Value="..\..\..\Transpascal2\trunk\Compiler\Produce\UProducerDynamicC.pas"/>855 <UnitName Value="UProducerDynamicC"/>856 <EditorIndex Value="7"/>857 <WindowIndex Value="0"/>858 <TopLine Value="79"/>859 <CursorPos X="26" Y="133"/>860 <UsageCount Value="13"/>861 <Loaded Value="True"/>862 </Unit88>863 <Unit89>864 <Filename Value="..\..\..\..\lazarus\lcl\include\dragmanager.inc"/>865 <EditorIndex Value="8"/>866 <WindowIndex Value="0"/>867 <TopLine Value="549"/>868 <CursorPos X="84" Y="553"/>869 <UsageCount Value="13"/>870 <Loaded Value="True"/>871 </Unit89>872 <Unit90>873 <Filename Value="..\..\..\Transpascal2\trunk\Compiler\Analyze\UAnalyzer.pas"/>874 <UnitName Value="UAnalyzer"/>875 <EditorIndex Value="9"/>876 <WindowIndex Value="0"/>877 <TopLine Value="1"/>878 <CursorPos X="1" Y="1"/>879 <UsageCount Value="13"/>880 <Loaded Value="True"/>881 </Unit90>882 <Unit91>883 <Filename Value="..\..\..\Transpascal2\trunk\Compiler\USourceCode.pas"/>884 <UnitName Value="USourceCode"/>885 <IsVisibleTab Value="True"/>886 <EditorIndex Value="10"/>887 <WindowIndex Value="0"/>888 <TopLine Value="909"/>889 <CursorPos X="6" Y="46"/>890 <UsageCount Value="13"/>891 <Loaded Value="True"/>892 </Unit91>893 <Unit92>894 <Filename Value="..\..\..\Transpascal2\trunk\Compiler\Analyze\UAnalyzerPascal.pas"/>895 <UnitName Value="UAnalyzerPascal"/>896 <EditorIndex Value="11"/>897 <WindowIndex Value="0"/>898 <TopLine Value="1408"/>899 <CursorPos X="57" Y="1428"/>900 <UsageCount Value="13"/>901 <Loaded Value="True"/>902 </Unit92>903 <Unit93>904 <Filename Value="..\..\..\Transpascal2\trunk\Compiler\UCompiler.pas"/>905 <UnitName Value="UCompiler"/>906 <EditorIndex Value="2"/>907 <WindowIndex Value="0"/>908 <TopLine Value="20"/>909 <CursorPos X="15" Y="37"/>910 <UsageCount Value="11"/>911 <Loaded Value="True"/>912 </Unit93>913 <Unit94>914 <Filename Value="..\..\..\Transpascal2\trunk\Compiler\Produce\UProducerGCCC.pas"/>915 <UnitName Value="UProducerGCCC"/>916 <EditorIndex Value="5"/>917 <WindowIndex Value="0"/>918 <TopLine Value="62"/>919 <CursorPos X="1" Y="1"/>920 <UsageCount Value="11"/>921 <Loaded Value="True"/>922 </Unit94>923 <Unit95>924 <Filename Value="..\..\..\Transpascal2\trunk\Compiler\Produce\UProducers.pas"/>925 <UnitName Value="UProducers"/>926 <EditorIndex Value="6"/>927 <WindowIndex Value="0"/>928 <TopLine Value="1"/>929 <CursorPos X="55" Y="20"/>930 <UsageCount Value="11"/>931 <Loaded Value="True"/>932 </Unit95>933 <Unit96>934 <Filename Value="..\..\..\Transpascal2\trunk\Compiler\Produce\UProducer.pas"/>935 <UnitName Value="UProducer"/>936 <EditorIndex Value="3"/>937 <WindowIndex Value="0"/>938 <TopLine Value="1"/>939 <CursorPos X="3" Y="15"/>940 <UsageCount Value="11"/>941 <Loaded Value="True"/>942 </Unit96>943 195 </Units> 944 <JumpHistory Count="8" HistoryIndex="7">945 <Position1>946 <Filename Value="..\..\..\..\lazarus\lcl\interfaces\gtk2\gtk2lclintf.inc"/>947 <Caret Line="802" Column="12" TopLine="789"/>948 </Position1>949 <Position2>950 <Filename Value="..\..\..\Transpascal2\trunk\Compiler\Produce\UProducerDynamicC.pas"/>951 <Caret Line="133" Column="26" TopLine="79"/>952 </Position2>953 <Position3>954 <Filename Value="Forms\UMainForm.pas"/>955 <Caret Line="183" Column="41" TopLine="170"/>956 </Position3>957 <Position4>958 <Filename Value="Transpascal.lpr"/>959 <Caret Line="22" Column="3" TopLine="1"/>960 </Position4>961 <Position5>962 <Filename Value="Forms\UMainForm.pas"/>963 <Caret Line="184" Column="41" TopLine="171"/>964 </Position5>965 <Position6>966 <Filename Value="..\..\..\Transpascal2\trunk\Compiler\UCompiler.pas"/>967 <Caret Line="12" Column="1" TopLine="1"/>968 </Position6>969 <Position7>970 <Filename Value="..\..\..\Transpascal2\trunk\Compiler\UCompiler.pas"/>971 <Caret Line="54" Column="67" TopLine="21"/>972 </Position7>973 <Position8>974 <Filename Value="Forms\UMainForm.pas"/>975 <Caret Line="272" Column="3" TopLine="255"/>976 </Position8>977 </JumpHistory>978 196 </ProjectOptions> 979 197 <CompilerOptions> 980 <Version Value="1 0"/>198 <Version Value="11"/> 981 199 <PathDelim Value="\"/> 200 <Target> 201 <Filename Value="Transpascal"/> 202 </Target> 982 203 <SearchPaths> 983 204 <IncludeFiles Value="$(ProjOutDir)"/> … … 1003 224 <Linking> 1004 225 <Debugging> 1005 <GenerateDebugInfo Value="True"/> 226 <UseHeaptrc Value="True"/> 227 <UseExternalDbgSyms Value="True"/> 1006 228 </Debugging> 1007 229 <Options> -
trunk/IDE/Transpascal.lpr
r30 r34 7 7 cthreads, 8 8 {$ENDIF}{$ENDIF} 9 Forms, CoolDocking,Interfaces, SysUtils,9 Forms, Interfaces, SysUtils, 10 10 UMainForm in 'UMainForm.pas' {MainForm}, 11 UTextSource in 'UTextSource.pas', UProject, UApplicationInfo, URegistry,12 U LastOpenedList, UDebugLog, TranspascalCompiler, UProjectManager, UCodeForm,13 U MessagesForm, UCompiledForm, UCodeTreeForm, TemplateGenerics;11 UTextSource, UProject, UApplicationInfo, URegistry, ULastOpenedList, 12 UDebugLog, TranspascalCompiler, UProjectManager, UCodeForm, UMessagesForm, 13 UCompiledForm, UCodeTreeForm, TemplateGenerics, Common, UAboutForm; 14 14 15 15 {$R *.res} … … 31 31 Application.CreateForm(TCompiledForm, CompiledForm); 32 32 Application.CreateForm(TCodeTreeForm, CodeTreeForm); 33 Application.CreateForm(TAboutForm, AboutForm); 33 34 Application.Run; 34 35 end. -
trunk/IDE/UApplicationInfo.pas
r24 r34 16 16 TApplicationInfo = class 17 17 private 18 function GetVersion: string;18 function GetVersion: string; 19 19 public 20 20 Name: string; … … 23 23 MinorVersion: Byte; 24 24 BugFixVersion: Byte; 25 VersionSufix: string; // alfa, beta, RC1, RC2, ... 25 26 CompanyName: string; 26 27 CompanyHomePage: string; 27 28 HomePage: string; 28 Author Name: string;29 AuthorsName: string; 29 30 EmailContact: string; 30 ReleaseDate: string; 31 ReleaseDate: TDateTime; 32 RegistryKey: string; 31 33 property Version: string read GetVersion; 32 34 end; … … 39 41 { TApplicationInfo } 40 42 41 function TApplicationInfo.GetVersion: string;43 function TApplicationInfo.GetVersion: string; 42 44 begin 43 Result := IntToStr(MajorVersion) + '.' + IntToStr(MinorVersion) + 44 '.' + IntToStr(BugFixVersion); 45 Result := IntToStr(MajorVersion) + '.' + IntToStr(MinorVersion); 46 if VersionSufix <> '' then Result := Result + ' ' + VersionSufix 47 else Result := Result + '.' + IntToStr(BugFixVersion); 45 48 end; 46 49 … … 52 55 Name := 'Transpascal IDE'; 53 56 Identification := 1; 54 ReleaseDate := '22.10.2010';57 ReleaseDate := EncodeDate(2012, 2, 13); 55 58 MajorVersion := 0; 56 59 MinorVersion := 1; 57 60 BugFixVersion := 0; 58 CompanyName := ''; 59 CompanyHomepage := ''; 60 HomePage := ''; 61 AuthorName := 'Chronos'; 62 EmailContact := ''; 61 VersionSufix := 'alfa'; 62 CompanyName := 'Chronosoft'; 63 CompanyHomepage := 'http://svn.zdechov.net/trac/LazFuck'; 64 HomePage := 'http://svn.zdechov.net/trac/LazFuck'; 65 AuthorsName := 'Chronos'; 66 EmailContact := 'robie@centrum.cz'; 67 RegistryKey := '\Software\Chronosoft\Transpascal'; 63 68 end; 64 69
Note:
See TracChangeset
for help on using the changeset viewer.