Плоская кнопка

[Алексей К.]

Как сделать большую плоскую кнопку (с картинкой)? Хочу как в WinRAR`e(Zip`e),
appearanca=flat не дает желаемый результат, через Label - не красиво, в Toolbar`e кнопки ограниченых размеров.

[baha76]

Есть 2 пути: создать свой или скачать готовый.
В сети их навалом.

[Ramzes]

Cтавишь на форму Picture1

Код: Выделить всё

Private Sub Picture1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
Picture1.BorderStyle = 1
End Sub

Private Sub Picture1_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
Picture1.BorderStyle = 0
End Sub


А В picture1 вставляешь любой рисунок. Вот и все
Можно конечно вставить OCX Magic Button

[Алексей К.]

Спасибо Всем!