Изменение вида кнопки

← →
Smile © (2002-01-01 20:51) [0]

Как изменить вид кнопки(например SpeedButton), сделать например ее круглой, ну а также за одно и форму?

← →
Pat © (2002-01-02 16:45) [1]

В FAQ этого пруд пруди!!!!
>Smile
Сам искал и разобрался. Все подробно написано...
Специально для тебя кое-что все таки отыскал в своих запасах. Здесь все даже очень подробно написано и с примерами:
http://kubtts.kuban.ru/forum_new/forum2/arhiv/172.html
Если сможешь прочитать, то поймешь :-))
По поводу круглых кнопок. Круглая-то она у тебя будет, только вот на кнопку не очень похожа :-((. Объемность кнопки достигается тенью вокруг нее. А SetWindowRgn как бы "обрезает" по контуру региона. Если хочешь круглую и объемную, рисуй "ручками", посмотри как это делается в комонентах, если хочешь писать все сам...

← →
Nikolay © (2002-01-02 18:15) [2]

procedure TForm1.FormCreate(Sender: TObject); var Rgn: HRGN; begin Rgn := CreateEllipticRgn(0, 0, Width, Height); SetWindowRgn(Handle, Rgn, true); end;

← →
skaminski~~~~ (2002-01-02 23:42) [3]

Если нужно, напиши мне на мыло, вышлю парочку исходников своих компонент (кнопок).

да это конечно хорошо, вот только одна проблема: что-то я твоей анкетки найти не могу. я конечно может и слепая, ну уж что поделать. Может поможешь в поиске??? :-))

← →
skaminski~~~ (2002-01-04 05:22) [5]

А уменя и нет никакой такой анкетки
просто щелкаем на моем нике и отправляем письмо ;)
но если уж очень нужно именно анкетка, то вот (сокращенный вариант):

Каминский Сергей Александрович
Программирование для земельного кадастра
Украина
skaminski@yandex.ru

Изменение вида кнопки Найти похожие ветки