(* Modul : ArpReq *) (* Projekt : FFEX *) (* Autor : Robert Brandner *) (* Funktion: Unterstützung des ARP-Filerequesters *) DEFINITION MODULE ArpReq; FROM Intuition IMPORT WindowPtr; FROM SYSTEM IMPORT ADDRESS; PROCEDURE GetFileName(w:WindowPtr;title,path:ADDRESS):BOOLEAN; (* w : Requester erscheint in gleichem Screen wie Window w *) (* title : Windowtitel (z.B. Load File ... ) *) (* path : Pfad und Filename; kann bei Aufruf Defaultwert enthalten *) (* erhält als Ergebnis den gewählten Filenamen (incl. Pfad) *) (* Funktionsergebnis: TRUE, wenn geklickt, FALSE bei . *) END ArpReq.def