(import
    (rnrs)
    (ironscheme clr)
)

(clr-reference System.Windows.Forms)
(clr-reference System.Drawing)

(clr-using System.Windows.Forms)
(clr-using System.Drawing)

(begin
    (define form (clr-new Form))
    (clr-prop-set! Form Size form (clr-new Size 640 480))
    (clr-prop-set! Form Text form "Hello, World!")
    (define label1 (clr-new Label))
    (clr-prop-set! Label Size label1 (clr-new Size 320 20))
    (clr-prop-set! Label Text label1 "Hello, Windows Forms(IronScheme) World!")
    (define formControls (clr-prop-get Form Controls form ))
    (clr-call Form+ControlCollection Add formControls label1 )
    
    (clr-static-call Application (Run Form) form)
)