Class type expanded

gistfile1.txt

-> (:type Button%)
(Class
 (init (label
        (U String
           (Instance Bitmap%)
           (List (Instance Bitmap%) String (U 'left 'top 'right 'bottom))))
       (parent (Instance Area-Container<%>))
       (callback
        (-> (Instance Button%) (Instance Control-Event%) Any)
        #:optional)
       (style (Listof (U 'border 'deleted)) #:optional)
       (font (Instance Font%) #:optional)
       (enabled Any #:optional)
       (vert-margin Nonnegative-Integer #:optional)
       (horiz-margin Nonnegative-Integer #:optional)
       (min-width (U Natural False) #:optional)
       (min-height (U Natural False) #:optional)
       (stretchable-width Any #:optional)
       (stretchable-height Any #:optional))
 (accept-drop-files (case-> (-> Boolean) (-> Any Void)))
 (client->screen (-> Integer Integer (values Integer Integer)))
 (command (-> (Instance Control-Event%) Void))
 (enable (-> Any Void))
 (focus (-> Void))
 (get-client-handle (-> Any))
 (get-client-size (-> (values Nonnegative-Integer Nonnegative-Integer)))
 (get-cursor (-> (U False (Instance Cursor%))))
 (get-graphical-min-size (-> (values Nonnegative-Integer Nonnegative-Integer)))
 (get-handle (-> Any))
 (get-height (-> Nonnegative-Integer))
 (get-label
  (-> (U False
         String
         (Instance Bitmap%)
         'app
         'caution
         'stop
         (List (Instance Bitmap%) String (U 'left 'top 'right 'bottom)))))
 (get-parent (-> (U False (Instance Area-Container<%>))))
 (get-plain-label (-> (U False String)))
 (get-size (-> (values Nonnegative-Integer Nonnegative-Integer)))
 (get-top-level-window (-> (U (Instance Frame%) (Instance Dialog%))))
 (get-width (-> Nonnegative-Integer))
 (get-x (-> Integer))
 (get-y (-> Integer))
 (has-focus? (-> Boolean))
 (is-shown? (-> Boolean))
 (min-height (case-> (-> Integer) (-> Integer Void)))
 (min-width (case-> (-> Integer) (-> Integer Void)))
 (on-drop-file (-> Path Void))
 (on-focus (-> Any Void))
 (on-move (-> Integer Integer Void))
 (on-size (-> Nonnegative-Integer Nonnegative-Integer Void))
 (on-subwindow-char (-> (Instance Window<%>) (Instance Key-Event%) Boolean))
 (on-subwindow-event (-> (Instance Window<%>) (Instance Mouse-Event%) Boolean))
 (on-subwindow-focus (-> (Instance Window<%>) Any Void))
 (on-superwindow-enable (-> Any Void))
 (on-superwindow-show (-> Any Void))
 (popup-menu
  (-> (Instance Popup-Menu%) Nonnegative-Integer Nonnegative-Integer Void))
 (refresh (-> Void))
 (screen->client (-> Integer Integer (values Integer Integer)))
 (set-cursor (-> (U False (Instance Cursor%)) Void))
 (set-label (-> String Void))
 (show (-> Any Void))
 (stretchable-height (case-> (-> Boolean) (-> Any Void)))
 (stretchable-width (case-> (-> Boolean) (-> Any Void)))
 (warp-pointer (-> Integer Integer Void)))
[can expand further: Integer Boolean Nonnegative-Integer Natural]