Подскажите почему картинка растягивается?

[Pantalone]

Хочу в Picturebox картинку 16х16 вставить из Imagelist, а она почему-то до 32х32 растягивается, хотя сама именно 16х16. Как победить?

[amer]

у меня не растягивается...кажися, а вот автосайз не работает почему-то
я на форму кнопку бросил...

Private Declare Function DrawIcon Lib "user32" (ByVal hDC As Long, ByVal X As Long, ByVal Y As Long, ByVal hIcon As Long) As Long

Private Sub Command1_Click()
Picture1.AutoSize = True
Call DrawIcon(Picture1.hDC, 0, 0, ImageList1.ListImages("flag").Picture.Handle)
Picture1.Refresh
End Sub