home *** CD-ROM | disk | FTP | other *** search
/ Turbo Toolbox / Turbo_Toolbox.iso / turbo4 / turbo3.doc < prev    next >
Encoding:
Text File  |  1987-12-08  |  2.9 KB  |  79 lines
  1. {*******************************************************}
  2. {                                                       }
  3. {       Turbo Pascal Version 4.0                        }
  4. {       Interface-Dokumentation zu TURBO3               }
  5. {       ("Kompatibilitäts-Unit" für Turbo Pascal 3.0)   }
  6. {                                                       }
  7. {       Copyright (c) 1987 Borland International, Inc.  }
  8. {                                                       }
  9. {*******************************************************}
  10.  
  11. {$D-,I-,S-}
  12.  
  13. unit Turbo3;
  14.  
  15. interface
  16.  
  17. uses Crt;    { Unit CRT wird vorausgesetzt }
  18.  
  19. var
  20.   Kbd: Text;
  21.       { Spezialdatei für das direkte Lesen der Tastatur,
  22.         in der Version 4.0 durch die Funktion ReadKey ersetzt. }
  23.  
  24.   CBreak: Boolean absolute CheckBreak;
  25.       { An-/Abschalten der Prüfung auf Ctrl-C und Ctrl-Break. }
  26.  
  27. procedure AssignKbd(var F: Text);
  28.    { Wird vom Initialisierungsteil aufgerufen und öffnet Kbd,
  29.      ist eigentlich nicht "öffentlich" }
  30.  
  31. function MemAvail: Integer;
  32.    { Liefert den gesamten freien Speicherplatz auf dem Heap in
  33.      "Paragraphen" (Einheiten zu je 16 Bytes) zurück. In der
  34.      Version 4.0 durch eine Routine gleichen Namens ersetzt, die
  35.      den Ergebnistyp LongInt hat und den freien Speicherplatz
  36.      in Bytes zurückliefert. }
  37.  
  38. function MaxAvail: Integer;
  39.    { Liefert den Umfang des größten freien Block auf dem Heap
  40.      in "Paragraphen" zurück. In der Version 4.0 durch eine
  41.      Routine gleichen Namens ersetzt, die den Ergebnistyp
  42.      LongInt hat und diese Größe in Bytes zurückliefert. }
  43.  
  44. function LongFileSize(var F): Real;
  45.    { Liefert die Komponentenzahl einer typisierten Datei als Realwert
  46.      zurück. In der Version 4.0 durch eine generalisierte Version
  47.      von FileSize ersetzt, die den Ergebnistyp LongInt hat. }
  48.  
  49. function LongFilePos(var F): Real;
  50.    { Liefert die momentane Position (= Komponenten-Nummer) in einer
  51.      typisierten Datei als Realwert zurück. In der Version 4.0 durch
  52.      eine generalisierte Version von FilePos ersetzt, die den
  53.      Ergebnistyp LongInt hat. }
  54.  
  55. procedure LongSeek(var F; Pos: Real);
  56.    { Setzt die Position (= Komponenten-Nummer) in einer typisierten
  57.      Datei und erwartet einen Parameter des Typs Real. In der Version
  58.      4.0 durch eine generalisierte Version von Seek ersetzt, die mit
  59.      einem Parameter des Typs LongInt arbeitet. }
  60.  
  61. procedure NormVideo;
  62.    { Setzt das Zeichenattribut "Gelb auf Schwarz", in der Version 4.0
  63.      dagegen "normale Intensität". }
  64.  
  65. procedure HighVideo;
  66.    { Setzt das Zeichenattribut "Gelb auf Schwarz", in der Version 4.0
  67.      dagegen "hohe Intensität". }
  68.  
  69. procedure LowVideo;
  70.    { Setzt das Zeichenattribt "Grau auf Schwarz", in der Version 4.0
  71.      dagegen "niedrige Intensität". }
  72.  
  73. function IOResult: Integer;
  74.    { Liefert Turbo Pascal-spezifische (und CP/M-kompatible) Fehlercodes,
  75.      in der Version 4.0 dagegen die Fehlercodes von DOS. }
  76.  
  77.  
  78. implementation
  79.