- Timestamp:
- Apr 25, 2011, 7:46:28 PM (14 years ago)
- Location:
- trunk/IDE
- Files:
-
- 10 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/IDE/Forms/UCodeForm.lfm
r23 r30 727 727 end 728 728 end 729 object CoolDockClient1: TC oolDockClient729 object CoolDockClient1: TCDClient 730 730 Floatable = False 731 731 Master = MainForm.CoolDockMaster1 -
trunk/IDE/Forms/UCodeForm.pas
r24 r30 6 6 7 7 uses 8 Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, UC oolDocking,8 Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, UCDClient, 9 9 SynEdit, SynHighlighterPas, UProject; 10 10 … … 14 14 15 15 TCodeForm = class(TForm) 16 CoolDockClient1: TC oolDockClient;16 CoolDockClient1: TCDClient; 17 17 SynEditSource: TSynEdit; 18 18 SynPasSyn1: TSynPasSyn; -
trunk/IDE/Forms/UCompiledForm.lfm
r2 r30 727 727 end 728 728 end 729 object CoolDockClient1: TC oolDockClient729 object CoolDockClient1: TCDClient 730 730 Floatable = False 731 731 Master = MainForm.CoolDockMaster1 -
trunk/IDE/Forms/UCompiledForm.pas
r12 r30 8 8 Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, SynEdit, 9 9 SynHighlighterMulti, SynHighlighterVB, SynHighlighterPas, SynHighlighterCpp, 10 SynHighlighterXML, UC oolDocking;10 SynHighlighterXML, UCDClient; 11 11 12 12 type … … 15 15 16 16 TCompiledForm = class(TForm) 17 CoolDockClient1: TC oolDockClient;17 CoolDockClient1: TCDClient; 18 18 SynCppSyn1: TSynCppSyn; 19 19 SynEdit1: TSynEdit; -
trunk/IDE/Forms/UMainForm.lfm
r27 r30 1 1 object MainForm: TMainForm 2 Left = 1462 Left = 240 3 3 Height = 501 4 Top = 884 Top = 119 5 5 Width = 695 6 6 Caption = 'Transpascal IDE' 7 ClientHeight = 4 827 ClientHeight = 478 8 8 ClientWidth = 695 9 9 Font.Height = -11 … … 20 20 Left = 0 21 21 Height = 5 22 Top = 47 722 Top = 473 23 23 Width = 695 24 24 Align = alBottom … … 27 27 object DockPanel: TPanel 28 28 Left = 0 29 Height = 4 5129 Height = 447 30 30 Top = 26 31 31 Width = 695 … … 43 43 object ComboBoxProducer: TComboBox 44 44 Left = 192 45 Height = 2 145 Height = 24 46 46 Top = 2 47 47 Width = 135 48 48 Align = alLeft 49 ItemHeight = 1349 ItemHeight = 0 50 50 ItemIndex = 1 51 51 Items.Strings = ( … … 73 73 Height = 24 74 74 Top = 2 75 Width = 1 0575 Width = 124 76 76 Align = alLeft 77 77 Caption = 'Log parsing to file' … … 80 80 object ComboBoxAnalyzer: TComboBox 81 81 Left = 40 82 Height = 2 182 Height = 24 83 83 Top = 2 84 84 Width = 124 85 85 Align = alLeft 86 ItemHeight = 1386 ItemHeight = 0 87 87 Style = csDropDownList 88 88 TabOrder = 3 … … 185 185 end 186 186 end 187 object CoolDockMaster1: TCoolDockMaster 187 object CoolDockMaster1: TCDMaster 188 Customize = CDCustomize1 188 189 TabsEnabled = True 189 190 DefaultTabsPos = hpAuto … … 191 192 DefaultMoveSpeed = 0 192 193 ShowIcons = False 193 left = 428 194 top = 56 195 end 196 object CoolDockClient1: TCoolDockClient 194 left = 504 195 top = 104 196 end 197 object CoolDockClient1: TCDClient 198 Master = CoolDockMaster1 199 Panel = DockPanel 197 200 Dockable = False 198 201 Floatable = False 199 Master = CoolDockMaster1200 Panel = DockPanel201 202 left = 504 202 203 top = 56 … … 212 213 top = 104 213 214 end 215 object CDWindowList1: TCDWindowList 216 left = 502 217 top = 157 218 end 219 object CDLayoutList1: TCDLayoutList 220 left = 502 221 top = 205 222 end 223 object CDCustomize1: TCDCustomize 224 Master = CoolDockMaster1 225 LayoutList = CDLayoutList1 226 left = 499 227 top = 260 228 end 229 object ImageList1: TImageList 230 left = 624 231 top = 112 232 end 214 233 end -
trunk/IDE/Forms/UMainForm.pas
r27 r30 6 6 7 7 uses 8 SysUtils, Variants, Classes, Graphics, Controls, Forms, 9 Dialogs, StdCtrls, UCompiler, Registry,10 ComCtrls, ExtCtrls, SynEdit, SynHighlighterPas,11 U Project, FileUtil, Menus, ActnList, UCoolDocking,12 UCo mpiledForm, UCodeTreeForm, URegistry, ULastOpenedList, UApplicationInfo,13 U DebugLog, UAnalyzer, UProducer;8 SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, 9 UCompiler, Registry, ComCtrls, ExtCtrls, SynEdit, SynHighlighterPas, 10 UCDManager, UProject, FileUtil, Menus, ActnList, UCDClient, UCDMaster, 11 UCDConjoinForm, UCDWindowList, UCDLayout, UCDCustomize, UCompiledForm, 12 UCodeTreeForm, URegistry, ULastOpenedList, UApplicationInfo, UDebugLog, 13 UAnalyzer, UProducer; 14 14 15 15 const … … 29 29 ActionList1: TActionList; 30 30 Button1: TButton; 31 CDCustomize1: TCDCustomize; 32 CDLayoutList1: TCDLayoutList; 33 CDWindowList1: TCDWindowList; 31 34 CheckBoxLogParsing: TCheckBox; 32 35 ComboBoxAnalyzer: TComboBox; 33 36 ComboBoxProducer: TComboBox; 34 CoolDockClient1: TCoolDockClient; 35 CoolDockMaster1: TCoolDockMaster; 37 CoolDockClient1: TCDClient; 38 CoolDockMaster1: TCDMaster; 39 ImageList1: TImageList; 36 40 Label1: TLabel; 37 41 Label2: TLabel; … … 81 85 MainForm: TMainForm; 82 86 87 83 88 implementation 84 89 … … 136 141 procedure TMainForm.DockInit; 137 142 var 138 Container1: TC oolDockConjoinForm;139 Container2: TC oolDockConjoinForm;143 Container1: TCDConjoinForm; 144 Container2: TCDConjoinForm; 140 145 begin 141 146 ProjectManager.ManualDock(DockPanel, nil, alLeft); 142 147 ProjectManager.Show; 143 148 144 Container1 := TC oolDockManager(DockPanel.DockManager).CreateContainer(alRight);149 Container1 := TCDManager(DockPanel.DockManager).CreateConjoinForm; 145 150 Container1.Caption := 'Tools'; 146 151 Container1.Name := 'Tools'; 147 152 Container1.ManualDock(DockPanel, nil, alRight); 148 149 CodeTreeForm.ManualDock(DockPanel, nil, alLeft); 153 Container1.Show; 154 Container1.Parent.Parent.Width := MainForm.Width; 155 156 CodeTreeForm.ManualDock(DockPanel, nil, alRight); 150 157 CodeTreeForm.Show; 151 Container1.Parent.Parent.Width := MainForm.Width; 152 153 Container2 := TCoolDockManager(DockPanel.DockManager).CreateContainer(alRight); 158 159 Container2 := TCDManager(DockPanel.DockManager).CreateConjoinForm; 154 160 Container2.Caption := 'Panel'; 155 161 Container2.Name := 'Tools2'; 156 Container2.ManualDock(Container1.Panel, nil, alRight); 157 158 MessagesForm.ManualDock(Container1.Panel, nil, alBottom); 162 Container2.ManualDock(Container1, nil, alRight); 163 Container2.Show; 164 165 MessagesForm.ManualDock(Container1, nil, alBottom); 159 166 MessagesForm.Show; 160 167 161 CodeForm.ManualDock(Container2 .Panel, nil, alTop);168 CodeForm.ManualDock(Container2, nil, alTop); 162 169 CodeForm.Show; 163 170 164 CompiledForm.ManualDock(Container2.Panel, nil, alTop); 165 CompiledForm.Show; 171 172 //CompiledForm.ManualDock(Container2.Panel, nil, alTop); 173 //CompiledForm.Show; 166 174 167 175 //TCoolDockManager(Container2.Panel.DockManager).DockStyle := dsTabs; 168 176 169 ProjectManager.Parent.Parent.Width :=200;177 Container1.Parent.Parent.Width := MainForm.Width - ProjectManager.Width - 200; 170 178 Container2.Parent.Parent.Height := MainForm.Height; 171 179 end; -
trunk/IDE/Forms/UMessagesForm.lfm
r24 r30 35 35 OnSelectItem = ListView1SelectItem 36 36 end 37 object CoolDockClient1: TC oolDockClient37 object CoolDockClient1: TCDClient 38 38 Floatable = False 39 39 Master = MainForm.CoolDockMaster1 -
trunk/IDE/Forms/UMessagesForm.pas
r24 r30 7 7 uses 8 8 Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, StdCtrls, 9 ComCtrls, UC oolDocking, UProject, UCompiler;9 ComCtrls, UCDClient, UProject, UCompiler; 10 10 11 11 type … … 14 14 15 15 TMessagesForm = class(TForm) 16 CoolDockClient1: TC oolDockClient;16 CoolDockClient1: TCDClient; 17 17 ListView1: TListView; 18 18 procedure ListBoxMessagesSelectionChange(Sender: TObject; User: boolean); -
trunk/IDE/Transpascal.lpi
r27 r30 35 35 </local> 36 36 </RunParams> 37 <RequiredPackages Count=" 5">37 <RequiredPackages Count="6"> 38 38 <Item1> 39 <PackageName Value="TemplateGenerics"/> 39 <PackageName Value="LCLBase"/> 40 <MinVersion Major="1" Release="1" Valid="True"/> 40 41 </Item1> 41 42 <Item2> 42 <PackageName Value="T ranspascalCompiler"/>43 <PackageName Value="TemplateGenerics"/> 43 44 </Item2> 44 45 <Item3> 45 <PackageName Value=" CoolDocking"/>46 <PackageName Value="TranspascalCompiler"/> 46 47 </Item3> 47 48 <Item4> 49 <PackageName Value="CoolDocking"/> 50 </Item4> 51 <Item5> 48 52 <PackageName Value="SynEdit"/> 49 53 <MinVersion Major="1" Valid="True"/> 50 </Item 4>51 <Item 5>54 </Item5> 55 <Item6> 52 56 <PackageName Value="LCL"/> 53 </Item 5>57 </Item6> 54 58 </RequiredPackages> 55 <Units Count=" 77">59 <Units Count="97"> 56 60 <Unit0> 57 61 <Filename Value="Transpascal.lpr"/> 58 62 <IsPartOfProject Value="True"/> 59 63 <UnitName Value="Transpascal"/> 60 <WindowIndex Value="0"/> 61 <TopLine Value="8"/> 62 <CursorPos X="36" Y="20"/> 64 <EditorIndex Value="4"/> 65 <WindowIndex Value="0"/> 66 <TopLine Value="1"/> 67 <CursorPos X="1" Y="19"/> 63 68 <UsageCount Value="215"/> 69 <Loaded Value="True"/> 64 70 <DefaultSyntaxHighlighter Value="Delphi"/> 65 71 </Unit0> … … 71 77 <ResourceBaseClass Value="Form"/> 72 78 <UnitName Value="UMainForm"/> 73 <IsVisibleTab Value="True"/> 74 <EditorIndex Value="0"/> 75 <WindowIndex Value="0"/> 76 <TopLine Value="1"/> 77 <CursorPos X="43" Y="9"/> 79 <EditorIndex Value="1"/> 80 <WindowIndex Value="0"/> 81 <TopLine Value="150"/> 82 <CursorPos X="80" Y="177"/> 78 83 <UsageCount Value="215"/> 79 84 <Loaded Value="True"/> … … 85 90 <IsPartOfProject Value="True"/> 86 91 <UnitName Value="UTextSource"/> 87 <EditorIndex Value="18"/>88 92 <WindowIndex Value="0"/> 89 93 <TopLine Value="1"/> 90 94 <CursorPos X="1" Y="6"/> 91 95 <UsageCount Value="215"/> 92 <Loaded Value="True"/>93 96 <DefaultSyntaxHighlighter Value="Delphi"/> 94 97 </Unit2> … … 118 121 <CursorPos X="34" Y="201"/> 119 122 <UsageCount Value="116"/> 123 <DefaultSyntaxHighlighter Value="Delphi"/> 120 124 </Unit5> 121 125 <Unit6> … … 126 130 <CursorPos X="1" Y="14"/> 127 131 <UsageCount Value="116"/> 132 <DefaultSyntaxHighlighter Value="Delphi"/> 128 133 </Unit6> 129 134 <Unit7> … … 134 139 <CursorPos X="42" Y="136"/> 135 140 <UsageCount Value="116"/> 141 <DefaultSyntaxHighlighter Value="Delphi"/> 136 142 </Unit7> 137 143 <Unit8> … … 142 148 <CursorPos X="47" Y="455"/> 143 149 <UsageCount Value="116"/> 150 <DefaultSyntaxHighlighter Value="Delphi"/> 144 151 </Unit8> 145 152 <Unit9> … … 150 157 <CursorPos X="27" Y="86"/> 151 158 <UsageCount Value="8"/> 159 <DefaultSyntaxHighlighter Value="Delphi"/> 152 160 </Unit9> 153 161 <Unit10> … … 157 165 <CursorPos X="7" Y="68"/> 158 166 <UsageCount Value="18"/> 167 <DefaultSyntaxHighlighter Value="Delphi"/> 159 168 </Unit10> 160 169 <Unit11> … … 164 173 <CursorPos X="16" Y="146"/> 165 174 <UsageCount Value="18"/> 175 <DefaultSyntaxHighlighter Value="Delphi"/> 166 176 </Unit11> 167 177 <Unit12> … … 172 182 <CursorPos X="1" Y="82"/> 173 183 <UsageCount Value="78"/> 184 <DefaultSyntaxHighlighter Value="Delphi"/> 174 185 </Unit12> 175 186 <Unit13> … … 180 191 <CursorPos X="1" Y="327"/> 181 192 <UsageCount Value="32"/> 193 <DefaultSyntaxHighlighter Value="Delphi"/> 182 194 </Unit13> 183 195 <Unit14> … … 185 197 <IsPartOfProject Value="True"/> 186 198 <UnitName Value="UProject"/> 187 <EditorIndex Value="6"/>188 199 <WindowIndex Value="0"/> 189 200 <TopLine Value="1"/> 190 201 <CursorPos X="14" Y="10"/> 191 202 <UsageCount Value="223"/> 192 <Loaded Value="True"/>193 203 <DefaultSyntaxHighlighter Value="Delphi"/> 194 204 </Unit14> … … 200 210 <CursorPos X="53" Y="92"/> 201 211 <UsageCount Value="96"/> 212 <DefaultSyntaxHighlighter Value="Delphi"/> 202 213 </Unit15> 203 214 <Unit16> … … 208 219 <CursorPos X="32" Y="17"/> 209 220 <UsageCount Value="97"/> 221 <DefaultSyntaxHighlighter Value="Delphi"/> 210 222 </Unit16> 211 223 <Unit17> … … 216 228 <CursorPos X="14" Y="58"/> 217 229 <UsageCount Value="96"/> 230 <DefaultSyntaxHighlighter Value="Delphi"/> 218 231 </Unit17> 219 232 <Unit18> … … 223 236 <ResourceBaseClass Value="Form"/> 224 237 <UnitName Value="UProjectManager"/> 225 <EditorIndex Value="22"/>226 238 <WindowIndex Value="0"/> 227 239 <TopLine Value="68"/> 228 240 <CursorPos X="39" Y="82"/> 229 241 <UsageCount Value="207"/> 230 <Loaded Value="True"/>231 <LoadedDesigner Value="True"/>232 242 <DefaultSyntaxHighlighter Value="Delphi"/> 233 243 </Unit18> … … 238 248 <ResourceBaseClass Value="Form"/> 239 249 <UnitName Value="UCodeForm"/> 240 <EditorIndex Value="8"/>241 250 <WindowIndex Value="0"/> 242 251 <TopLine Value="36"/> 243 252 <CursorPos X="52" Y="50"/> 244 253 <UsageCount Value="207"/> 245 <Loaded Value="True"/>246 <LoadedDesigner Value="True"/>247 254 <DefaultSyntaxHighlighter Value="Delphi"/> 248 255 </Unit19> … … 253 260 <ResourceBaseClass Value="Form"/> 254 261 <UnitName Value="UMessagesForm"/> 255 <EditorIndex Value="11"/>256 262 <WindowIndex Value="0"/> 257 263 <TopLine Value="47"/> 258 264 <CursorPos X="5" Y="54"/> 259 265 <UsageCount Value="207"/> 260 <Loaded Value="True"/>261 <LoadedDesigner Value="True"/>262 266 <DefaultSyntaxHighlighter Value="Delphi"/> 263 267 </Unit20> … … 294 298 <CursorPos X="93" Y="154"/> 295 299 <UsageCount Value="74"/> 300 <DefaultSyntaxHighlighter Value="Delphi"/> 296 301 </Unit23> 297 302 <Unit24> … … 319 324 <IsPartOfProject Value="True"/> 320 325 <UnitName Value="UApplicationInfo"/> 321 <EditorIndex Value="5"/>322 326 <WindowIndex Value="0"/> 323 327 <TopLine Value="43"/> 324 328 <CursorPos X="27" Y="52"/> 325 329 <UsageCount Value="200"/> 326 <Loaded Value="True"/>327 330 <DefaultSyntaxHighlighter Value="Delphi"/> 328 331 </Unit26> … … 334 337 <CursorPos X="39" Y="283"/> 335 338 <UsageCount Value="107"/> 339 <DefaultSyntaxHighlighter Value="Delphi"/> 336 340 </Unit27> 337 341 <Unit28> … … 342 346 <CursorPos X="68" Y="156"/> 343 347 <UsageCount Value="71"/> 348 <DefaultSyntaxHighlighter Value="Delphi"/> 344 349 </Unit28> 345 350 <Unit29> … … 350 355 <CursorPos X="64" Y="322"/> 351 356 <UsageCount Value="104"/> 357 <DefaultSyntaxHighlighter Value="Delphi"/> 352 358 </Unit29> 353 359 <Unit30> … … 358 364 <CursorPos X="32" Y="279"/> 359 365 <UsageCount Value="104"/> 366 <DefaultSyntaxHighlighter Value="Delphi"/> 360 367 </Unit30> 361 368 <Unit31> … … 366 373 <CursorPos X="1" Y="28"/> 367 374 <UsageCount Value="21"/> 375 <DefaultSyntaxHighlighter Value="Delphi"/> 368 376 </Unit31> 369 377 <Unit32> … … 383 391 <CursorPos X="5" Y="370"/> 384 392 <UsageCount Value="1"/> 393 <DefaultSyntaxHighlighter Value="Delphi"/> 385 394 </Unit33> 386 395 <Unit34> … … 391 400 <CursorPos X="14" Y="39"/> 392 401 <UsageCount Value="101"/> 402 <DefaultSyntaxHighlighter Value="Delphi"/> 393 403 </Unit34> 394 404 <Unit35> … … 432 442 <CursorPos X="84" Y="48"/> 433 443 <UsageCount Value="8"/> 444 <DefaultSyntaxHighlighter Value="Delphi"/> 434 445 </Unit39> 435 446 <Unit40> … … 439 450 <CursorPos X="43" Y="102"/> 440 451 <UsageCount Value="8"/> 452 <DefaultSyntaxHighlighter Value="Delphi"/> 441 453 </Unit40> 442 454 <Unit41> … … 447 459 <CursorPos X="44" Y="6"/> 448 460 <UsageCount Value="12"/> 461 <DefaultSyntaxHighlighter Value="Delphi"/> 449 462 </Unit41> 450 463 <Unit42> … … 455 468 <CursorPos X="2" Y="35"/> 456 469 <UsageCount Value="12"/> 470 <DefaultSyntaxHighlighter Value="Delphi"/> 457 471 </Unit42> 458 472 <Unit43> 459 473 <Filename Value="E:\Projekty\PascalClassLibrary\Generics\TemplateGenerics\Generic\GenericList.inc"/> 460 <EditorIndex Value="16"/>461 474 <WindowIndex Value="0"/> 462 475 <TopLine Value="1"/> 463 476 <CursorPos X="23" Y="5"/> 464 477 <UsageCount Value="84"/> 465 < Loaded Value="True"/>478 <DefaultSyntaxHighlighter Value="Delphi"/> 466 479 </Unit43> 467 480 <Unit44> … … 471 484 <CursorPos X="10" Y="120"/> 472 485 <UsageCount Value="72"/> 486 <DefaultSyntaxHighlighter Value="Delphi"/> 473 487 </Unit44> 474 488 <Unit45> … … 479 493 <CursorPos X="1" Y="12"/> 480 494 <UsageCount Value="71"/> 495 <DefaultSyntaxHighlighter Value="Delphi"/> 481 496 </Unit45> 482 497 <Unit46> 483 498 <Filename Value="..\Compiler\UCompiler.pas"/> 484 499 <UnitName Value="UCompiler"/> 485 <EditorIndex Value="12"/>486 500 <WindowIndex Value="0"/> 487 501 <TopLine Value="43"/> 488 502 <CursorPos X="31" Y="56"/> 489 503 <UsageCount Value="42"/> 490 < Loaded Value="True"/>504 <DefaultSyntaxHighlighter Value="Delphi"/> 491 505 </Unit46> 492 506 <Unit47> 493 507 <Filename Value="..\Compiler\Produce\UProducer.pas"/> 494 508 <UnitName Value="UProducer"/> 495 <EditorIndex Value="7"/>496 509 <WindowIndex Value="0"/> 497 510 <TopLine Value="1"/> 498 511 <CursorPos X="56" Y="9"/> 499 512 <UsageCount Value="32"/> 500 < Loaded Value="True"/>513 <DefaultSyntaxHighlighter Value="Delphi"/> 501 514 </Unit47> 502 515 <Unit48> 503 516 <Filename Value="..\Compiler\Analyze\UAnalyzer.pas"/> 504 517 <UnitName Value="UAnalyzer"/> 505 <EditorIndex Value="13"/>506 518 <WindowIndex Value="0"/> 507 519 <TopLine Value="1"/> 508 520 <CursorPos X="46" Y="10"/> 509 521 <UsageCount Value="41"/> 510 < Loaded Value="True"/>522 <DefaultSyntaxHighlighter Value="Delphi"/> 511 523 </Unit48> 512 524 <Unit49> 513 525 <Filename Value="..\Compiler\Analyze\UAnalyzerPascal.pas"/> 514 526 <UnitName Value="UAnalyzerPascal"/> 515 <EditorIndex Value="21"/>516 527 <WindowIndex Value="0"/> 517 528 <TopLine Value="877"/> 518 529 <CursorPos X="65" Y="890"/> 519 530 <UsageCount Value="41"/> 520 < Loaded Value="True"/>531 <DefaultSyntaxHighlighter Value="Delphi"/> 521 532 </Unit49> 522 533 <Unit50> 523 534 <Filename Value="..\Compiler\Produce\UProducerPascal.pas"/> 524 535 <UnitName Value="UProducerPascal"/> 525 <EditorIndex Value="14"/>526 536 <WindowIndex Value="0"/> 527 537 <TopLine Value="248"/> 528 538 <CursorPos X="37" Y="261"/> 529 539 <UsageCount Value="41"/> 530 < Loaded Value="True"/>540 <DefaultSyntaxHighlighter Value="Delphi"/> 531 541 </Unit50> 532 542 <Unit51> … … 537 547 <CursorPos X="40" Y="23"/> 538 548 <UsageCount Value="29"/> 549 <DefaultSyntaxHighlighter Value="Delphi"/> 539 550 </Unit51> 540 551 <Unit52> … … 545 556 <CursorPos X="22" Y="110"/> 546 557 <UsageCount Value="4"/> 558 <DefaultSyntaxHighlighter Value="Delphi"/> 547 559 </Unit52> 548 560 <Unit53> … … 553 565 <CursorPos X="33" Y="26"/> 554 566 <UsageCount Value="11"/> 567 <DefaultSyntaxHighlighter Value="Delphi"/> 555 568 </Unit53> 556 569 <Unit54> 557 570 <Filename Value="..\Compiler\USourceCode.pas"/> 558 571 <UnitName Value="USourceCode"/> 559 <EditorIndex Value="15"/>560 572 <WindowIndex Value="0"/> 561 573 <TopLine Value="1"/> 562 574 <CursorPos X="45" Y="9"/> 563 575 <UsageCount Value="41"/> 564 < Loaded Value="True"/>576 <DefaultSyntaxHighlighter Value="Delphi"/> 565 577 </Unit54> 566 578 <Unit55> … … 571 583 <CursorPos X="55" Y="19"/> 572 584 <UsageCount Value="4"/> 585 <DefaultSyntaxHighlighter Value="Delphi"/> 573 586 </Unit55> 574 587 <Unit56> … … 579 592 <CursorPos X="26" Y="5"/> 580 593 <UsageCount Value="4"/> 594 <DefaultSyntaxHighlighter Value="Delphi"/> 581 595 </Unit56> 582 596 <Unit57> … … 587 601 <CursorPos X="37" Y="12"/> 588 602 <UsageCount Value="30"/> 603 <DefaultSyntaxHighlighter Value="Delphi"/> 589 604 </Unit57> 590 605 <Unit58> … … 595 610 <CursorPos X="38" Y="26"/> 596 611 <UsageCount Value="30"/> 612 <DefaultSyntaxHighlighter Value="Delphi"/> 597 613 </Unit58> 598 614 <Unit59> 599 615 <Filename Value="E:\Programy\Lazarus\lcl\stdctrls.pp"/> 600 616 <UnitName Value="StdCtrls"/> 601 <EditorIndex Value="4"/>602 617 <WindowIndex Value="0"/> 603 618 <TopLine Value="250"/> 604 619 <CursorPos X="15" Y="368"/> 605 620 <UsageCount Value="12"/> 606 < Loaded Value="True"/>621 <DefaultSyntaxHighlighter Value="Delphi"/> 607 622 </Unit59> 608 623 <Unit60> … … 612 627 <CursorPos X="1" Y="649"/> 613 628 <UsageCount Value="30"/> 629 <DefaultSyntaxHighlighter Value="Delphi"/> 614 630 </Unit60> 615 631 <Unit61> … … 619 635 <CursorPos X="1" Y="78"/> 620 636 <UsageCount Value="13"/> 637 <DefaultSyntaxHighlighter Value="Delphi"/> 621 638 </Unit61> 622 639 <Unit62> … … 627 644 <CursorPos X="1" Y="1"/> 628 645 <UsageCount Value="10"/> 646 <DefaultSyntaxHighlighter Value="Delphi"/> 629 647 </Unit62> 630 648 <Unit63> 631 649 <Filename Value="E:\Programy\Lazarus\fpc\2.4.3\source\rtl\objpas\classes\classesh.inc"/> 632 <EditorIndex Value="2"/>633 650 <WindowIndex Value="0"/> 634 651 <TopLine Value="284"/> 635 652 <CursorPos X="15" Y="297"/> 636 653 <UsageCount Value="18"/> 637 < Loaded Value="True"/>654 <DefaultSyntaxHighlighter Value="Delphi"/> 638 655 </Unit63> 639 656 <Unit64> … … 643 660 <CursorPos X="3" Y="441"/> 644 661 <UsageCount Value="15"/> 662 <DefaultSyntaxHighlighter Value="Delphi"/> 645 663 </Unit64> 646 664 <Unit65> 647 665 <Filename Value="E:\Programy\Lazarus\components\synedit\synedit.pp"/> 648 666 <UnitName Value="SynEdit"/> 649 <EditorIndex Value="9"/>650 667 <WindowIndex Value="0"/> 651 668 <TopLine Value="4144"/> 652 669 <CursorPos X="21" Y="4146"/> 653 670 <UsageCount Value="14"/> 654 < Loaded Value="True"/>671 <DefaultSyntaxHighlighter Value="Delphi"/> 655 672 </Unit65> 656 673 <Unit66> 657 674 <Filename Value="E:\Programy\Lazarus\components\synedit\syneditmiscclasses.pp"/> 658 675 <UnitName Value="SynEditMiscClasses"/> 659 <EditorIndex Value="10"/>660 676 <WindowIndex Value="0"/> 661 677 <TopLine Value="93"/> 662 678 <CursorPos X="43" Y="112"/> 663 679 <UsageCount Value="14"/> 664 < Loaded Value="True"/>680 <DefaultSyntaxHighlighter Value="Delphi"/> 665 681 </Unit66> 666 682 <Unit67> … … 670 686 <CursorPos X="1" Y="73"/> 671 687 <UsageCount Value="11"/> 688 <DefaultSyntaxHighlighter Value="Delphi"/> 672 689 </Unit67> 673 690 <Unit68> … … 678 695 <CursorPos X="27" Y="2663"/> 679 696 <UsageCount Value="11"/> 697 <DefaultSyntaxHighlighter Value="Delphi"/> 680 698 </Unit68> 681 699 <Unit69> … … 685 703 <CursorPos X="27" Y="546"/> 686 704 <UsageCount Value="11"/> 705 <DefaultSyntaxHighlighter Value="Delphi"/> 687 706 </Unit69> 688 707 <Unit70> … … 692 711 <CursorPos X="34" Y="27"/> 693 712 <UsageCount Value="10"/> 713 <DefaultSyntaxHighlighter Value="Delphi"/> 694 714 </Unit70> 695 715 <Unit71> … … 699 719 <CursorPos X="3" Y="34"/> 700 720 <UsageCount Value="10"/> 721 <DefaultSyntaxHighlighter Value="Delphi"/> 701 722 </Unit71> 702 723 <Unit72> 703 724 <Filename Value="E:\Programy\Lazarus\fpc\2.4.3\source\packages\fcl-base\src\contnrs.pp"/> 704 725 <UnitName Value="contnrs"/> 705 <EditorIndex Value="1"/>706 726 <WindowIndex Value="0"/> 707 727 <TopLine Value="59"/> 708 728 <CursorPos X="26" Y="72"/> 709 729 <UsageCount Value="12"/> 710 < Loaded Value="True"/>730 <DefaultSyntaxHighlighter Value="Delphi"/> 711 731 </Unit72> 712 732 <Unit73> 713 733 <Filename Value="E:\Programy\Lazarus\fpc\2.4.3\source\rtl\objpas\classes\lists.inc"/> 714 <EditorIndex Value="3"/>715 734 <WindowIndex Value="0"/> 716 735 <TopLine Value="841"/> 717 736 <CursorPos X="3" Y="843"/> 718 737 <UsageCount Value="12"/> 719 < Loaded Value="True"/>738 <DefaultSyntaxHighlighter Value="Delphi"/> 720 739 </Unit73> 721 740 <Unit74> 722 741 <Filename Value="E:\Projekty\PascalClassLibrary\Generics\TemplateGenerics\Specialized\SpecializedList.pas"/> 723 742 <UnitName Value="SpecializedList"/> 724 <EditorIndex Value="20"/>725 743 <WindowIndex Value="0"/> 726 744 <TopLine Value="28"/> 727 745 <CursorPos X="1" Y="1"/> 728 746 <UsageCount Value="12"/> 729 < Loaded Value="True"/>747 <DefaultSyntaxHighlighter Value="Delphi"/> 730 748 </Unit74> 731 749 <Unit75> 732 750 <Filename Value="E:\Projekty\PascalClassLibrary\Generics\TemplateGenerics\Generic\GenericMatrix.inc"/> 733 <EditorIndex Value="17"/>734 751 <WindowIndex Value="0"/> 735 752 <TopLine Value="14"/> 736 753 <CursorPos X="31" Y="21"/> 737 754 <UsageCount Value="11"/> 738 < Loaded Value="True"/>755 <DefaultSyntaxHighlighter Value="Delphi"/> 739 756 </Unit75> 740 757 <Unit76> 741 758 <Filename Value="E:\Projekty\PascalClassLibrary\Generics\TemplateGenerics\Specialized\SpecializedMatrix.pas"/> 742 759 <UnitName Value="SpecializedMatrix"/> 743 <EditorIndex Value="19"/>744 760 <WindowIndex Value="0"/> 745 761 <TopLine Value="1"/> 746 762 <CursorPos X="1" Y="1"/> 747 763 <UsageCount Value="11"/> 748 < Loaded Value="True"/>764 <DefaultSyntaxHighlighter Value="Delphi"/> 749 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> 750 943 </Units> 751 <JumpHistory Count=" 30" HistoryIndex="29">944 <JumpHistory Count="8" HistoryIndex="7"> 752 945 <Position1> 753 <Filename Value="..\ Compiler\Analyze\UAnalyzerPascal.pas"/>754 <Caret Line=" 194" Column="77" TopLine="183"/>946 <Filename Value="..\..\..\..\lazarus\lcl\interfaces\gtk2\gtk2lclintf.inc"/> 947 <Caret Line="802" Column="12" TopLine="789"/> 755 948 </Position1> 756 949 <Position2> 757 <Filename Value="..\ Compiler\Analyze\UAnalyzerPascal.pas"/>758 <Caret Line=" 209" Column="17" TopLine="196"/>950 <Filename Value="..\..\..\Transpascal2\trunk\Compiler\Produce\UProducerDynamicC.pas"/> 951 <Caret Line="133" Column="26" TopLine="79"/> 759 952 </Position2> 760 953 <Position3> 761 <Filename Value=" ..\Compiler\Analyze\UAnalyzerPascal.pas"/>762 <Caret Line=" 210" Column="17" TopLine="197"/>954 <Filename Value="Forms\UMainForm.pas"/> 955 <Caret Line="183" Column="41" TopLine="170"/> 763 956 </Position3> 764 957 <Position4> 765 <Filename Value=" ..\Compiler\Analyze\UAnalyzerPascal.pas"/>766 <Caret Line=" 322" Column="19" TopLine="309"/>958 <Filename Value="Transpascal.lpr"/> 959 <Caret Line="22" Column="3" TopLine="1"/> 767 960 </Position4> 768 961 <Position5> 769 <Filename Value=" ..\Compiler\Analyze\UAnalyzerPascal.pas"/>770 <Caret Line=" 889" Column="23" TopLine="876"/>962 <Filename Value="Forms\UMainForm.pas"/> 963 <Caret Line="184" Column="41" TopLine="171"/> 771 964 </Position5> 772 965 <Position6> 773 <Filename Value="..\ Compiler\Produce\UProducerPascal.pas"/>774 <Caret Line="1 71" Column="52" TopLine="164"/>966 <Filename Value="..\..\..\Transpascal2\trunk\Compiler\UCompiler.pas"/> 967 <Caret Line="12" Column="1" TopLine="1"/> 775 968 </Position6> 776 969 <Position7> 777 <Filename Value="..\ Compiler\Produce\UProducerPascal.pas"/>778 <Caret Line=" 139" Column="12" TopLine="126"/>970 <Filename Value="..\..\..\Transpascal2\trunk\Compiler\UCompiler.pas"/> 971 <Caret Line="54" Column="67" TopLine="21"/> 779 972 </Position7> 780 973 <Position8> 781 <Filename Value=" ..\Compiler\Produce\UProducerPascal.pas"/>782 <Caret Line=" 140" Column="43" TopLine="127"/>974 <Filename Value="Forms\UMainForm.pas"/> 975 <Caret Line="272" Column="3" TopLine="255"/> 783 976 </Position8> 784 <Position9>785 <Filename Value="..\Compiler\Analyze\UAnalyzer.pas"/>786 <Caret Line="91" Column="1" TopLine="79"/>787 </Position9>788 <Position10>789 <Filename Value="Forms\UMainForm.pas"/>790 <Caret Line="9" Column="49" TopLine="1"/>791 </Position10>792 <Position11>793 <Filename Value="Forms\UMainForm.pas"/>794 <Caret Line="100" Column="20" TopLine="87"/>795 </Position11>796 <Position12>797 <Filename Value="..\Compiler\UCompiler.pas"/>798 <Caret Line="56" Column="31" TopLine="43"/>799 </Position12>800 <Position13>801 <Filename Value="Forms\UMainForm.pas"/>802 <Caret Line="100" Column="20" TopLine="87"/>803 </Position13>804 <Position14>805 <Filename Value="Forms\UMainForm.pas"/>806 <Caret Line="13" Column="23" TopLine="1"/>807 </Position14>808 <Position15>809 <Filename Value="UProject.pas"/>810 <Caret Line="75" Column="1" TopLine="74"/>811 </Position15>812 <Position16>813 <Filename Value="..\Compiler\Produce\UProducer.pas"/>814 <Caret Line="29" Column="38" TopLine="24"/>815 </Position16>816 <Position17>817 <Filename Value="Forms\UMainForm.pas"/>818 <Caret Line="243" Column="40" TopLine="230"/>819 </Position17>820 <Position18>821 <Filename Value="Forms\UMainForm.pas"/>822 <Caret Line="99" Column="1" TopLine="86"/>823 </Position18>824 <Position19>825 <Filename Value="Forms\UMainForm.pas"/>826 <Caret Line="13" Column="34" TopLine="8"/>827 </Position19>828 <Position20>829 <Filename Value="Forms\UMainForm.pas"/>830 <Caret Line="7" Column="78" TopLine="1"/>831 </Position20>832 <Position21>833 <Filename Value="Forms\UMainForm.pas"/>834 <Caret Line="266" Column="3" TopLine="253"/>835 </Position21>836 <Position22>837 <Filename Value="Forms\UMainForm.pas"/>838 <Caret Line="256" Column="64" TopLine="253"/>839 </Position22>840 <Position23>841 <Filename Value="E:\Projekty\PascalClassLibrary\Generics\TemplateGenerics\Generic\GenericList.inc"/>842 <Caret Line="54" Column="14" TopLine="26"/>843 </Position23>844 <Position24>845 <Filename Value="E:\Projekty\PascalClassLibrary\Generics\TemplateGenerics\Generic\GenericList.inc"/>846 <Caret Line="5" Column="23" TopLine="1"/>847 </Position24>848 <Position25>849 <Filename Value="UProject.pas"/>850 <Caret Line="104" Column="7" TopLine="94"/>851 </Position25>852 <Position26>853 <Filename Value="..\Compiler\USourceCode.pas"/>854 <Caret Line="916" Column="50" TopLine="903"/>855 </Position26>856 <Position27>857 <Filename Value="..\Compiler\Analyze\UAnalyzer.pas"/>858 <Caret Line="35" Column="3" TopLine="35"/>859 </Position27>860 <Position28>861 <Filename Value="..\Compiler\Produce\UProducer.pas"/>862 <Caret Line="9" Column="66" TopLine="1"/>863 </Position28>864 <Position29>865 <Filename Value="UProject.pas"/>866 <Caret Line="100" Column="47" TopLine="94"/>867 </Position29>868 <Position30>869 <Filename Value="Forms\UMainForm.pas"/>870 <Caret Line="104" Column="24" TopLine="95"/>871 </Position30>872 977 </JumpHistory> 873 978 </ProjectOptions> 874 979 <CompilerOptions> 875 <Version Value=" 9"/>980 <Version Value="10"/> 876 981 <PathDelim Value="\"/> 877 982 <SearchPaths> 983 <IncludeFiles Value="$(ProjOutDir)"/> 878 984 <OtherUnitFiles Value="Forms;Common"/> 879 985 <UnitOutputDirectory Value="lib\$(TargetCPU)-$(TargetOS)"/> … … 898 1004 <Debugging> 899 1005 <GenerateDebugInfo Value="True"/> 900 <UseHeaptrc Value="True"/>901 1006 </Debugging> 902 1007 <Options> … … 907 1012 </Linking> 908 1013 <Other> 1014 <CompilerMessages> 1015 <UseMsgFile Value="True"/> 1016 </CompilerMessages> 909 1017 <CompilerPath Value="$(CompPath)"/> 910 1018 </Other> -
trunk/IDE/Transpascal.lpr
r24 r30 17 17 const 18 18 HeapTraceLog = 'heaptrclog.trc'; 19 19 20 begin 20 21 Application.Title := 'Transpascal IDE'; 21 22 // Heap trace 22 DeleteFile(ExtractFilePath(ParamStr(0)) + HeapTraceLog);23 SetHeapTraceOutput(ExtractFilePath(ParamStr(0)) + HeapTraceLog);23 // DeleteFile(ExtractFilePath(ParamStr(0)) + HeapTraceLog); 24 // SetHeapTraceOutput(ExtractFilePath(ParamStr(0)) + HeapTraceLog); 24 25 25 26 Application.Initialize;
Note:
See TracChangeset
for help on using the changeset viewer.