Скачать: CL | DM;

прозрачная форма   Найти похожие ветки 

← →
Raptoridzevv   (2006-04-28 17:15) [0]

может компонент есть, хочу прозрачность сделать формы, чтобы можно было выставлять процент прозрачности+становились прозрачными все компоненты на форме?

---

← →
Eraser ©   (2006-04-28 17:18) [1]

AlphaBlend + F1

---

← →
Mark86rus ©   (2006-04-29 21:44) [2]

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

end;

end.

---

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

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


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

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

---

← →
Mark86rus ©   (2006-04-29 21:58) [4]

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

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

---

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

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


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

---

← →
KilkennyCat ©   (2006-04-29 22:11) [6]

и тем более не будет, потому что alphablend по умолчанию false

---

← →
Mark86rus ©   (2006-04-29 23:10) [7]

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


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

---

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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.03 c