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

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

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

прозрачная форма [D6, WinXP]

Raptoridzevv © (2006-04-28 17:15:00)
может компонент есть, хочу прозрачность сделать формы, чтобы можно было выставлять процент прозрачности+становились прозрачными все компоненты на форме?

Mark86rus (2006-04-29 23:10:00) [1]

> и тем более не будет

да ты прав! если конечно не указать истинное значение alphablend:=true;

KilkennyCat (2006-04-29 22:11:00) [2]
и тем более не будет, потому что alphablend по умолчанию false

ЛшдлуттнСфе (2006-04-29 22:08:00) [3]

> а потом будет искать форму по экрану!

не будет, потому как часть стандартных компонент прозрачности таким методом не изменит.

Mark86rus (2006-04-29 21:58:00) [4]

> Лшдлуттнсфе

я ему это и написал! вообще лучше TrackBar1.Min:=ставить болше 50, потому, что доведет бегунок до 0 и отпустит, а потом будет искать форму по экрану!

Лшдлуттнсфе (2006-04-29 21:48:00) [5]

> TrackBar1.Min:=0; //-минимальное значение прозрачности
> (но ноль не ставь потому, что при ноле форму невидно)

можно еще так:

TrackBar1.Min:=-1000; //-минимальное значение прозрачности
> (но лучше от -1000 до 0 не ставь потому, что при при минусе жопа будет, а при ноле форму невидно)

Mark86rus (2006-04-29 21:44:00) [6]
procedure TForm1.TrackBar1Change(Sender: TObject);
begin
TrackBar1.Max:=255; //-максимальное значение прозрачности
TrackBar1.Min:=0; //-минимальное значение прозрачности (но ноль не ставь потому, что при ноле форму невидно)
alphablendvalue:=TrackBar1.Position ;

end;

end.

Eraser (2006-04-28 17:18:00) [7]
AlphaBlend + F1

Наверх

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