Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.03.27;
Скачать: CL | DM;

Вниз

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

 
Lady Natalia   (2003-03-13 16:53) [0]

Здравствуйте, Уважаемые. Вопрос такой: как изменить внешний вид формы? Сделать её, например, круглой... Благодарю и надеюсь на Вашу помощь.


 
Vlad V. Oshin ©   (2003-03-13 16:55) [1]

procedure TForm1.FormCreate(Sender: TObject);
const
n = 1;
var
nn : integer;
ResultReg, Reg : HRGN;
P : array[0..n-1] of TPoint;
begin
//Put Ellipse
//инициализация ResultReg
ResultReg := CreateEllipticRgn(174,84,402,299);
SetWindowRgn(Handle, ResultReg, False);
end;


 
Manulo ©   (2003-03-13 17:08) [2]

Сделай её прозрачной :)
AlphaBlend:=true;
AlphaBlendValue:=...

где ... от 0 до 255 - степень (глубина) прозрачности


 
Lady Natalia   (2003-03-14 21:43) [3]

Большое Спасибо :)

А можно чтобы какая-нибудь форма фигурная была какая-нибудь? Например, в форме облака, или звезды и т.п.?


 
Романов Р.В. ©   (2003-03-14 21:59) [4]

можно см. CombineRgn


 
Lady Natalia   (2003-03-14 22:04) [5]

А можно поподробнее?
Please...


 
Юрий Зотов ©   (2003-03-14 22:04) [6]

http://www.delphikingdom.com/helloworld/samples_win.htm#link11



Страницы: 1 вся ветка

Текущий архив: 2003.03.27;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.022 c
14-88230
Мыш
2003-03-10 06:26
2003.03.27
Регистрация


8-88096
sergn
2002-12-19 21:12
2003.03.27
Вывод текста с обводкой букв.


1-87998
id-m@n
2003-03-14 00:46
2003.03.27
работа с исполняемыми файлами windows(как сделать?..)


3-87838
dums
2003-03-10 08:00
2003.03.27
много потоков на одну базу данных :))


14-88173
Lexel
2003-03-09 10:41
2003.03.27
ShellExecute (спасите пожалуйста добрые люди)