>Hi,
> I have try out the code, it create buttons but no images. I have already insert picture into imagelist, and imagelist added before toolbar, what is the problem?? I add the code in Toolbar.Init event.

Hi John,

Please post the code that adds the buttons. Here's a sample of something similar to mine:

WITH This.FormTools.Buttons
  DIMENSION a_buttons[6]
  a_buttons[1] = 'Open'
  a_buttons[2] = 'Close'
  a_buttons[3] = 'Top'
  a_buttons[4] = 'Previous'
  a_buttons[5] = 'Next'
  a_buttons[6] = 'Bottom'
  lnlast = ALEN(a_buttons, 1)
  FOR lni = 1 TO lnlast
    .Add(, a_buttons[lni], a_buttons[lni], 0, lni)
  NEXT
ENDWITH

If this code matches your's, the only thing that I can think of is that the ImageList is not being properly loaded.