Changeset 490 for cprs/branches/tmg-cprs/CPRS-Chart/CPRSChart.dpr

Timestamp:

Sep 17, 2008, 3:28:02 PM (16 years ago)

Author:

Kevin Toppenberg

Message:

new RPC broker

File:

• cprs/branches/tmg-cprs/CPRS-Chart/CPRSChart.dpr (modified) (2 diffs)

cprs/branches/tmg-cprs/CPRS-Chart/CPRSChart.dpr

@@ -335 +335 @@
     end;
     //Application.Title := DKLangConstW('STestMessage'); //kt 7-1-09
-    Application.Title := 'CPRS - Patient Chart';  //kt 7-1-09 <-- original line
+    Application.Title := 'CPRS - Patient Chart';  //kt 7-1-09 <-- original line restored
     Application.HelpFile := 'cprs.hlp';
     Application.CreateForm(TdmodShared, dmodShared);
@@ -351 +351 @@
     Application.Run;
   end;
-  {$IFDEF USE_SKINS}
-  if SkinManager <> nil then SkinManager.Active := false;  //turn off before destroying forms...
-  {$ENDIF}
 end.