Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Прозрачная форма

Simon © (2004-10-19 05:10:00)
Как сделать прозрачную?
Я где-то видел что-то типа:

var
Form2: TForm2;
begin
Form2:= TForm2.Create(self);
form2.Color:= form1.Color; //на form2 лежит Shape
form2.Shape1.Brush.Color:= form1.Color;
form2.Show;
end;

-=SS=- (2004-10-19 12:10:00) [1]
>> Алхимик © (19.10.04 10:11) [3]
>> Спорнём на пончик что не только под WinXP?

Ну не только под WiXP
GetWindowsVersion(major, minor);
if ((major>= 5) если выполняется это условие

DiamondShark (2004-10-19 11:11:00) [2]

> ты хочешь сказать, что под Win98 альфабленд работает? :-)

Под ME и 2000 работает.
А это и есть "не только под WinXP"

Dyn`alt (2004-10-19 11:09:00) [3]
http://www.delphikingdom.ru/asp/viewitem.asp?catalogid=30

Sphinx (2004-10-19 11:09:00) [4]
> у меня под XP все прекрасно работает, наверное, нужен ServicePack
> 1

Если все прекрасно работает, зачем же тогда SP1? :)

Настенька (2004-10-19 10:41:00) [5]
у меня под XP все прекрасно работает, наверное, нужен ServicePack 1

ssk (2004-10-19 10:15:00) [6]
>Алхимик
> Спорнём на пончик что не только под WinXP

ты хочешь сказать, что под Win98 альфабленд работает? :-)

Алхимик (2004-10-19 10:11:00) [7]

> [2] -=SS=- © (19.10.04 10:02)
> Да AlphaBlend:= True;
> AlphaBlendValue := 70;
>
> Но работает только под WInXP

Спорнём на пончик что не только под WinXP?

-=SS=- (2004-10-19 10:02:00) [8]
Да AlphaBlend:= True;
AlphaBlendValue := 70;

Но работает только под WInXP

Алхимик (2004-10-19 09:58:00) [9]
Transparent
TransparentColor
AlphaBlend
AlphaBlendValue

Наверх

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