home *** CD-ROM | disk | FTP | other *** search
/ Otherware / Otherware_1_SB_Development.iso / amiga / programm / libs / reqtools.lha / ReqTools / Glue / M2Amiga / ReqTFileReq.def < prev    next >
Encoding:
Modula Definition  |  1992-06-29  |  1.3 KB  |  29 lines
  1. (*---------------------------------------------------------------------------
  2.   :Program.    ReqTFileReq.def
  3.   :Contents.   Simple Benutzung des ReqTools Filerequesters
  4.   :Author.     Frank L÷mker
  5.   :Copyright.  Public Domain
  6.   :Language.   Modula-2
  7.   :Translator. M2Amiga V4.0d
  8.   :Support.    Basiert zu gro▀en Teilen auf ARPFileReq von Bernd Preu▀ing
  9.   :History.    V1.0, [Frank L÷mker] 24-Feb-92
  10.   :Bugs.       keine bekannt
  11. ---------------------------------------------------------------------------*)
  12. DEFINITION MODULE ReqTFileReq;
  13.  
  14. FROM SYSTEM IMPORT ADDRESS;
  15.  
  16. PROCEDURE FileReq (VAR FName:ARRAY OF CHAR; Window:ADDRESS; Title:ARRAY OF CHAR;
  17.                    x,y:INTEGER; pattern:ARRAY OF CHAR):BOOLEAN;
  18. (* :Input.      FName: Vorgabe des kompletten Namens mit Pfad
  19.    :Input.      Window: Das Fenster, in dem der Requester erscheinen soll
  20.    :Input.      Title: Meldung fⁿr Fenstertitel, z.B. 'Laden'
  21.    :Input.      x,y: Koordinaten des Requesters, bei <0 default
  22.    :Input.      pattern: Pattern, das benutzt werden soll
  23.    :Input.               bei '' kein Pattern-Gadget
  24.    :Result.    TRUE: FName ist gⁿltig und wurde angewΣhlt.
  25.    :Result.    FALSE: Es wurde CANCEL oder Window-Close angewΣhlt
  26.    :Semantic.   Es wird ein ReqTools-FileRequester ge÷ffnet.
  27. *)
  28. END ReqTFileReq.def
  29.