![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Изменение вида кнопки [D5]
Smile © (2002-01-01 20:51:00)Как изменить вид кнопки(например SpeedButton), сделать например ее круглой, ну а также за одно и форму?
skaminski~~~ (2002-01-04 05:22:00) [1]А уменя и нет никакой такой анкетки
просто щелкаем на моем нике и отправляем письмо ;)
но если уж очень нужно именно анкетка, то вот (сокращенный вариант):
Каминский Сергей Александрович
Программирование для земельного кадастра
Украина
skaminski@yandex.ru
Smile (2002-01-03 08:12:00) [2]да это конечно хорошо, вот только одна проблема: что-то я твоей анкетки найти не могу. я конечно может и слепая, ну уж что поделать. Может поможешь в поиске??? :-))
skaminski~~~~ (2002-01-02 23:42:00) [3]Если нужно, напиши мне на мыло, вышлю парочку исходников своих компонент (кнопок).
Nikolay (2002-01-02 18:15:00) [4]
procedure TForm1.FormCreate(Sender: TObject);
var
Rgn: HRGN;
begin
Rgn := CreateEllipticRgn(0, 0, Width, Height);
SetWindowRgn(Handle, Rgn, true);
end;
Pat (2002-01-02 16:45:00) [5]В FAQ этого пруд пруди!!!!
>Smile
Сам искал и разобрался. Все подробно написано...
Специально для тебя кое-что все таки отыскал в своих запасах. Здесь все даже очень подробно написано и с примерами:
http://kubtts.kuban.ru/forum_new/forum2/arhiv/172.html
Если сможешь прочитать, то поймешь :-))
По поводу круглых кнопок. Круглая-то она у тебя будет, только вот на кнопку не очень похожа :-((. Объемность кнопки достигается тенью вокруг нее. А SetWindowRgn как бы "обрезает" по контуру региона. Если хочешь круглую и объемную, рисуй "ручками", посмотри как это делается в комонентах, если хочешь писать все сам...