home *** CD-ROM | disk | FTP | other *** search
/ Power-Programmierung / CD1.mdf / pascal / library / dos / tp_util / addtext.doc next >
Encoding:
Text File  |  1990-06-19  |  2.3 KB  |  44 lines
  1.  
  2.  Ein Bekannter brachte mich auf die Idee, den Hilfetext für ein Programm
  3. an das EXE- File anzuhängen, damit mit dem Programm nicht immer die Hilfe-
  4. datei mitkopiert werden muß.
  5.   Den Hilfetext mit WRITELN- Anweisungen in das Programm einzubinden, war
  6. mir zu umständlich geworden.
  7.   Mangels der Fähigkeit von TURBO PASCAL, SEEK auf ein Textfile anzuwenden,
  8. muß der Text aus dem EXE- File leider Byteweise gelesen werden.
  9.   Die Toolbox TURBO PROFESSIONAL bietet hierfür eine FUNCTION TEXTSEEK an.
  10. Natürlich kann man selbst per MSDOS- Funktion eine SEEK- Operation auf ein
  11. Textfile programmieren. Dann müßten die Variablen B und B1 vom Typ CHAR sein
  12. und für die Rechnerei eine Typumwandlung stattfinden, aber der Text kann 
  13. in einem solchen Fall mit READLN aus dem EXE- File gelesen werden.
  14.  
  15.   ADDTEXT PROGRAMM[.EXE] TEXTFILE hängt TEXTFILE an PROGRAMM an.
  16.   ADDTEXT ohne Parameter aufgerufen erklärt sich selbst.
  17.   ADDTEXT nimmt keine Rücksicht auf eventuell im EXE- File vorhandene
  18. DEBUG- Informationen ! Ebenfalls wird bei Anhängen eines kürzeren Textes an
  19. ein EXE- File, das schon einen längeren Text enthält, die Filegröße nicht
  20. nach unten korrigiert.
  21.   ADDTEXT sollte nicht bedenkenlos auf fremde EXE- Files angewandt werden,
  22. da einige Programmierer z.B. Overlays an ein EXE- File anhängen !
  23.   Natürlich kann mit einem geänderten Programm ADDTEXT auch ein Helpfile
  24. mit Index an ein EXE- File angehängt werden.
  25.  
  26.   EXETXT ist eine Demonstration ohne Nutzwert, die FUNCTION TEXTREAD kann
  27. aber von Programmen z.B. zum Füllen eines virtuellen Bildschirms mit dem
  28. Text aus dem EXE- File verwandt werden.
  29.   EXETXT ohne Parameter aufgerufen, versucht, einen an EXETXT angehängten
  30. Text anzuzeigen. Wird in EXETXT.EXE kein Text gefunden, wird EXETXT.TXT
  31. angezeigt.
  32.   TEXTREAD ist als Function ausgelegt, weil es beim Arbeiten an einem 
  33. Programm in der integrierten Entwicklungsumgebung sinnvoll sein kann, wahl-
  34. weise ein externes Textfile einzulesen, wenn im in Arbeit befindlichen
  35. EXE- File kein Text gefunden wurde;
  36.   Die UNIT CRT wird nur für das CLREOL und READKEY in TEXTREAD gebraucht.
  37.  
  38.   Dies soll mehr eine Anregung zu eigener Kreativität als fertig verwendbares
  39. Material sein.
  40.  
  41.   Die Programme sind mit TURBO PASCAL 5.0 compiliert, sollten aber auch mit 
  42. der Version 4.0 problemlos compilierbar sein.
  43.  
  44.