home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 7 / Apprentice-Release7.iso / Environments / Clean 1.2.4 / MacInterface / dialogs.dcl < prev    next >
Encoding:
Modula Definition  |  1997-01-15  |  1.3 KB  |  37 lines  |  [TEXT/3PRM]
  1. definition module dialogs;
  2.  
  3. import mac_types;
  4.  
  5. ::    ProcPtr :== Int;
  6.  
  7. //    Initialization
  8.  
  9. InitDialogs :: !ProcPtr !Toolbox -> Toolbox;
  10.  
  11. //    Creating and Disposing of Dialogs
  12.  
  13. NewDialog        :: !Ptr !Rect !{#Char} !Bool !Int !WindowPtr !Bool !Int !Handle !Toolbox -> (!DialogPtr,!Toolbox);
  14. NewCDialog        :: !Ptr !Rect !{#Char} !Bool !Int !WindowPtr !Bool !Int !Handle !Toolbox -> (!DialogPtr,!Toolbox);
  15. CloseDialog        :: !DialogPtr !Toolbox -> Toolbox;
  16. DisposDialog    :: !DialogPtr !Toolbox -> Toolbox;
  17.  
  18. //    Handling Dialog Events
  19.  
  20. ModalDialog        :: !ProcPtr !DialogPtr                !Toolbox -> (!Int, !Toolbox);
  21. IsDialogEvent    :: !(!Int,!Int,!Int,!Int,!Int,!Int) !Toolbox -> (!Bool,!Toolbox);
  22. DialogSelect    :: !(!Int,!Int,!Int,!Int,!Int,!Int) !Toolbox -> (!Bool,!DialogPtr,!Int,!Toolbox);
  23.  
  24. //    Invoking Alerts
  25.  
  26. //    Manipulating Items in Dialogs and Alerts
  27.  
  28. GetDItem                :: !DialogPtr !Int !Toolbox -> (!Int,!Handle,!Rect,!Toolbox);
  29. SetIText                :: !Handle !{#Char} !Toolbox -> Toolbox;
  30. GetIText                :: !Handle !{#Char} !Toolbox -> (!{#Char},!Toolbox);
  31. SelIText                :: !DialogPtr !Int !Int !Int !Toolbox -> Toolbox;
  32. OutlineButtonFunction    :: ProcPtr;
  33. // DialogFilterFunction    :: ProcPtr;
  34. DisposeRoutineDescriptor :: !ProcPtr !Toolbox -> Toolbox;
  35. // OutlineButtonFunction :: !Toolbox -> ProcPtr;
  36. // DialogFilterFunction :: !Toolbox -> ProcPtr;
  37.