| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Свой Button!!! [D7, Win2k]

Igor_ ©   (2004-10-14 23:17:00) 

Подскажите как обрисовать форму кнопки, т.е. при помощи SetWindowRgn изменил форму кнопки, но обрезанные края сливаются с фоном. Вопрос: как сделать эти края такие же как в обычной форме, чтобы видно было что это кнопка???

---

4e6ypaTop _@(o,o)@_   (2004-10-25 17:06:00) [1]

procedure TForm1.FormPaint(Sender: TObject);

Var
X1,Y1,X2,Y2:Integer;
begin
Canvas.Pen.Color := clRed;
Canvas.Pen.Width := 2;
with button1 do
begin
 X1 := Left-3; Y1 := Top-3;
 X2 := Left+Width+4; Y2 := Top+Height+4;
 Canvas.RoundRect(X1,Y1,X2,Y2,4,4);
end;

end;

---

Игорь Шевченко   (2004-10-25 17:03:00) [2]

http://www.delphikingdom.com/treasury/hsdialogs.htm

---

panov   (2004-10-15 16:42:00) [3]

И не надо так орать!!!(c)

---

Poirot   (2004-10-15 12:25:00) [4]

а если просто картинку выбрать такую, которая просто сделает бордер сама собой?!... да и собственно посмотри как отрисовыввютсЯ стд кнопы - тебе так же надо сделать для произвольной формы:)

---

Наверх