source: cprs/branches/foia-cprs/CPRS-Chart/CPRSChart.dpr@ 1381

Last change on this file since 1381 was 462, checked in by Kevin Toppenberg, 16 years ago

Upload of OR_30_270, 1.0.26.69

File size: 16.4 KB
RevLine 
[459]1program CPRSChart;
2
3uses
[460]4 ShareMem,
[459]5 Forms,
6 ORSystem,
7 fPage in 'fPage.pas' {frmPage},
8 fHSplit in 'fHSplit.pas' {frmHSplit},
9 fHP in 'fHP.pas' {frmHP},
10 fCover in 'fCover.pas' {frmCover},
11 fMeds in 'fMeds.pas' {frmMeds},
12 fNotes in 'fNotes.pas' {frmNotes},
13 fDCSumm in 'fDCSumm.pas' {frmDCSumm},
14 fLabs in 'fLabs.pas' {frmLabs},
15 fReports in 'fReports.pas' {frmReports},
16 uCore in 'uCore.pas',
17 fPtSel in 'fPtSel.pas' {frmPtSel},
18 fPtSens in 'fPtSens.pas' {frmPtSens},
19 rCore in 'rCore.pas',
20 fEncnt in 'fEncnt.pas' {frmEncounter},
21 fVisit in 'fVisit.pas' {frmVisit},
22 fPtDemo in 'fPtDemo.pas' {frmPtDemo},
23 rTIU in 'rTIU.pas',
24 fxBroker in 'fxBroker.pas' {frmBroker},
25 fNoteBA in 'fNoteBA.pas' {frmNotesByAuthor},
26 fNoteBD in 'fNoteBD.pas' {frmNotesByDate},
27 fLabTest in 'fLabTest.pas' {frmLabTest},
28 fLabTestGroups in 'fLabTestGroups.pas' {frmLabTestGroups},
29 fLabTests in 'fLabTests.pas' {frmLabTests},
30 rLabs in 'rLabs.pas',
31 fSignItem in 'fSignItem.pas' {frmSignItem},
32 rCover in 'rCover.pas',
33 fRptBox in 'fRptBox.pas' {frmReportBox},
34 rReports in 'rReports.pas',
35 fAbout in 'fAbout.pas' {frmAbout},
36 fxLists in 'fxLists.pas' {frmDbgList},
37 fProbs in 'fProbs.pas' {frmProblems},
38 fAutoSz in 'fAutoSz.pas' {frmAutoSz},
39 rMisc in 'rMisc.pas',
40 fxServer in 'fxServer.pas' {frmDbgServer},
41 fPtCWAD in 'fPtCWAD.pas' {frmPtCWAD},
42 rMeds in 'rMeds.pas',
43 fVitals in 'fVitals.pas' {frmVitals},
44 uProbs in 'uProbs.pas',
45 fProbEdt in 'fProbEdt.pas' {frmdlgProb},
46 fProbflt in 'fProbFlt.pas' {frmPlVuFilt},
47 fProbCmt in 'fProbCmt.pas' {frmProbCmt},
48 fNoteCslt in 'fNoteCslt.pas' {frmNoteConsult},
49 fNotePrt in 'fNotePrt.pas' {frmNotePrint},
50 uConst in 'uConst.pas',
51 fConsults in 'Consults\fConsults.pas' {frmConsults},
52 fLkUpLocation in 'fLkUpLocation.pas' {frmLkUpLocation},
53 fRename in 'fRename.pas' {frmRename},
54 fDateRange in 'fDateRange.pas' {frmDateRange},
55 fRenewOutMed in 'fRenewOutMed.pas' {frmRenewOutMed},
56 fConsult513Prt in 'Consults\fConsult513Prt.pas' {frm513Print},
57 fConsultAct in 'Consults\fConsultAct.pas' {frmConsultAction},
58 fConsultAlertTo in 'Consults\fConsultAlertTo.pas' {frmConsultAlertsTo},
59 fConsultBD in 'Consults\fConsultBD.pas' {frmConsultsByDate},
60 fConsultBS in 'Consults\fConsultBS.pas' {frmConsultsByService},
61 fConsultBSt in 'Consults\fConsultBSt.pas' {frmConsultsByStatus},
62 fConsultsView in 'Consults\fConsultsView.pas' {frmConsultsView},
63 rConsults in 'Consults\rConsults.pas',
64 uConsults in 'Consults\uConsults.pas',
65 fTimeout in 'fTimeout.pas' {frmTimeout},
66 fNoteDR in 'fNoteDR.pas' {frmNoteDelReason},
67 rDCSumm in 'rDCSumm.pas',
68 fSplash in 'fSplash.pas' {frmSplash},
69 fCsltNote in 'Consults\fCsltNote.pas' {frmCsltNote},
70 rProbs in 'rProbs.pas',
71 fEditConsult in 'Consults\fEditConsult.pas' {frmEditCslt},
72 fEditProc in 'Consults\fEditProc.pas' {frmEditProc},
73 fAllgyFind in 'fAllgyFind.pas' {frmAllgyFind},
74 fAddlSigners in 'fAddlSigners.pas' {frmAddlSigners},
75 fLabPrint in 'fLabPrint.pas' {frmLabPrint},
76 fReportsPrint in 'fReportsPrint.pas' {frmReportPrt},
77 fvit in 'fvit.pas' {frmVit},
78 uPCE in 'Encounter\uPCE.pas',
79 fEncounterFrame in 'Encounter\fEncounterFrame.pas' {frmEncounterFrame},
80 fPCEBase in 'Encounter\fPCEBase.pas' {frmPCEBase},
81 fPCELex in 'Encounter\fPCELex.pas' {frmPCELex},
82 fPCEOther in 'Encounter\fPCEOther.pas' {frmPCEOther},
83 fProcedure in 'Encounter\fProcedure.pas' {frmProcedures},
84 fSkinTest in 'Encounter\fSkinTest.pas' {frmSkinTests},
85 fVisitType in 'Encounter\fVisitType.pas' {frmVisitType},
86 rPCE in 'Encounter\rPCE.pas',
87 fDiagnoses in 'Encounter\fDiagnoses.pas' {frmDiagnoses},
88 fPatientEd in 'Encounter\fPatientEd.pas' {frmPatientEd},
89 fExam in 'Encounter\fExam.pas' {frmExams},
90 fHealthFactor in 'Encounter\fHealthFactor.pas' {frmHealthFactors},
91 fImmunization in 'Encounter\fImmunization.pas' {frmImmunizations},
92 fEncVitals in 'Encounter\fEncVitals.pas' {frmEncVitals},
93 fEffectDate in 'fEffectDate.pas' {frmEffectDate},
94 fPtSelDemog in 'fPtSelDemog.pas' {frmPtSelDemog},
95 fPtSelOptns in 'fPtSelOptns.pas' {frmPtSelOptns},
96 uInit in 'uInit.pas',
97 uSpell in 'uSpell.pas',
98 dShared in 'dShared.pas' {dmodShared: TDataModule},
99 fDrawers in 'fDrawers.pas' {frmDrawers},
100 fMedCopy in 'fMedCopy.pas' {frmMedCopy},
101 uReminders in 'uReminders.pas',
102 rReminders in 'rReminders.pas',
103 fReminderTree in 'fReminderTree.pas' {frmReminderTree},
104 fReminderDialog in 'fReminderDialog.pas' {frmRemDlg},
105 fReportsAdhocSubItem1 in 'fReportsAdhocSubItem1.pas' {frmReportsAdhocSubItem1},
106 fReportsAdhocComponent1 in 'fReportsAdhocComponent1.pas' {frmReportsAdhocComponent1},
107 fPtSelMsg in 'fPtSelMsg.pas' {frmPtSelMsg},
108 fMHTest in 'fMHTest.pas' {frmMHTest},
109 fGAF in 'Encounter\fGAF.pas' {frmGAF},
110 fPCEProvider in 'Encounter\fPCEProvider.pas' {frmPCEProvider},
111 fPCEBaseGrid in 'Encounter\fPCEBaseGrid.pas' {frmPCEBaseGrid},
112 fPCEBaseMain in 'Encounter\fPCEBaseMain.pas' {frmPCEBaseMain},
113 fNoteProps in 'fNoteProps.pas' {frmNoteProperties},
114 fNotesBP in 'fNotesBP.pas' {frmNotesBP},
115 fLabInfo in 'fLabInfo.pas' {frmLabInfo},
116 fPreReq in 'Consults\fPreReq.pas' {frmPrerequisites},
117 fDCSummProps in 'fDCSummProps.pas' {frmDCSummProperties},
118 fHFSearch in 'Encounter\fHFSearch.pas' {frmHFSearch},
119 fConsMedRslt in 'Consults\fConsMedRslt.pas' {frmConsMedRslt},
120 mVitMetric in 'Vitals\mVitMetric.pas' {fraVitMetric: TFrame},
121 mVitAll in 'Vitals\mVitAll.pas' {fraVitAll: TFrame},
122 mVitBase in 'Vitals\mVitBase.pas' {fraVitBase: TFrame},
123 uVitals in 'Vitals\uVitals.pas',
124 rVitals in 'Vitals\rVitals.pas',
125 mVitPulse in 'Vitals\mVitPulse.pas' {fraVitPulse: TFrame},
126 mVitResp in 'Vitals\mVitResp.pas' {fraVitResp: TFrame},
127 mVitBP in 'Vitals\mVitBP.pas' {fraVitPB: TFrame},
128 mVitTemp in 'Vitals\mVitTemp.pas' {fraVitTemp: TFrame},
129 mVitHeight in 'Vitals\mVitHeight.pas' {fraVitHeight: TFrame},
130 mVitWeight in 'Vitals\mVitWeight.pas' {fraVitWeight: TFrame},
131 mVitPain in 'Vitals\mVitPain.pas' {fraVitPain: TFrame},
132 mVitPO2 in 'Vitals\mVitPO2.pas' {fraVitPO2: TFrame},
133 mVitCVP in 'Vitals\mVitCVP.pas' {fraVitCVP: TFrame},
134 mVitCirGirth in 'Vitals\mVitCirGirth.pas' {fraVitCircum: TFrame},
135 uDCSumm in 'uDCSumm.pas',
136 uDocTree in 'uDocTree.pas',
137 fVitalsDate in 'Vitals\fVitalsDate.pas' {frmVitalsDate},
138 uTemplates in 'Templates\uTemplates.pas',
139 fTemplateDialog in 'Templates\fTemplateDialog.pas' {frmTemplateDialog},
140 fTemplateEditor in 'Templates\fTemplateEditor.pas' {frmTemplateEditor},
141 fTemplateFieldEditor in 'Templates\fTemplateFieldEditor.pas' {frmTemplateFieldEditor},
142 fTemplateFields in 'Templates\fTemplateFields.pas' {frmTemplateFields},
143 fTemplateObjects in 'Templates\fTemplateObjects.pas' {frmTemplateObjects},
144 fTemplateView in 'Templates\fTemplateView.pas' {frmTemplateView},
145 mTemplateFieldButton in 'Templates\mTemplateFieldButton.pas' {fraTemplateFieldButton: TFrame},
146 rTemplates in 'Templates\rTemplates.pas',
147 uTemplateFields in 'Templates\uTemplateFields.pas',
148 fTemplateAutoGen in 'Templates\fTemplateAutoGen.pas' {frmTemplateAutoGen},
149 mVisitRelated in 'Encounter\mVisitRelated.pas' {fraVisitRelated: TFrame},
150 fRemVisitInfo in 'fRemVisitInfo.pas' {frmRemVisitInfo},
151 fIconLegend in 'fIconLegend.pas' {frmIconLegend},
152 mImgText in 'mImgText.pas' {fraImgText: TFrame},
153 fTemplateImport in 'Templates\fTemplateImport.pas' {frmTemplateImport},
154 fRemCoverSheet in 'fRemCoverSheet.pas' {frmRemCoverSheet},
155 uTIU in 'uTIU.pas',
156 fRemCoverPreview in 'fRemCoverPreview.pas' {frmRemCoverPreview},
157 fPCEEdit in 'Encounter\fPCEEdit.pas' {frmPCEEdit},
158 uSurgery in 'uSurgery.pas',
159 fSurgeryView in 'fSurgeryView.pas' {frmSurgeryView},
160 rSurgery in 'rSurgery.pas',
161 uCaseTree in 'uCaseTree.pas',
162 fSurgery in 'fSurgery.pas' {frmSurgery},
163 fNoteIDParents in 'fNoteIDParents.pas' {frmNoteIDParents},
164 uReports in 'uReports.pas',
165 fNoteCPFields in 'fNoteCPFields.pas' {frmNoteCPFields},
166 CPRSChart_TLB in 'CPRSChart_TLB.pas',
167 uEventHooks in 'uEventHooks.pas',
168 rEventHooks in 'rEventHooks.pas',
169 fPtSelOptSave in 'fPtSelOptSave.pas' {frmPtSelOptSave},
170 uOrders in 'Orders\uOrders.pas',
171 fOCSession in 'Orders\fOCSession.pas' {frmOCSession},
172 fODAuto in 'Orders\fODAuto.pas',
173 fODBase in 'Orders\fODBase.pas' {frmODBase},
174 fODDiet in 'Orders\fODDiet.pas' {frmODDiet},
175 fODDietLT in 'Orders\fODDietLT.pas' {frmODDietLT},
176 fODGen in 'Orders\fODGen.pas' {frmODGen},
177 fODLab in 'Orders\fODLab.pas' {frmODLab},
178 fODLabImmedColl in 'Orders\fODLabImmedColl.pas' {frmODLabImmedColl},
179 fODLabOthCollSamp in 'Orders\fODLabOthCollSamp.pas' {frmODLabOthCollSamp},
180 fODLabOthSpec in 'Orders\fODLabOthSpec.pas' {frmODLabOthSpec},
181 fODMedComplex in 'Orders\fODMedComplex.pas' {frmODMedComplex},
182 fODMedFA in 'Orders\fODMedFA.pas' {frmODMedFA},
183 fODMedIn in 'Orders\fODMedIn.pas' {frmODMedIn},
184 fODMedIV in 'Orders\fODMedIV.pas' {frmODMedIV},
185 fODMedOIFA in 'Orders\fODMedOIFA.pas' {frmODMedOIFA},
186 fODMedOut in 'Orders\fODMedOut.pas' {frmODMedOut},
187 fODMeds in 'Orders\fODMeds.pas' {frmODMeds},
188 fODMessage in 'Orders\fODMessage.pas' {frmODMessage},
189 fODMisc in 'Orders\fODMisc.pas' {frmODMisc},
190 fODRad in 'Orders\fODRad.pas' {frmODRad},
191 fODRadApproval in 'Orders\fODRadApproval.pas' {frmODRadApproval},
192 fODRadConShRes in 'Orders\fODRadConShRes.pas' {frmODRadConShRes},
193 fODRadImType in 'Orders\fODRadImType.pas' {frmODRadImType},
194 fODSaveQuick in 'Orders\fODSaveQuick.pas' {frmODQuick},
195 fODText in 'Orders\fODText.pas' {frmODText},
196 fODVitals in 'Orders\fODVitals.pas' {frmODVitals},
197 fOMAction in 'Orders\fOMAction.pas' {frmOMAction},
198 fOMHTML in 'Orders\fOMHTML.pas' {frmOMHTML},
199 fOMNavA in 'Orders\fOMNavA.pas' {frmOMNavA},
200 fOMProgress in 'Orders\fOMProgress.pas' {frmOMProgress},
201 fOMSet in 'Orders\fOMSet.pas' {frmOMSet},
202 fOMVerify in 'Orders\fOMVerify.pas' {frmOMVerify},
203 fOrderComment in 'Orders\fOrderComment.pas' {frmWardComments},
204 fOrderFlag in 'Orders\fOrderFlag.pas' {frmFlagOrder},
205 fOrders in 'Orders\fOrders.pas' {frmOrders},
206 fOrdersAlert in 'Orders\fOrdersAlert.pas' {frmAlertOrders},
207 fOrderSaveQuick in 'Orders\fOrderSaveQuick.pas' {frmSaveQuickOrder},
208 fOrdersComplete in 'Orders\fOrdersComplete.pas' {frmCompleteOrders},
209 fOrdersCopy in 'Orders\fOrdersCopy.pas' {frmCopyOrders},
210 fOrdersDC in 'Orders\fOrdersDC.pas' {frmDCOrders},
211 fOrdersHold in 'Orders\fOrdersHold.pas' {frmHoldOrders},
212 fOrdersOnChart in 'Orders\fOrdersOnChart.pas' {frmOnChartOrders},
213 fOrdersPrint in 'Orders\fOrdersPrint.pas' {frmOrdersPrint},
214 fOrdersRefill in 'Orders\fOrdersRefill.pas' {frmRefillOrders},
215 fOrdersRelease in 'Orders\fOrdersRelease.pas' {frmReleaseOrders},
216 fOrdersRenew in 'Orders\fOrdersRenew.pas' {frmRenewOrders},
217 fOrdersSign in 'Orders\fOrdersSign.pas' {frmSignOrders},
218 fOrdersTS in 'Orders\fOrdersTS.pas' {frmOrdersTS},
219 fOrdersUnhold in 'Orders\fOrdersUnhold.pas' {frmUnholdOrders},
220 fOrdersVerify in 'Orders\fOrdersVerify.pas' {frmVerifyOrders},
221 fOrderUnflag in 'Orders\fOrderUnflag.pas' {frmUnflagOrder},
222 fOrderVw in 'Orders\fOrderVw.pas' {frmOrderView},
223 rODAllergy in 'Orders\rODAllergy.pas',
224 rODBase in 'Orders\rODBase.pas',
225 rODDiet in 'Orders\rODDiet.pas',
226 rODLab in 'Orders\rODLab.pas',
227 rODMeds in 'Orders\rODMeds.pas',
228 rODRad in 'Orders\rODRad.pas',
229 rOrders in 'Orders\rOrders.pas',
230 uODBase in 'Orders\uODBase.pas',
231 fOCAccept in 'Orders\fOCAccept.pas' {frmOCAccept},
232 fODConsult in 'Consults\fODConsult.pas' {frmODCslt},
233 fODProc in 'Consults\fODProc.pas' {frmODProc},
234 uOptions in 'Options\uOptions.pas',
235 fOptionsCombinations in 'Options\fOptionsCombinations.pas' {frmOptionsCombinations},
236 fOptionsDays in 'Options\fOptionsDays.pas' {frmOptionsDays},
237 fOptionsLists in 'Options\fOptionsLists.pas' {frmOptionsLists},
238 fOptionsNewList in 'Options\fOptionsNewList.pas' {frmOptionsNewList},
239 fOptionsNotes in 'Options\fOptionsNotes.pas' {frmOptionsNotes},
240 fOptionsOther in 'Options\fOptionsOther.pas' {frmOptionsOther},
241 fOptionsPatientSelection in 'Options\fOptionsPatientSelection.pas' {frmOptionsPatientSelection},
242 fOptionsPrimaryList in 'Options\fOptionsPrimaryList.pas' {frmOptionsPrimaryList},
243 fOptionsReminders in 'Options\fOptionsReminders.pas' {frmOptionsReminders},
244 fOptionsReportsCustom in 'Options\fOptionsReportsCustom.pas' {frmOptionsReportsCustom},
245 fOptionsReportsDefault in 'Options\fOptionsReportsDefault.pas' {frmOptionsReportsDefault},
246 fOptionsSubscribe in 'Options\fOptionsSubscribe.pas' {frmOptionsSubscribe},
247 fOptionsSurrogate in 'Options\fOptionsSurrogate.pas' {frmOptionsSurrogate},
248 fOptionsTeams in 'Options\fOptionsTeams.pas' {frmOptionsTeams},
249 fOptionsTitles in 'Options\fOptionsTitles.pas' {frmOptionsTitles},
250 rOptions in 'Options\rOptions.pas',
251 fOptions in 'Options\fOptions.pas' {frmOptions},
252 uSignItems in 'uSignItems.pas',
253 mCoPayDesc in 'mCoPayDesc.pas' {fraCoPayDesc: TFrame},
254 XuDigSigSC_TLB in 'XuDigSigSC_TLB.pas',
255 fOrdersCV in 'Orders\fOrdersCV.pas' {frmChgEvent},
256 fODReleaseEvent in 'Orders\fODReleaseEvent.pas' {frmOrdersReleaseEvent},
257 fODActive in 'Orders\fODActive.pas' {frmODActive},
258 fDefaultEvent in 'fDefaultEvent.pas' {frmDefaultEvent},
259 mEvntDelay in 'mEvntDelay.pas' {fraEvntDelayList: TFrame},
260 fOrdersEvntRelease in 'Orders\fOrdersEvntRelease.pas' {frmOrdersEvntRelease},
261 rECS in 'rECS.pas',
262 fODChangeEvtDisp in 'Orders\fODChangeEvtDisp.pas' {frmChangeEventDisp},
263 fODValidateAction in 'Orders\fODValidateAction.pas' {frmInvalidActionList},
264 fODChild in 'Orders\fODChild.pas' {frmODChild},
265 uAccessibleStringGrid in 'uAccessibleStringGrid.pas' {AccessibleStringGrid: CoClass},
266 Accessibility_TLB in 'Accessibility_TLB.pas',
267 uAccessibleListBox in 'uAccessibleListBox.pas' {AccessibleListBox: CoClass},
268 uAccessibleTreeNode in 'uAccessibleTreeNode.pas' {IAccessibleTreeNode: CoClass},
269 uAccessibleTreeView in 'uAccessibleTreeView.pas' {AccessibleTreeView: CoClass},
270 fDupPts in 'fDupPts.pas' {frmDupPts},
271 VERGENCECONTEXTORLib_TLB in 'VERGENCECONTEXTORLib_TLB.pas',
272 uOrPtf in 'uOrPtf.pas',
273 fPatientFlagMulti in 'fPatientFlagMulti.pas' {frmFlags},
274 fFrame in 'fFrame.pas' {frmFrame},
275 fAlertForward in 'fAlertForward.pas' {frmAlertForward},
276 fODMedNVA in 'Orders\fODMedNVA.pas' {frmODMedNVA},
277 uAccessibleRichEdit in 'uAccessibleRichEdit.pas' {AccessibleRichEdit: CoClass},
278 fPrintList in 'fPrintList.pas' {frmPrintList},
279 fODChangeUnreleasedRenew in 'Orders\fODChangeUnreleasedRenew.pas' {frmODChangeUnreleasedRenew},
280 UBAMessages in 'BA\UBAMessages.pas',
281 UBAConst in 'BA\UBAConst.pas',
282 UBAGlobals in 'BA\UBAGlobals.pas',
283 fBALocalDiagnoses in 'BA\fBALocalDiagnoses.pas' {frmBALocalDiagnoses},
284 fReview in 'fReview.pas' {frmReview},
285 fARTFreeTextMsg in 'fARTFreeTextMsg.pas' {frmARTFreeTextMsg},
286 fAllgyBox in 'fAllgyBox.pas' {frmAllgyBox},
287 fARTAllgy in 'fARTAllgy.pas' {frmARTAllergy},
288 UBACore in 'BA\UBACore.pas',
289 fBAOptionsDiagnoses in 'BA\fBAOptionsDiagnoses.pas' {frmBAOptionsDiagnoses},
[460]290 fOtherSchedule in 'Orders\fOtherSchedule.pas' {frmOtherSchedule},
291 fODBBank in 'Orders\fODBBank.pas' {frmODBBank},
292 fNoteST in 'fNoteST.pas' {frmNotesSearchText},
293 fNoteSTStop in 'fNoteSTStop.pas' {frmSearchStop},
294 rGraphs in 'rGraphs.pas',
295 fGraphs in 'fGraphs.pas' {frmGraphs},
296 fGraphSettings in 'fGraphSettings.pas' {frmGraphSettings},
297 fGraphProfiles in 'fGraphProfiles.pas' {frmGraphProfiles},
298 uGraphs in 'uGraphs.pas',
299 fClinicWardMeds in 'fClinicWardMeds.pas' {frmClinicWardMeds},
300 fActivateDeactivate in 'fActivateDeactivate.pas' {frmActivateDeactive},
301 uFormMonitor in 'uFormMonitor.pas';
[459]302
303{$R *.TLB}
304
305{$R *.RES}
306
307begin
308 if not UpdateSelf then // only start if not copying new version
309 begin
310 RegisterCPRSTypeLibrary; // will halt program if /regserver or /unregserver param
311 Application.Initialize;
312 frmSplash := nil;
313 if ParamSearch('SPLASH') <> 'OFF' then
314 begin
315 frmSplash := TfrmSplash.Create(Application); // show splash screen
316 frmSplash.Show; // "
317 frmSplash.Refresh; // "
318 end;
319 Application.Title := 'CPRS - Patient Chart';
320 Application.HelpFile := 'cprs.hlp';
321 Application.CreateForm(TdmodShared, dmodShared);
322 Application.CreateForm(TfrmFrame, frmFrame);
[460]323 Application.CreateForm(TfrmSearchStop, frmSearchStop);
[459]324 frmSplash.Free; // close & free splash screen
325 Application.Run;
326 end;
327end.
Note: See TracBrowser for help on using the repository browser.