Răsfoiți Sursa

+ TSysCharSet

peter 25 ani în urmă
părinte
comite
41fce946a7
1 a modificat fișierele cu 7 adăugiri și 2 ștergeri
  1. 7 2
      rtl/objpas/sysutils.pp

+ 7 - 2
rtl/objpas/sysutils.pp

@@ -45,6 +45,8 @@ type
 
 
    tfilename = string;
    tfilename = string;
 
 
+   tsyscharset = set of char;
+
    longrec = packed record
    longrec = packed record
       lo,hi : word;
       lo,hi : word;
    end;
    end;
@@ -306,7 +308,10 @@ Finalization
 end.
 end.
 {
 {
     $Log$
     $Log$
-    Revision 1.45  2000-04-24 13:34:29  peter
+    Revision 1.46  2000-06-11 07:07:23  peter
+      + TSysCharSet
+
+    Revision 1.45  2000/04/24 13:34:29  peter
       * added enhancedraise define
       * added enhancedraise define
 
 
     Revision 1.43  2000/03/30 13:54:15  pierre
     Revision 1.43  2000/03/30 13:54:15  pierre
@@ -352,4 +357,4 @@ end.
     Revision 1.29  1999/07/27 13:01:12  peter
     Revision 1.29  1999/07/27 13:01:12  peter
       + filerec,textrec declarations
       + filerec,textrec declarations
 
 
-}
+}