Browse Source

+ Removed defaultmode field from driver

michael 24 years ago
parent
commit
e68b5a2ae4
2 changed files with 8 additions and 10 deletions
  1. 4 2
      rtl/inc/videoh.inc
  2. 4 8
      rtl/unix/video.pp

+ 4 - 2
rtl/inc/videoh.inc

@@ -38,7 +38,6 @@ type
     GetCursorType     : function : Word;
     SetCursorType     : procedure (NewType: Word);
     GetCapabilities   : Function : Word;
-    DefaultVideoMode  : TVideoMode;
   end;
 
 const
@@ -165,7 +164,10 @@ const
 
 {
   $Log$
-  Revision 1.5  2001-10-06 22:28:24  michael
+  Revision 1.6  2001-10-13 12:59:46  michael
+  + Removed defaultmode field from driver
+
+  Revision 1.5  2001/10/06 22:28:24  michael
   + Merged video mode selection/setting system
 
   Revision 1.4  2001/10/04 20:51:56  michael

+ 4 - 8
rtl/unix/video.pp

@@ -803,12 +803,6 @@ begin
 end;
 
 Const
-  SysVideoMode : TVideoMode = (
-    Col   : 80;
-    Row   : 25;
-    Color : True;
-  );
-
   SysVideoDriver : TVideoDriver = (
     InitDriver : @SysInitVideo;
     DoneDriver : @SysDoneVideo;
@@ -821,7 +815,6 @@ Const
     GetCursorType : @SysGetCursorType;
     SetCursorType : @SysSetCursorType;
     GetCapabilities : @SysGetCapabilities;
-    DefaultVideoMode : (Col : 80; Row : 25;Color : True);
   );
 
 initialization
@@ -829,7 +822,10 @@ initialization
 end.
 {
   $Log$
-  Revision 1.9  2001-10-06 22:28:25  michael
+  Revision 1.10  2001-10-13 13:00:31  michael
+  + Removed defaultmode field from driver
+
+  Revision 1.9  2001/10/06 22:28:25  michael
   + Merged video mode selection/setting system
 
   Revision 1.8  2001/09/21 19:50:19  michael