Agregar boton con imagen

[pedrosan]

Al final logré agregarle imagen al boton creado con la funcion windowcreate. Aqui dejo el código:

//Creo el boton
B1 := CreateWindow('Button', '', WS_CLIPSIBLINGS or WS_BORDER or WS_VISIBLE or BS_PUSHBUTTON or BS_HOLLOW or WS_CHILD or BS_ICON,205, 2, 30, 25, hw, HMENU(WM_BUTTON_50),0,nil);

//envío mensaje para cargar imagen en el boton SendMessage(B1,BM_SETIMAGE,IMAGE_ICON,LoadImage(0,'C:\Image48x48.ico',IMAGE_ICON,0,0,LR_LOADFROMFILE ));


Saludos!