Можно ли поменять внешний вид формы

← →
Mikrom (2003-01-25 14:11) [0]

Привет all ...
Каким образом можно поменять окна ...
Зделать из как в ICQLight например ...

← →
ZmeiGorin © (2003-01-25 21:31) [1]

Чего???
Если ты про графическия контролы, то пользуяся Image, или напиши что-нить своё.

← →
Сергей Бушин © (2003-01-25 21:51) [2]

Ввиду того, что CIQLight я не видал, то понять точно, что тебе нужно я не могу. Если нужно форму сделать не только прямоугольной, но и круглой, треугольником и т.д. то это нужны Regions - регионы.

Вот простой пример использования региона:
procedure TForm1.FormCreate(Sender: TObject); var RsltRegion, Region : HRGN; R:TRect; begin //создали круглый регион Reg := CreateEllipticRgn(25,25,25,25); //создали прямоугольник со скрукленными углами ResultReg:=CreateRoundRectRgn(80,80,350,350,40,40); //объединяем это дело CombineRgn(RsltRegion,RsltRegion,Region,RGN_OR); //Применяем к нашей форме SetWindowRgn(Handle, RsltRegion, False); end;

см. также WinSDK там полно информации по теме Regions. Их (регионы) можно делать все возможными: с дыркой, треугольные и т.д. используя объедение нескольких регионов.

Заговорился, а про 2K и XP забыл. В этих windows"ах можно делать окна также прозрачными. В D6 и выше, нужно использовать свойства формы AlphaBlend и AlphaBlendValue. Вначале нужно установить значение AlphaBlendValue от 0 до 255 (степень прозрачности) и применить все это AlphBlend = True

Можно ли поменять внешний вид формы Найти похожие ветки