read.txt

git-svn-id: https://svn.code.sf.net/p/kolmck/code@17 91bb2d04-0c0c-4d2d-88a5-bbb6f4c1fa07

System/D2007beta/SysSfIni.pas

@@ -0,0 +1,22 @@
+unit SysSfIni;
+{X: this unit must be referenced in uses clause of dpr as earlier as possible,
+    if You want to use try-execpt/raise protected initialization and finalization
+    for your units. }
+
+{$O+,H+,I-,S-}
+
+interface
+
+implementation
+
+initialization
+
+  InitUnitsProc := InitUnitsHard;
+  FInitUnitsProc := FInitUnitsHard;
+  UnregisterModule := UnregisterModuleSafely;
+  UnsetExceptionHandlerProc := UnsetExceptionHandler;
+  SetExceptionHandler;
+
+finalization
+
+end.