[M.A.D.M.A.N.]

А в чем собс-но проблема?

Код:

Button := CreateWindowEx( WS_EX_STATICEDGE, 'Button', nil, BS_ICON or WS_VISIBLE or WS_CHILD,
                              10, 15, 40, 40, Wnd, BTN_APPLICATION, hInstance, nil );