| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Дайти кто-нибудь простинький кодик как сделать кнопку круглой? [D5, WinME]
snoup © (2002-04-11 22:55:00)Дайти кто-нибудь простинький кодик как сделать кнопку круглой?
Fantasist (2002-04-12 00:15:00) [1]Простенький.
procedure TForm1.Button1Click(Sender: TObject);
var
rg:HRGN;
dc:HDC;
begin
rg:=0;
rg:=CreateEllipticRgn(1,1,40,40);
SetWindowRgn(Button1.Handle,rg,true);
DeleteObject(rg);
Canvas.Ellipse(Button1.Left,Button1.Top,Button1.Left+40,Button1.Top+40);
end;
kopachev (2002-04-11 23:53:00) [2]На www.source.ru я видел класс кнопки на C++
| |
