瀏覽代碼

* some comments about COMSTAT added

marco 20 年之前
父節點
當前提交
212676c96c
共有 1 個文件被更改,包括 10 次插入3 次删除
  1. 10 3
      rtl/win32/wininc/struct.inc

+ 10 - 3
rtl/win32/wininc/struct.inc

@@ -928,8 +928,12 @@
      TCOMPOSITIONFORM = COMPOSITIONFORM;
      TCOMPOSITIONFORM = COMPOSITIONFORM;
      PCOMPOSITIONFORM = ^COMPOSITIONFORM;
      PCOMPOSITIONFORM = ^COMPOSITIONFORM;
 
 
+//     TComStatFlags = set of (fCtsHold, fDsrHold, fRlsdHold , fXoffHold ,
+//		      fXoffSent , fEof ,  fTxim  , fReserved);
+
      COMSTAT = record
      COMSTAT = record
-          flag0 : DWORD;
+          flag0 : DWORD;   // can't use tcomstatflags, set packing issues
+			   // and conflicts with macro's
           cbInQue : DWORD;
           cbInQue : DWORD;
           cbOutQue : DWORD;
           cbOutQue : DWORD;
        end;
        end;
@@ -954,7 +958,7 @@
      bp_COMSTAT_fTxim = 6;
      bp_COMSTAT_fTxim = 6;
      bm_COMSTAT_fReserved = $FFFFFF80;
      bm_COMSTAT_fReserved = $FFFFFF80;
      bp_COMSTAT_fReserved = 7;
      bp_COMSTAT_fReserved = 7;
-  function fCtsHold(var a : COMSTAT) : DWORD;
+  function fCtsHold(var a : COMSTAT) : DWORD;  // should be renamed to get_<x>?
   procedure set_fCtsHold(var a : COMSTAT; __fCtsHold : DWORD);
   procedure set_fCtsHold(var a : COMSTAT; __fCtsHold : DWORD);
   function fDsrHold(var a : COMSTAT) : DWORD;
   function fDsrHold(var a : COMSTAT) : DWORD;
   procedure set_fDsrHold(var a : COMSTAT; __fDsrHold : DWORD);
   procedure set_fDsrHold(var a : COMSTAT; __fDsrHold : DWORD);
@@ -7164,7 +7168,10 @@ type
 
 
 {
 {
   $Log$
   $Log$
-  Revision 1.31  2005-01-08 14:43:34  florian
+  Revision 1.32  2005-01-19 14:24:46  marco
+   * some comments about COMSTAT added
+
+  Revision 1.31  2005/01/08 14:43:34  florian
     + added LOGFONTW
     + added LOGFONTW
 
 
   Revision 1.30  2005/01/08 14:39:01  florian
   Revision 1.30  2005/01/08 14:39:01  florian