Changeset 736 for cprs/branches/tmg-cprs/CPRS-Chart
- Timestamp:
- Apr 13, 2010, 1:31:19 PM (15 years ago)
- Location:
- cprs/branches/tmg-cprs/CPRS-Chart
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
cprs/branches/tmg-cprs/CPRS-Chart/CPRSChart.dsk
r735 r736 5 5 [Modules] 6 6 Module0=P:\vista\tmg-cprs\CPRS-Chart\Templates\uTemplateFields.pas 7 Module1= P:\vista\tmg-cprs\CPRS-Chart\fOptionsNotes.pas8 Module2=P:\vista\tmg-cprs\CPRS-Chart\f Notes.pas9 Module3=P:\vista\tmg-cprs\CPRS-Chart\ Templates\fTemplateDialog.pas10 Module4= P:\vista\tmg-cprs\CPRS-Chart\fImages.pas11 Module5=P:\vista\tmg-cprs\CPRS- Chart\Templates\fTemplateView.pas12 Module6=P:\vista\tmg-cprs\CPRS-Chart\Templates\ uTemplates.pas13 Module7= P:\vista\tmg-cprs\CPRS-Chart\Templates\rTemplates.pas14 Module8= P:\vista\tmg-cprs\CPRS-Chart\uEvaluate.pas15 Module9=c:\program files\borland\delphi7\source\rtl\common\ StrUtils.pas16 Module10= P:\vista\tmg-cprs\CPRS-Lib\ORNet.pas17 Module11= c:\program files\borland\delphi7\source\vcl\ComCtrls.pas18 Module12= c:\program files\borland\delphi7\source\vcl\Forms.pas19 Module13= c:\program files\borland\delphi7\source\rtl\common\classes.pas20 Module14= c:\program files\borland\delphi7\source\vcl\Controls.pas21 Module15=P:\ vista\tmg-cprs\CPRS-Chart\rHTMLTools.pas22 Module16=P:\vista\tmg-cprs\CPRS-Chart\ fReminderDialog.pas23 Module17=P:\vista\tmg-cprs\CPRS-Chart\ fDrawers.pas24 Module18=P:\vista\tmg-cprs\CPRS -Chart\dShared.pas25 Module19= c:\program files\borland\delphi7\source\rtl\Sys\system.pas26 Module20=P:\ Vista\tmg-cprs\dklang-package-3.01\DKLang.pas27 Module21=P:\vista\tmg-cprs\CPRS Chart.ini28 Module22= P:\vista\tmg-cprs\CPRS-Chart\Options\fOptions.pas29 Module23=P:\vista\tmg-cprs\CPRS-Chart\ rCover.pas30 Module24=P:\vista\tmg-cprs\CPRS-Chart\f PtDemo.pas31 Module25= c:\program files\borland\delphi7\source\rtl\Sys\sysutils.pas32 Module26=P:\vista\tmg-cprs\CPRS-Chart\ fSplash.pas33 Module27=P:\vista\tmg-cprs\CPRS-Chart\ Options\fOptionsOther.pas34 Module28=P:\vista\tmg-cprs\CPRS-Chart\ uTMGOptions.pas35 Module29=P:\ vista\tmg-cprs\CPRS-Chart\fFrame.pas36 Module30=P:\ Vista\tmg-cprs\CPRS-Lib\ORFn.pas7 Module1=c:\program files\borland\delphi7\source\rtl\Sys\system.pas 8 Module2=P:\vista\tmg-cprs\CPRS-Chart\fImages.pas 9 Module3=P:\vista\tmg-cprs\CPRS-Chart\uEvaluate.pas 10 Module4=c:\program files\borland\delphi7\source\rtl\common\StrUtils.pas 11 Module5=P:\vista\tmg-cprs\CPRS-Lib\ORNet.pas 12 Module6=P:\vista\tmg-cprs\CPRS-Chart\Templates\rTemplates.pas 13 Module7=c:\program files\borland\delphi7\source\vcl\ComCtrls.pas 14 Module8=c:\program files\borland\delphi7\source\vcl\Forms.pas 15 Module9=c:\program files\borland\delphi7\source\rtl\common\classes.pas 16 Module10=c:\program files\borland\delphi7\source\vcl\Controls.pas 17 Module11=P:\vista\tmg-cprs\CPRS-Chart\rHTMLTools.pas 18 Module12=P:\vista\tmg-cprs\CPRS-Chart\fReminderDialog.pas 19 Module13=P:\vista\tmg-cprs\CPRS-Chart\fDrawers.pas 20 Module14=P:\vista\tmg-cprs\CPRS-Chart\dShared.pas 21 Module15=P:\Vista\tmg-cprs\dklang-package-3.01\DKLang.pas 22 Module16=P:\vista\tmg-cprs\CPRS-Chart\Templates\fTemplateView.pas 23 Module17=P:\vista\tmg-cprs\CPRS-Chart\Templates\uTemplates.pas 24 Module18=P:\vista\tmg-cprs\CPRSChart.ini 25 Module19=P:\vista\tmg-cprs\CPRS-Chart\Options\fOptions.pas 26 Module20=P:\vista\tmg-cprs\CPRS-Chart\rCover.pas 27 Module21=P:\vista\tmg-cprs\CPRS-Chart\fPtDemo.pas 28 Module22=c:\program files\borland\delphi7\source\rtl\Sys\sysutils.pas 29 Module23=P:\vista\tmg-cprs\CPRS-Chart\fSplash.pas 30 Module24=P:\vista\tmg-cprs\CPRS-Chart\fOptionsNotes.pas 31 Module25=P:\vista\tmg-cprs\CPRS-Chart\fNotes.pas 32 Module26=P:\vista\tmg-cprs\CPRS-Chart\Options\fOptionsOther.pas 33 Module27=P:\vista\tmg-cprs\CPRS-Chart\uTMGOptions.pas 34 Module28=P:\vista\tmg-cprs\CPRS-Chart\fFrame.pas 35 Module29=P:\Vista\tmg-cprs\CPRS-Lib\ORFn.pas 36 Module30=P:\vista\tmg-cprs\CPRS-Chart\Templates\fTemplateDialog.pas 37 37 Count=31 38 38 EditWindowCount=1 … … 44 44 FormOnTop=0 45 45 46 [c:\program files\borland\delphi7\source\rtl\Sys\system.pas] 47 ModuleType=SourceModule 48 FormState=0 49 FormOnTop=0 50 51 [P:\vista\tmg-cprs\CPRS-Chart\fImages.pas] 52 ModuleType=SourceModule 53 FormState=0 54 FormOnTop=0 55 56 [P:\vista\tmg-cprs\CPRS-Chart\uEvaluate.pas] 57 ModuleType=SourceModule 58 FormState=0 59 FormOnTop=0 60 61 [c:\program files\borland\delphi7\source\rtl\common\StrUtils.pas] 62 ModuleType=SourceModule 63 FormState=0 64 FormOnTop=0 65 66 [P:\vista\tmg-cprs\CPRS-Lib\ORNet.pas] 67 ModuleType=SourceModule 68 FormState=0 69 FormOnTop=0 70 71 [P:\vista\tmg-cprs\CPRS-Chart\Templates\rTemplates.pas] 72 ModuleType=SourceModule 73 FormState=0 74 FormOnTop=0 75 76 [c:\program files\borland\delphi7\source\vcl\ComCtrls.pas] 77 ModuleType=SourceModule 78 FormState=0 79 FormOnTop=0 80 81 [c:\program files\borland\delphi7\source\vcl\Forms.pas] 82 ModuleType=SourceModule 83 FormState=0 84 FormOnTop=0 85 86 [c:\program files\borland\delphi7\source\rtl\common\classes.pas] 87 ModuleType=SourceModule 88 FormState=0 89 FormOnTop=0 90 91 [c:\program files\borland\delphi7\source\vcl\Controls.pas] 92 ModuleType=SourceModule 93 FormState=0 94 FormOnTop=0 95 96 [P:\vista\tmg-cprs\CPRS-Chart\rHTMLTools.pas] 97 ModuleType=SourceModule 98 FormState=0 99 FormOnTop=0 100 101 [P:\vista\tmg-cprs\CPRS-Chart\fReminderDialog.pas] 102 ModuleType=SourceModule 103 FormState=0 104 FormOnTop=0 105 106 [P:\vista\tmg-cprs\CPRS-Chart\fDrawers.pas] 107 ModuleType=SourceModule 108 FormState=0 109 FormOnTop=0 110 111 [P:\vista\tmg-cprs\CPRS-Chart\dShared.pas] 112 ModuleType=SourceModule 113 FormState=0 114 FormOnTop=0 115 116 [P:\Vista\tmg-cprs\dklang-package-3.01\DKLang.pas] 117 ModuleType=SourceModule 118 FormState=0 119 FormOnTop=0 120 121 [P:\vista\tmg-cprs\CPRS-Chart\Templates\fTemplateView.pas] 122 ModuleType=SourceModule 123 FormState=0 124 FormOnTop=0 125 126 [P:\vista\tmg-cprs\CPRS-Chart\Templates\uTemplates.pas] 127 ModuleType=SourceModule 128 FormState=0 129 FormOnTop=0 130 131 [P:\vista\tmg-cprs\CPRSChart.ini] 132 ModuleType=SourceModule 133 FormState=0 134 FormOnTop=0 135 136 [P:\vista\tmg-cprs\CPRS-Chart\Options\fOptions.pas] 137 ModuleType=SourceModule 138 FormState=0 139 FormOnTop=0 140 141 [P:\vista\tmg-cprs\CPRS-Chart\rCover.pas] 142 ModuleType=SourceModule 143 FormState=0 144 FormOnTop=0 145 146 [P:\vista\tmg-cprs\CPRS-Chart\fPtDemo.pas] 147 ModuleType=SourceModule 148 FormState=0 149 FormOnTop=0 150 151 [c:\program files\borland\delphi7\source\rtl\Sys\sysutils.pas] 152 ModuleType=SourceModule 153 FormState=0 154 FormOnTop=0 155 156 [P:\vista\tmg-cprs\CPRS-Chart\fSplash.pas] 157 ModuleType=SourceModule 158 FormState=0 159 FormOnTop=0 160 46 161 [P:\vista\tmg-cprs\CPRS-Chart\fOptionsNotes.pas] 47 162 ModuleType=SourceModule … … 54 169 FormOnTop=0 55 170 171 [P:\vista\tmg-cprs\CPRS-Chart\Options\fOptionsOther.pas] 172 ModuleType=SourceModule 173 FormState=0 174 FormOnTop=0 175 176 [P:\vista\tmg-cprs\CPRS-Chart\uTMGOptions.pas] 177 ModuleType=SourceModule 178 FormState=0 179 FormOnTop=0 180 181 [P:\vista\tmg-cprs\CPRS-Chart\fFrame.pas] 182 ModuleType=SourceModule 183 FormState=0 184 FormOnTop=0 185 186 [P:\Vista\tmg-cprs\CPRS-Lib\ORFn.pas] 187 ModuleType=SourceModule 188 FormState=0 189 FormOnTop=0 190 56 191 [P:\vista\tmg-cprs\CPRS-Chart\Templates\fTemplateDialog.pas] 57 ModuleType=SourceModule58 FormState=059 FormOnTop=060 61 [P:\vista\tmg-cprs\CPRS-Chart\fImages.pas]62 ModuleType=SourceModule63 FormState=064 FormOnTop=065 66 [P:\vista\tmg-cprs\CPRS-Chart\Templates\fTemplateView.pas]67 ModuleType=SourceModule68 FormState=069 FormOnTop=070 71 [P:\vista\tmg-cprs\CPRS-Chart\Templates\uTemplates.pas]72 ModuleType=SourceModule73 FormState=074 FormOnTop=075 76 [P:\vista\tmg-cprs\CPRS-Chart\Templates\rTemplates.pas]77 ModuleType=SourceModule78 FormState=079 FormOnTop=080 81 [P:\vista\tmg-cprs\CPRS-Chart\uEvaluate.pas]82 ModuleType=SourceModule83 FormState=084 FormOnTop=085 86 [c:\program files\borland\delphi7\source\rtl\common\StrUtils.pas]87 ModuleType=SourceModule88 FormState=089 FormOnTop=090 91 [P:\vista\tmg-cprs\CPRS-Lib\ORNet.pas]92 ModuleType=SourceModule93 FormState=094 FormOnTop=095 96 [c:\program files\borland\delphi7\source\vcl\ComCtrls.pas]97 ModuleType=SourceModule98 FormState=099 FormOnTop=0100 101 [c:\program files\borland\delphi7\source\vcl\Forms.pas]102 ModuleType=SourceModule103 FormState=0104 FormOnTop=0105 106 [c:\program files\borland\delphi7\source\rtl\common\classes.pas]107 ModuleType=SourceModule108 FormState=0109 FormOnTop=0110 111 [c:\program files\borland\delphi7\source\vcl\Controls.pas]112 ModuleType=SourceModule113 FormState=0114 FormOnTop=0115 116 [P:\vista\tmg-cprs\CPRS-Chart\rHTMLTools.pas]117 ModuleType=SourceModule118 FormState=0119 FormOnTop=0120 121 [P:\vista\tmg-cprs\CPRS-Chart\fReminderDialog.pas]122 ModuleType=SourceModule123 FormState=0124 FormOnTop=0125 126 [P:\vista\tmg-cprs\CPRS-Chart\fDrawers.pas]127 ModuleType=SourceModule128 FormState=0129 FormOnTop=0130 131 [P:\vista\tmg-cprs\CPRS-Chart\dShared.pas]132 ModuleType=SourceModule133 FormState=0134 FormOnTop=0135 136 [c:\program files\borland\delphi7\source\rtl\Sys\system.pas]137 ModuleType=SourceModule138 FormState=0139 FormOnTop=0140 141 [P:\Vista\tmg-cprs\dklang-package-3.01\DKLang.pas]142 ModuleType=SourceModule143 FormState=0144 FormOnTop=0145 146 [P:\vista\tmg-cprs\CPRSChart.ini]147 ModuleType=SourceModule148 FormState=0149 FormOnTop=0150 151 [P:\vista\tmg-cprs\CPRS-Chart\Options\fOptions.pas]152 ModuleType=SourceModule153 FormState=0154 FormOnTop=0155 156 [P:\vista\tmg-cprs\CPRS-Chart\rCover.pas]157 ModuleType=SourceModule158 FormState=0159 FormOnTop=0160 161 [P:\vista\tmg-cprs\CPRS-Chart\fPtDemo.pas]162 ModuleType=SourceModule163 FormState=0164 FormOnTop=0165 166 [c:\program files\borland\delphi7\source\rtl\Sys\sysutils.pas]167 ModuleType=SourceModule168 FormState=0169 FormOnTop=0170 171 [P:\vista\tmg-cprs\CPRS-Chart\fSplash.pas]172 ModuleType=SourceModule173 FormState=0174 FormOnTop=0175 176 [P:\vista\tmg-cprs\CPRS-Chart\Options\fOptionsOther.pas]177 ModuleType=SourceModule178 FormState=0179 FormOnTop=0180 181 [P:\vista\tmg-cprs\CPRS-Chart\uTMGOptions.pas]182 ModuleType=SourceModule183 FormState=0184 FormOnTop=0185 186 [P:\vista\tmg-cprs\CPRS-Chart\fFrame.pas]187 ModuleType=SourceModule188 FormState=0189 FormOnTop=0190 191 [P:\Vista\tmg-cprs\CPRS-Lib\ORFn.pas]192 192 ModuleType=SourceModule 193 193 FormState=0 … … 262 262 ClientHeight=589 263 263 LeftPanelSize=140 264 LeftPanelClients=CodeExplorer@EditWindow0,DockSite 1265 LeftPanelData=00000400010000000C000000436F64654578706C6F7265728C0000000000000002700100000000000001000000008C00000009000000446F636B536974653 101000000000000000000000000FFFFFFFF264 LeftPanelClients=CodeExplorer@EditWindow0,DockSite0 265 LeftPanelData=00000400010000000C000000436F64654578706C6F7265728C0000000000000002700100000000000001000000008C00000009000000446F636B536974653001000000000000000000000000FFFFFFFF 266 266 RightPanelSize=0 267 267 BottomPanelSize=218 … … 390 390 [View17] 391 391 Module=c:\program files\borland\delphi7\source\rtl\Sys\system.pas 392 CursorX= 4393 CursorY=12 508394 TopLine=12 495392 CursorX=2 393 CursorY=12671 394 TopLine=12660 395 395 LeftCol=1 396 396 … … 469 469 CursorX=1 470 470 CursorY=1133 471 TopLine=111 9471 TopLine=1118 472 472 LeftCol=1 473 473 … … 501 501 502 502 [Watches] 503 Count=2 1503 Count=22 504 504 Watch0='NumStr',256,0,18,1,0,'Watches' 505 505 Watch1='p1',256,0,18,1,0,'Watches' … … 523 523 Watch19='Strings[I]',256,0,18,1,0,'Watches' 524 524 Watch20='test[i]',256,0,18,1,0,'Watches' 525 Watch21='StrLen(PChar(Txt))+1',256,0,18,1,0,'Watches' 525 526 526 527 [WatchWindow] 527 WatchColumnWidth=1 00528 WatchColumnWidth=179 528 529 WatchShowColumnHeaders=1 529 530 Create=1 … … 543 544 544 545 [Breakpoints] 545 Count=3 2546 Count=33 546 547 Breakpoint0='P:\vista\tmg-cprs\CPRS-Chart\TMG_Extra\fPtDemoEdit.pas',1710,'',0,1,'',1,0,0,'',1,'','','' 547 548 Breakpoint1='P:\vista\tmg-cprs\CPRS-Chart\TMG_Extra\fPtDemoEdit.pas',1787,'',0,1,'',1,0,0,'',1,'','','' … … 576 577 Breakpoint30='P:\vista\tmg-cprs\CPRS-Chart\Templates\uTemplateFields.pas',1133,'',0,1,'',1,0,0,'',1,'','','' 577 578 Breakpoint31='P:\vista\tmg-cprs\CPRS-Chart\Templates\uTemplateFields.pas',1126,'',0,1,'',1,0,0,'',1,'','','' 579 Breakpoint32='P:\vista\tmg-cprs\CPRS-Chart\Templates\uTemplateFields.pas',551,'',0,1,'',1,0,0,'',1,'','','' 578 580 579 581 [AddressBreakpoints] … … 898 900 Visible=1 899 901 State=0 900 Left=-752 901 Top=258 902 Left=0 903 Top=12 904 Width=140 905 Height=356 906 MaxLeft=-1 907 MaxTop=-1 908 ClientWidth=140 909 ClientHeight=356 910 TBDockHeight=356 911 LRDockWidth=140 912 Dockable=1 913 TabPosition=0 914 ActiveTab=Object Inspector 915 TabDockClients=PropertyInspector,ObjectTree 916 917 [DockSite1] 918 DockSiteType=1 919 Create=1 920 Visible=1 921 State=0 922 Left=1072 923 Top=211 902 924 Width=720 903 925 Height=462 … … 913 935 TabDockClients=WatchWindow,DebugLogView 914 936 915 [DockSite1]916 DockSiteType=1917 Create=1918 Visible=1919 State=0920 Left=0921 Top=12922 Width=140923 Height=356924 MaxLeft=-1925 MaxTop=-1926 ClientWidth=140927 ClientHeight=356928 TBDockHeight=356929 LRDockWidth=140930 Dockable=1931 TabPosition=0932 ActiveTab=Object Inspector933 TabDockClients=PropertyInspector,ObjectTree934 -
cprs/branches/tmg-cprs/CPRS-Chart/Templates/uTemplateFields.pas
r735 r736 550 550 //p2 := PosEx(FN_END_TAG,Txt,p1); 551 551 p2 := CloseCharPos(FN_BEGIN_TAG, FN_END_TAG, Txt, p1); 552 SubStrB := MidStr(Txt,p2+1, 99999); //Changed from 999 to 99999. Some characters were getting lost including the dialog tags that trigger the dialog box elh 04/08/10552 SubStrB := MidStr(Txt,p2+1,StrLen(PChar(Txt))+1); //Changed from 999 to StrLen(PChar(Txt))+1. Some characters were getting lost including the dialog tags that trigger the dialog box elh 04/08/10 553 553 FnStr := MidStr(Txt,p1, (p2-p1)); 554 554 FnStr := AnsiReplaceText(FnStr,#9,''); … … 577 577 p1 := p1 + FN_OBJ_TAG_LEN; 578 578 p2 := CloseCharPos(FN_BEGIN_TAG, FN_END_TAG, Txt, p1); 579 SubStrB := MidStr(Txt,p2+1, 999);579 SubStrB := MidStr(Txt,p2+1,StrLen(PChar(Txt))+1); //Changed from 999 to StrLen(PChar(Txt))+1. Some characters were getting lost including the dialog tags that trigger the dialog box elh 04/13/10 580 580 FnStr := MidStr(Txt,p1, (p2-p1)); 581 581 FnStr := AnsiReplaceText(FnStr,#9,''); … … 730 730 p1 := p1 + FN_SHOW_TEXT_LEN; 731 731 p2 := PosEx(FN_SHOW_TEXT_END,Txt,p1); 732 SubStrB := MidStr(Txt,p2+1, 999);732 SubStrB := MidStr(Txt,p2+1,StrLen(PChar(Txt))+1); //Changed from 999 to StrLen(PChar(Txt))+1. Some characters were getting lost including the dialog tags that trigger the dialog box elh 04/13/10 733 733 FnStr := MidStr(Txt,p1, (p2-p1)); 734 734 FnStr := GetFormula(FnStr); … … 799 799 p1 := p1 + OBJ_SHOW_TEXT_LEN; 800 800 p2 := PosEx(OBJ_SHOW_TEXT_END,Txt,p1); 801 SubStrB := MidStr(Txt,p2+1, 999);801 SubStrB := MidStr(Txt,p2+1,StrLen(PChar(Txt))+1); //Changed from 999 to StrLen(PChar(Txt))+1. Some characters were getting lost including the dialog tags that trigger the dialog box elh 04/13/10 802 802 ObjStr := MidStr(Txt,p1, (p2-p1)); 803 803 ObjStr := GetTxtObjects(ObjStr); … … 1098 1098 p2 := PosEx(FieldIDDelim,FnObjStr,p1+1); 1099 1099 Argument := MidStr(FnObjStr,p1+1,(p2-p1)-1); 1100 SubStrB := MidStr(FnObjStr,p2+1, 999);1100 SubStrB := MidStr(FnObjStr,p2+1,StrLen(PChar(FnObjStr))+1); 1101 1101 CtrlID := StrToIntDef(MidStr(Argument,1,FieldIDLen-1), 0); 1102 Fld := MidStr(Argument,FieldIDLen, 999);1102 Fld := MidStr(Argument,FieldIDLen,StrLen(PChar(Argument))+1); 1103 1103 if(CtrlID > 0) then begin 1104 1104 FoundEntry := FALSE; … … 1135 1135 end; 1136 1136 SubStrA := MidStr(Temp,1,FnP1-1); 1137 SubStrB := MidStr(Temp,FnP2+1, 999);1137 SubStrB := MidStr(Temp,FnP2+1,StrLen(PChar(Temp))+1); 1138 1138 if (HTMLMode=true) and (FnObjStr <> '') then begin 1139 1139 FnObjStr := HTMLAnswerOpenTag + FnObjStr + HTMLAnswerCloseTag;
Note:
See TracChangeset
for help on using the changeset viewer.