Ignore:
Timestamp:
Jan 29, 2010, 1:37:37 PM (15 years ago)
Author:
Kevin Toppenberg
Message:

Fixed HTML Template line feed issue

Location:
cprs/branches/tmg-cprs/CPRS-Chart
Files:
3 edited

Legend:

Unmodified
Added
Removed

  • cprs/branches/tmg-cprs/CPRS-Chart/CPRSChart.dsk

    r686 r694  
    11[Closed Files]
    2 File_0=SourceModule,'P:\vista\tmg-cprs\CPRS-Chart\dShared.pas',0,1,203,34,224,0,0
    3 File_1=SourceModule,'C:\PROGRA~1\VISTA\BDK32\Source\wsockc.pas',0,1,1470,1,1479,0,0
    4 File_2=SourceModule,'P:\vista\tmg-cprs\CPRS-Chart\rReports.pas',0,1,630,1,642,0,0
    5 File_3=SourceModule,'P:\vista\tmg-cprs\CPRS-Chart\fNotePrt.pas',0,1,301,9,310,0,0
    6 File_4=SourceModule,'P:\vista\tmg-cprs\CPRS-Chart\uFormMonitor.pas',0,1,1,1,1,0,0
    7 File_5=SourceModule,'c:\program files\borland\delphi7\source\vcl\Forms.pas',0,1,3770,1,3779,0,0
    8 File_6=SourceModule,'c:\program files\borland\delphi7\source\rtl\Sys\system.pas',0,1,13366,4,13380,0,0
     2File_0=SourceModule,'P:\vista\tmg-cprs\CPRS-Chart\fOptionsNotes.pas',0,1,28,1,305,0,0
     3File_1=SourceModule,'c:\program files\borland\delphi7\source\vcl\StdCtrls.pas',0,1,3408,1,3415,0,0
     4File_2=SourceModule,'P:\vista\tmg-cprs\CPRS-Chart\Templates\fTemplateEditor.pas',0,1,4273,28,4280,0,0
     5File_3=SourceModule,'P:\vista\tmg-cprs\CPRS-Chart\fDCSumm.pas',0,1,3412,13,3407,0,0
     6File_4=SourceModule,'P:\vista\tmg-cprs\CPRS-Chart\Encounter\fEncounterFrame.pas',0,1,836,1,846,0,0
     7File_5=SourceModule,'P:\vista\tmg-cprs\CPRS-Chart\Templates\fTemplateFieldEditor.pas',0,1,1418,1,1425,0,0
     8File_6=SourceModule,'P:\vista\tmg-cprs\CPRS-Chart\fLabs.pas',0,1,2418,13,2419,0,0
     9File_7=SourceModule,'P:\vista\tmg-cprs\CPRS-Chart\Orders\fOrdersTS.pas',0,1,324,12,331,0,0
     10File_8=SourceModule,'P:\vista\tmg-cprs\CPRS-Chart\Orders\fOrdersCopy.pas',0,1,329,12,339,0,0
     11File_9=SourceModule,'c:\program files\borland\delphi7\source\vcl\Menus.pas',0,1,3232,1,3239,0,0
    912
    1013[Modules]
    11 Module0=P:\vista\tmg-cprs\CPRS-Chart\Templates\uTemplates.pas
     14Module0=P:\vista\tmg-cprs\CPRS-Chart\Templates\uTemplateFields.pas
    1215Module1=P:\vista\tmg-cprs\CPRS-Chart\Templates\fTemplateDialog.pas
    13 Module2=P:\vista\tmg-cprs\CPRS-Chart\rHTMLTools.pas
    14 Module3=P:\vista\tmg-cprs\CPRS-Chart\Templates\rTemplates.pas
    15 Module4=P:\vista\tmg-cprs\CPRS-Chart\fNotes.pas
    16 Module5=P:\vista\tmg-cprs\CPRS-Chart\fOptionsNotes.pas
    17 Module6=P:\vista\tmg-cprs\CPRS-Chart\fDrawers.pas
    18 Module7=P:\vista\tmg-cprs\CPRS-Chart\uReminders.pas
    19 Module8=P:\vista\tmg-cprs\CPRS-Chart\CPRSChart.dpr
    20 Module9=P:\vista\tmg-cprs\CPRS-Chart\Templates\uTemplateFields.pas
    21 Count=10
     16Module2=P:\vista\tmg-cprs\CPRS-Chart\Templates\rTemplates.pas
     17Module3=C:\PROGRA~1\VISTA\BDK32\Source\wsockc.pas
     18Module4=P:\vista\tmg-cprs\CPRS-Chart\fPtSel.pas
     19Module5=P:\vista\tmg-cprs\CPRS-Chart\Consults\fEditConsult.pas
     20Module6=P:\vista\tmg-cprs\CPRS-Chart\fNotes.pas
     21Module7=P:\vista\tmg-cprs\CPRS-Chart\Consults\fConsults.pas
     22Module8=P:\vista\tmg-cprs\CPRS-Chart\fFrame.pas
     23Module9=P:\vista\tmg-cprs\CPRS-Chart\Consults\fODConsult.pas
     24Module10=P:\vista\tmg-cprs\CPRS-Chart\Templates\mTemplateFieldButton.pas
     25Module11=P:\vista\tmg-cprs\CPRS-Chart\fReports.pas
     26Module12=c:\program files\borland\delphi7\source\vcl\Forms.pas
     27Module13=P:\vista\tmg-cprs\CPRS-Chart\Templates\uTemplates.pas
     28Module14=c:\program files\borland\delphi7\source\rtl\common\classes.pas
     29Module15=P:\vista\tmg-cprs\CPRS-Chart\rHTMLTools.pas
     30Module16=P:\vista\tmg-cprs\CPRS-Chart\Options\fOptionsReportsCustom.pas
     31Module17=P:\vista\tmg-cprs\CPRS-Chart\fDrawers.pas
     32Module18=P:\vista\tmg-cprs\CPRS-Chart\uReminders.pas
     33Module19=P:\vista\tmg-cprs\CPRS-Chart\fPtSelOptns.pas
     34Module20=P:\vista\tmg-cprs\CPRS-Chart\fNotePrt.pas
     35Module21=c:\program files\borland\delphi7\source\vcl\Controls.pas
     36Count=22
    2237EditWindowCount=1
    2338TypeLibWindowCount=1
    2439
     40[P:\vista\tmg-cprs\CPRS-Chart\Templates\uTemplateFields.pas]
     41ModuleType=SourceModule
     42FormState=0
     43FormOnTop=0
     44
     45[P:\vista\tmg-cprs\CPRS-Chart\Templates\fTemplateDialog.pas]
     46ModuleType=SourceModule
     47FormState=0
     48FormOnTop=0
     49
     50[P:\vista\tmg-cprs\CPRS-Chart\Templates\rTemplates.pas]
     51ModuleType=SourceModule
     52FormState=0
     53FormOnTop=0
     54
     55[C:\PROGRA~1\VISTA\BDK32\Source\wsockc.pas]
     56ModuleType=SourceModule
     57FormState=0
     58FormOnTop=0
     59
     60[P:\vista\tmg-cprs\CPRS-Chart\fPtSel.pas]
     61ModuleType=SourceModule
     62FormState=0
     63FormOnTop=0
     64
     65[P:\vista\tmg-cprs\CPRS-Chart\Consults\fEditConsult.pas]
     66ModuleType=SourceModule
     67FormState=0
     68FormOnTop=0
     69
     70[P:\vista\tmg-cprs\CPRS-Chart\fNotes.pas]
     71ModuleType=SourceModule
     72FormState=0
     73FormOnTop=0
     74
     75[P:\vista\tmg-cprs\CPRS-Chart\Consults\fConsults.pas]
     76ModuleType=SourceModule
     77FormState=0
     78FormOnTop=0
     79
     80[P:\vista\tmg-cprs\CPRS-Chart\fFrame.pas]
     81ModuleType=SourceModule
     82FormState=0
     83FormOnTop=0
     84
     85[P:\vista\tmg-cprs\CPRS-Chart\Consults\fODConsult.pas]
     86ModuleType=SourceModule
     87FormState=0
     88FormOnTop=0
     89
     90[P:\vista\tmg-cprs\CPRS-Chart\Templates\mTemplateFieldButton.pas]
     91ModuleType=SourceModule
     92FormState=0
     93FormOnTop=0
     94
     95[P:\vista\tmg-cprs\CPRS-Chart\fReports.pas]
     96ModuleType=SourceModule
     97FormState=0
     98FormOnTop=0
     99
     100[c:\program files\borland\delphi7\source\vcl\Forms.pas]
     101ModuleType=SourceModule
     102FormState=0
     103FormOnTop=0
     104
    25105[P:\vista\tmg-cprs\CPRS-Chart\Templates\uTemplates.pas]
    26106ModuleType=SourceModule
    … …  
    28108FormOnTop=0
    29109
    30 [P:\vista\tmg-cprs\CPRS-Chart\Templates\fTemplateDialog.pas]
     110[c:\program files\borland\delphi7\source\rtl\common\classes.pas]
    31111ModuleType=SourceModule
    32112FormState=0
    … …  
    38118FormOnTop=0
    39119
    40 [P:\vista\tmg-cprs\CPRS-Chart\Templates\rTemplates.pas]
    41 ModuleType=SourceModule
    42 FormState=0
    43 FormOnTop=0
    44 
    45 [P:\vista\tmg-cprs\CPRS-Chart\fNotes.pas]
    46 ModuleType=SourceModule
    47 FormState=0
    48 FormOnTop=0
    49 
    50 [P:\vista\tmg-cprs\CPRS-Chart\fOptionsNotes.pas]
     120[P:\vista\tmg-cprs\CPRS-Chart\Options\fOptionsReportsCustom.pas]
    51121ModuleType=SourceModule
    52122FormState=0
    … …  
    63133FormOnTop=0
    64134
     135[P:\vista\tmg-cprs\CPRS-Chart\fPtSelOptns.pas]
     136ModuleType=SourceModule
     137FormState=0
     138FormOnTop=0
     139
     140[P:\vista\tmg-cprs\CPRS-Chart\fNotePrt.pas]
     141ModuleType=SourceModule
     142FormState=0
     143FormOnTop=0
     144
     145[c:\program files\borland\delphi7\source\vcl\Controls.pas]
     146ModuleType=SourceModule
     147FormState=0
     148FormOnTop=0
     149
    65150[P:\vista\tmg-cprs\CPRS-Chart\CPRSChart.dpr]
    66 ModuleType=SourceModule
    67 FormState=0
    68 FormOnTop=0
    69 
    70 [P:\vista\tmg-cprs\CPRS-Chart\Templates\uTemplateFields.pas]
    71 ModuleType=SourceModule
     151FormState=0
     152FormOnTop=0
     153
     154[C:\Program Files\Borland\Delphi7\Projects\ProjectGroup1.bpg]
     155FormState=0
     156FormOnTop=0
     157
     158[P:\vista\tmg-cprs\CPRS-Chart\CPRSChart.tlb]
     159FormState=0
     160FormOnTop=0
     161
     162[P:\vista\tmg-cprs\CPRS-Chart\fHSplit.pas]
     163FormState=0
     164FormOnTop=0
     165
     166[P:\vista\tmg-cprs\CPRS-Chart\fPage.pas]
    72167FormState=0
    73168FormOnTop=0
    … …  
    77172FormOnTop=0
    78173
    79 [C:\Program Files\Borland\Delphi7\Projects\ProjectGroup1.bpg]
    80 FormState=0
    81 FormOnTop=0
    82 
    83 [P:\vista\tmg-cprs\CPRS-Chart\CPRSChart.tlb]
    84 FormState=0
    85 FormOnTop=0
    86 
    87 [P:\vista\tmg-cprs\CPRS-Chart\fHSplit.pas]
    88 FormState=0
    89 FormOnTop=0
    90 
    91 [P:\vista\tmg-cprs\CPRS-Chart\fPage.pas]
    92 FormState=0
    93 FormOnTop=0
    94 
    95174[P:\vista\tmg-cprs\CPRS-Chart\fAutoSz.pas]
    96175FormState=0
    97176FormOnTop=0
    98177
     178[P:\vista\tmg-cprs\CPRS-Chart\mEvntDelay.pas]
     179FormState=0
     180FormOnTop=0
     181
     182[P:\vista\tmg-cprs\CPRS-Chart\Orders\fODBase.pas]
     183FormState=0
     184FormOnTop=0
     185
    99186[EditWindow0]
    100 ViewCount=10
    101 CurrentView=6
     187ViewCount=22
     188CurrentView=15
    102189View0=0
    103190View1=1
    … …  
    110197View8=8
    111198View9=9
     199View10=10
     200View11=11
     201View12=12
     202View13=13
     203View14=14
     204View15=15
     205View16=16
     206View17=17
     207View18=18
     208View19=19
     209View20=20
     210View21=21
    112211CodeExplorer=CodeExplorer@EditWindow0
    113212MessageView=MessageView@EditWindow0
    … …  
    115214Visible=1
    116215State=0
    117 Left=168
    118 Top=130
    119 Width=803
    120 Height=591
     216Left=-9
     217Top=128
     218Width=1009
     219Height=731
    121220MaxLeft=-136
    122221MaxTop=126
    123 ClientWidth=795
    124 ClientHeight=557
     222ClientWidth=1001
     223ClientHeight=697
    125224LeftPanelSize=140
    126 LeftPanelClients=CodeExplorer@EditWindow0
    127 LeftPanelData=00000400000000008C000000000000000235010000000000000100000000000000000000000001000000008C0000000C000000436F64654578706C6F726572FFFFFFFF
     225LeftPanelClients=CodeExplorer@EditWindow0,DockSite1
     226LeftPanelData=00000400000000008C000000000000000250010000000000000100000000000000000000000001000000018C000000000000000200000000A800000009000000446F636B53697465310200000000500100000C000000436F64654578706C6F726572FFFFFFFF
    128227RightPanelSize=0
    129 BottomPanelSize=245
    130 BottomPanelClients=DockSite0,MessageView@EditWindow0
    131 BottomPanelData=0000040000000000F500000000000000011B0300000000000001000000002A000000000000000100000002F50000000000000002000000004B01000009000000446F636B536974653002000000001B0300000B0000004D65737361676556696577020000000000040000000000000200000000000400000000000002000000000004000000000000FFFFFFFF
     228BottomPanelSize=358
     229BottomPanelClients=MessageView@EditWindow0,DockSite0
     230BottomPanelData=0000040000000000660100000000000001E90300000000000001000000002A00000000000000010000000266010000000000000200000001E9030000000000000300000000900000000B0000004D6573736167655669657703000000006601000009000000446F636B5369746530020000000000040000000000000200000000000400000000000002000000000004000000000000FFFFFFFF
    132231
    133232[View0]
    134233Module=P:\vista\tmg-cprs\CPRS-Chart\fNotes.pas
    135 CursorX=63
    136 CursorY=1590
    137 TopLine=1583
     234CursorX=29
     235CursorY=4803
     236TopLine=4796
    138237LeftCol=1
    139238
    140239[View1]
    141 Module=P:\vista\tmg-cprs\CPRS-Chart\CPRSChart.dpr
    142 CursorX=1
    143 CursorY=333
    144 TopLine=324
     240Module=P:\vista\tmg-cprs\CPRS-Chart\fReports.pas
     241CursorX=1
     242CursorY=2966
     243TopLine=2959
    145244LeftCol=1
    146245
    147246[View2]
    148 Module=P:\vista\tmg-cprs\CPRS-Chart\fOptionsNotes.pas
    149 CursorX=54
    150 CursorY=103
    151 TopLine=97
     247Module=P:\vista\tmg-cprs\CPRS-Chart\Consults\fConsults.pas
     248CursorX=1
     249CursorY=4882
     250TopLine=4875
    152251LeftCol=1
    153252
    154253[View3]
     254Module=P:\vista\tmg-cprs\CPRS-Chart\Consults\fEditConsult.pas
     255CursorX=1
     256CursorY=718
     257TopLine=714
     258LeftCol=1
     259
     260[View4]
     261Module=P:\vista\tmg-cprs\CPRS-Chart\fPtSel.pas
     262CursorX=12
     263CursorY=1061
     264TopLine=1069
     265LeftCol=1
     266
     267[View5]
     268Module=P:\vista\tmg-cprs\CPRS-Chart\Options\fOptionsReportsCustom.pas
     269CursorX=42
     270CursorY=670
     271TopLine=676
     272LeftCol=1
     273
     274[View6]
     275Module=c:\program files\borland\delphi7\source\vcl\Controls.pas
     276CursorX=1
     277CursorY=6245
     278TopLine=6232
     279LeftCol=1
     280
     281[View7]
     282Module=c:\program files\borland\delphi7\source\rtl\common\classes.pas
     283CursorX=1
     284CursorY=10969
     285TopLine=10960
     286LeftCol=1
     287
     288[View8]
     289Module=c:\program files\borland\delphi7\source\vcl\Forms.pas
     290CursorX=1
     291CursorY=4826
     292TopLine=4816
     293LeftCol=1
     294
     295[View9]
     296Module=C:\PROGRA~1\VISTA\BDK32\Source\wsockc.pas
     297CursorX=1
     298CursorY=1479
     299TopLine=1469
     300LeftCol=1
     301
     302[View10]
    155303Module=P:\vista\tmg-cprs\CPRS-Chart\Templates\fTemplateDialog.pas
    156 CursorX=1
    157 CursorY=382
    158 TopLine=375
    159 LeftCol=1
    160 
    161 [View4]
     304CursorX=7
     305CursorY=392
     306TopLine=385
     307LeftCol=1
     308
     309[View11]
    162310Module=P:\vista\tmg-cprs\CPRS-Chart\Templates\rTemplates.pas
    163311CursorX=1
    164 CursorY=98
     312CursorY=111
    165313TopLine=89
    166314LeftCol=1
    167315
    168 [View5]
     316[View12]
    169317Module=P:\vista\tmg-cprs\CPRS-Chart\uReminders.pas
    170318CursorX=1
    171319CursorY=4507
    172 TopLine=4558
    173 LeftCol=1
    174 
    175 [View6]
     320TopLine=4543
     321LeftCol=1
     322
     323[View13]
    176324Module=P:\vista\tmg-cprs\CPRS-Chart\Templates\uTemplates.pas
    177325CursorX=1
    178 CursorY=580
    179 TopLine=573
    180 LeftCol=1
    181 
    182 [View7]
     326CursorY=1956
     327TopLine=1949
     328LeftCol=1
     329
     330[View14]
     331Module=P:\vista\tmg-cprs\CPRS-Chart\rHTMLTools.pas
     332CursorX=17
     333CursorY=58
     334TopLine=51
     335LeftCol=1
     336
     337[View15]
     338Module=P:\vista\tmg-cprs\CPRS-Chart\Templates\uTemplateFields.pas
     339CursorX=58
     340CursorY=515
     341TopLine=509
     342LeftCol=1
     343
     344[View16]
     345Module=P:\vista\tmg-cprs\CPRS-Chart\fNotePrt.pas
     346CursorX=43
     347CursorY=310
     348TopLine=303
     349LeftCol=1
     350
     351[View17]
     352Module=P:\vista\tmg-cprs\CPRS-Chart\fPtSelOptns.pas
     353CursorX=15
     354CursorY=230
     355TopLine=223
     356LeftCol=1
     357
     358[View18]
    183359Module=P:\vista\tmg-cprs\CPRS-Chart\fDrawers.pas
    184 CursorX=1
    185 CursorY=559
    186 TopLine=550
    187 LeftCol=1
    188 
    189 [View8]
    190 Module=P:\vista\tmg-cprs\CPRS-Chart\rHTMLTools.pas
    191 CursorX=1
    192 CursorY=760
    193 TopLine=751
    194 LeftCol=1
    195 
    196 [View9]
    197 Module=P:\vista\tmg-cprs\CPRS-Chart\Templates\uTemplateFields.pas
    198 CursorX=7
    199 CursorY=472
    200 TopLine=457
     360CursorX=50
     361CursorY=750
     362TopLine=743
     363LeftCol=1
     364
     365[View19]
     366Module=P:\vista\tmg-cprs\CPRS-Chart\fFrame.pas
     367CursorX=1
     368CursorY=3959
     369TopLine=3949
     370LeftCol=1
     371
     372[View20]
     373Module=P:\vista\tmg-cprs\CPRS-Chart\Templates\mTemplateFieldButton.pas
     374CursorX=12
     375CursorY=111
     376TopLine=104
     377LeftCol=1
     378
     379[View21]
     380Module=P:\vista\tmg-cprs\CPRS-Chart\Consults\fODConsult.pas
     381CursorX=38
     382CursorY=1360
     383TopLine=1472
    201384LeftCol=1
    202385
    … …  
    216399
    217400[Watches]
    218 Count=3
     401Count=5
    219402Watch0='frmPtSel',256,0,18,1,0,'Watches'
    220403Watch1='FRealType',256,0,18,1,0,'Watches'
    221404Watch2='FDialog',256,0,18,1,0,'Watches'
     405Watch3='TmpSL.Text',256,0,18,1,0,'Watches'
     406Watch4='SL.text',256,0,18,1,0,'Watches'
    222407
    223408[WatchWindow]
    … …  
    229414Left=0
    230415Top=0
    231 Width=307
    232 Height=216
    233 MaxLeft=-1
    234 MaxTop=-1
    235 ClientWidth=307
    236 ClientHeight=216
     416Width=981
     417Height=185
     418MaxLeft=-1
     419MaxTop=-1
     420ClientWidth=981
     421ClientHeight=185
    237422TBDockHeight=264
    238423LRDockWidth=421
    … …  
    240425
    241426[Breakpoints]
    242 Count=33
     427Count=28
    243428Breakpoint0='P:\vista\tmg-cprs\CPRS-Chart\rCover.pas',315,'',0,1,'',1,0,0,'',1,'','',''
    244429Breakpoint1='P:\vista\tmg-cprs\TMG_Extra\HTMLEdit\EmbeddedED\EmbeddedED.pas',1516,'',0,1,'',1,0,0,'',1,'','',''
    … …  
    252437Breakpoint9='P:\vista\tmg-cprs\CPRS-Chart\fFrame.pas',1059,'',0,1,'',1,0,0,'',1,'','',''
    253438Breakpoint10='P:\vista\tmg-cprs\CPRS-Chart\fFrame.pas',1076,'',0,1,'',1,0,0,'',1,'','',''
    254 Breakpoint11='P:\vista\tmg-cprs\CPRS-Chart\Templates\fTemplateDialog.pas',319,'',0,1,'',1,0,0,'',1,'','',''
    255 Breakpoint12='P:\vista\tmg-cprs\CPRS-Chart\Templates\fTemplateDialog.pas',387,'',0,1,'',1,0,0,'',1,'','',''
    256 Breakpoint13='P:\vista\tmg-cprs\CPRS-Chart\Templates\fTemplateDialog.pas',562,'',0,1,'',1,0,0,'',1,'','',''
    257 Breakpoint14='P:\vista\tmg-cprs\CPRS-Chart\Templates\fTemplateDialog.pas',370,'',0,1,'',1,0,0,'',1,'','',''
    258 Breakpoint15='P:\vista\tmg-cprs\CPRS-Chart\Templates\fTemplateDialog.pas',382,'',0,1,'',1,0,0,'',1,'','',''
    259 Breakpoint16='P:\vista\tmg-cprs\CPRS-Chart\rHTMLTools.pas',760,'',0,1,'',1,0,0,'',1,'','',''
    260 Breakpoint17='P:\vista\tmg-cprs\CPRS-Chart\Templates\uTemplates.pas',1946,'',0,1,'',1,0,0,'',1,'','',''
    261 Breakpoint18='P:\vista\tmg-cprs\CPRS-Chart\Templates\uTemplates.pas',1947,'',0,1,'',1,0,0,'',1,'','',''
    262 Breakpoint19='P:\vista\tmg-cprs\CPRS-Chart\Templates\rTemplates.pas',98,'',0,1,'',1,0,0,'',1,'','',''
    263 Breakpoint20='P:\vista\tmg-cprs\CPRS-Chart\Templates\uTemplates.pas',2167,'',0,1,'',1,0,0,'',1,'','',''
    264 Breakpoint21='P:\vista\tmg-cprs\CPRS-Chart\Templates\uTemplates.pas',1942,'',0,1,'',1,0,0,'',1,'','',''
    265 Breakpoint22='P:\vista\tmg-cprs\CPRS-Chart\Templates\uTemplates.pas',1928,'',0,1,'',1,0,0,'',1,'','',''
    266 Breakpoint23='P:\vista\tmg-cprs\CPRS-Chart\Templates\uTemplates.pas',580,'',0,1,'',1,0,0,'',1,'','',''
    267 Breakpoint24='P:\vista\tmg-cprs\CPRS-Chart\fOptionsNotes.pas',292,'',0,1,'',1,0,0,'',1,'','',''
    268 Breakpoint25='P:\vista\tmg-cprs\CPRS-Chart\Templates\uTemplates.pas',2474,'',0,1,'',1,0,0,'',1,'','',''
    269 Breakpoint26='P:\vista\tmg-cprs\CPRS-Chart\Templates\uTemplates.pas',1623,'',0,1,'',1,0,0,'',1,'','',''
    270 Breakpoint27='P:\vista\tmg-cprs\CPRS-Chart\Templates\fTemplateDialog.pas',209,'',0,1,'',1,0,0,'',1,'','',''
    271 Breakpoint28='P:\vista\tmg-cprs\CPRS-Chart\Templates\fTemplateDialog.pas',213,'',0,1,'',1,0,0,'',1,'','',''
    272 Breakpoint29='P:\vista\tmg-cprs\CPRS-Chart\fNotes.pas',3281,'',0,1,'',1,0,0,'',1,'','',''
    273 Breakpoint30='P:\vista\tmg-cprs\CPRS-Chart\fNotes.pas',3287,'',0,1,'',1,0,0,'',1,'','',''
    274 Breakpoint31='P:\vista\tmg-cprs\CPRS-Chart\Templates\uTemplates.pas',541,'',0,1,'',1,0,0,'',1,'','',''
    275 Breakpoint32='P:\vista\tmg-cprs\CPRS-Chart\Templates\uTemplates.pas',1949,'',0,1,'',1,0,0,'',1,'','',''
     439Breakpoint11='P:\vista\tmg-cprs\CPRS-Chart\Templates\fTemplateDialog.pas',373,'',0,1,'',1,0,0,'',1,'','',''
     440Breakpoint12='P:\vista\tmg-cprs\CPRS-Chart\Templates\uTemplates.pas',2167,'',0,1,'',1,0,0,'',1,'','',''
     441Breakpoint13='P:\vista\tmg-cprs\CPRS-Chart\fOptionsNotes.pas',292,'',0,1,'',1,0,0,'',1,'','',''
     442Breakpoint14='P:\vista\tmg-cprs\CPRS-Chart\fNotes.pas',3281,'',0,1,'',1,0,0,'',1,'','',''
     443Breakpoint15='P:\vista\tmg-cprs\CPRS-Chart\fNotes.pas',3287,'',0,1,'',1,0,0,'',1,'','',''
     444Breakpoint16='P:\vista\tmg-cprs\CPRS-Chart\fNotes.pas',4423,'',0,1,'',1,0,0,'',1,'','',''
     445Breakpoint17='P:\vista\tmg-cprs\CPRS-Chart\fNotes.pas',4156,'',0,1,'',1,0,0,'',1,'','',''
     446Breakpoint18='P:\vista\tmg-cprs\CPRS-Chart\fNotes.pas',4381,'',0,1,'',1,0,0,'',1,'','',''
     447Breakpoint19='P:\vista\tmg-cprs\CPRS-Chart\fNotes.pas',4783,'',0,1,'',1,0,0,'',1,'','',''
     448Breakpoint20='P:\vista\tmg-cprs\CPRS-Chart\fNotes.pas',4794,'',0,1,'',1,0,0,'',1,'','',''
     449Breakpoint21='P:\vista\tmg-cprs\CPRS-Chart\fNotes.pas',4803,'',0,1,'',1,0,0,'',1,'','',''
     450Breakpoint22='P:\vista\tmg-cprs\CPRS-Chart\fLabs.pas',2419,'',0,1,'',1,0,0,'',1,'','',''
     451Breakpoint23='P:\vista\tmg-cprs\CPRS-Chart\fReports.pas',2966,'',0,1,'',1,0,0,'',1,'','',''
     452Breakpoint24='P:\vista\tmg-cprs\CPRS-Chart\Consults\fConsults.pas',4882,'',0,1,'',1,0,0,'',1,'','',''
     453Breakpoint25='P:\vista\tmg-cprs\CPRS-Chart\Consults\fEditConsult.pas',718,'',0,1,'',1,0,0,'',1,'','',''
     454Breakpoint26='P:\vista\tmg-cprs\CPRS-Chart\Encounter\fEncounterFrame.pas',846,'',0,1,'',1,0,0,'',1,'','',''
     455Breakpoint27='P:\vista\tmg-cprs\CPRS-Chart\fFrame.pas',3959,'',0,1,'',1,0,0,'',1,'','',''
    276456
    277457[AddressBreakpoints]
    … …  
    361541Left=0
    362542Top=0
    363 Width=262
    364 Height=540
    365 MaxLeft=-1
    366 MaxTop=-1
    367 ClientWidth=262
    368 ClientHeight=540
     543Width=132
     544Height=123
     545MaxLeft=-1
     546MaxTop=-1
     547ClientWidth=132
     548ClientHeight=123
    369549TBDockHeight=492
    370550LRDockWidth=190
    371551Dockable=1
    372 SplitPos=114
     552SplitPos=65
    373553ArrangeBy=Name
    374 SelectedItem=Caption
     554SelectedItem=
    375555ExpandedItems=CalColors,EdgeBorders,Options
    376556HiddenCategories=Legacy
    … …  
    404584Left=650
    405585Top=247
    406 Width=933
     586Width=150
    407587Height=416
    408588MaxLeft=-1
    409589MaxTop=-1
    410 ClientWidth=925
     590ClientWidth=142
    411591ClientHeight=390
    412592TBDockHeight=411
    … …  
    440620Left=0
    441621Top=0
    442 Width=262
    443 Height=540
    444 MaxLeft=-1
    445 MaxTop=-1
    446 ClientWidth=262
    447 ClientHeight=540
     622Width=132
     623Height=123
     624MaxLeft=-1
     625MaxTop=-1
     626ClientWidth=132
     627ClientHeight=123
    448628TBDockHeight=175
    449629LRDockWidth=108
    … …  
    456636Left=0
    457637Top=0
    458 Width=307
    459 Height=216
    460 MaxLeft=-1
    461 MaxTop=-1
    462 ClientWidth=307
    463 ClientHeight=216
     638Width=981
     639Height=185
     640MaxLeft=-1
     641MaxTop=-1
     642ClientWidth=981
     643ClientHeight=185
    464644TBDockHeight=291
    465645LRDockWidth=417
    … …  
    563743State=0
    564744Left=0
    565 Top=12
     745Top=180
    566746Width=140
    567 Height=297
     747Height=156
    568748MaxLeft=-1
    569749MaxTop=-1
    570750ClientWidth=140
    571 ClientHeight=297
    572 TBDockHeight=297
     751ClientHeight=156
     752TBDockHeight=463
    573753LRDockWidth=140
    574754Dockable=1
    … …  
    578758Visible=1
    579759State=0
    580 Left=343
     760Left=12
    581761Top=0
    582 Width=452
    583 Height=245
    584 MaxLeft=-1
    585 MaxTop=-1
    586 ClientWidth=452
    587 ClientHeight=245
    588 TBDockHeight=245
     762Width=989
     763Height=140
     764MaxLeft=-1
     765MaxTop=-1
     766ClientWidth=989
     767ClientHeight=140
     768TBDockHeight=140
    589769LRDockWidth=443
    590770Dockable=1
    … …  
    599779State=0
    600780Left=12
    601 Top=0
    602 Width=315
    603 Height=245
    604 MaxLeft=-1
    605 MaxTop=-1
    606 ClientWidth=315
    607 ClientHeight=245
    608 TBDockHeight=245
     781Top=144
     782Width=989
     783Height=214
     784MaxLeft=-1
     785MaxTop=-1
     786ClientWidth=989
     787ClientHeight=214
     788TBDockHeight=214
    609789LRDockWidth=283
    610790Dockable=1
    … …  
    618798Visible=1
    619799State=0
    620 Left=10
    621 Top=128
    622 Width=278
    623 Height=595
    624 MaxLeft=-1
    625 MaxTop=-1
    626 ClientWidth=270
    627 ClientHeight=569
     800Left=0
     801Top=12
     802Width=140
     803Height=152
     804MaxLeft=-1
     805MaxTop=-1
     806ClientWidth=140
     807ClientHeight=152
    628808TBDockHeight=552
    629 LRDockWidth=272
     809LRDockWidth=140
    630810Dockable=1
    631811TabPosition=0

  • cprs/branches/tmg-cprs/CPRS-Chart/Templates/uTemplateFields.pas

    r654 r694  
    55
    66uses
    7   Forms, SysUtils, Classes, Dialogs, StdCtrls, ExtCtrls, Controls, Contnrs,
     7  Forms, SysUtils, StrUtils, Classes, Dialogs, StdCtrls, ExtCtrls, Controls, Contnrs,
    88  Graphics, ORClasses, ComCtrls, ORDtTm;
    99
    … …  
    454454end;
    455455
    456 procedure WordWrapText(var Txt: string);
     456procedure WordWrapText(var Txt: string; HTMLMode : boolean);
    457457var
    458458  TmpSL: TStringList;
    459459  i: integer;
    460460
    461   function WrappedText(const Str: string): string;
     461  function WrappedText(const Str: string; boolHTMLMode : boolean): string;
    462462  var
    463     i, i2, j, k: integer;
    464     Temp: string;
     463    i, i2, j, k, m: integer;
     464    HTMLStrLen : integer;
     465    Temp, Temp1, Temp2: string;
    465466
    466467  begin
    … …  
    508509
    509510    Result := Result + Temp;
    510     Result := WrapText(Result, #13#10, [' '], MAX_ENTRY_WIDTH);
     511
     512    //Count the HTML tag length and add to MAX_ENTRY WIDTH   elh 1-29-10
     513    HTMLStrLen := 0;
     514    if boolHTMLMode = True then begin
     515      temp1 := Result;
     516      while (pos('<',temp1)>0) and (pos('>',temp1)>0) do
     517      begin
     518         temp2 := MidStr(temp1,pos('<',temp1),pos('>',temp1)-pos('<',temp1)+1);
     519         HTMLStrLen := HTMLStrLen + strlen(PChar(temp2));
     520         temp1 := Rightstr(temp1,strlen(PChar(temp1))-pos('>',temp1));
     521      end;
     522    end;
     523
     524    Result := WrapText(Result, #13#10, [' '], MAX_ENTRY_WIDTH+HTMLStrLen);  //added +HTMLStrLen  elh 1-29-10
    511525    repeat
    512526      i := pos(#1, Result);
    … …  
    527541        if Txt <> '' then
    528542          Txt := Txt + CRLF;
    529         Txt := Txt + WrappedText(TmpSL[i]);
     543        Txt := Txt + WrappedText(TmpSL[i],HTMLMode);
    530544      end;
    531545    finally
    … …  
    635649  until(i = 0);
    636650  if not AutoWrap then
    637     WordWrapText(Result);
     651    WordWrapText(Result,HTMLMode);
    638652
    639653end;

  • cprs/branches/tmg-cprs/CPRS-Chart/fFrame.pas

    r667 r694  
    50455045
    50465046  begin
    5047   //NOTE: Something in this function is causing MS Vista to not
    5048   //show tab text. I am commenting a few items to test at home on
    5049   //a 64-bit Vista machine.    //elh  01-11-10
    50505047    oRect    := Rect;
    50515048    inactiveColor := Darken(Color,75);  //75%
Note: See TracChangeset for help on using the changeset viewer.