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

Как изменять прозрачность формы?   Найти похожие ветки 

← →
RoLeX   (2003-10-12 13:55) [0]

Создал форму Form1 на ней поместил TrackBar1. Хочу, чтобы при передвижении ползунка (TrackBar1) менялась прозрачность формы. Написал так:
----------
procedure Tform1.FormCreate(Sender: TObject);
begin
TrackBar1.Position:=form1.AlphaBlendValue;
end;

procedure Tform1.TrackBar1Change(Sender: TObject);
begin
form1.AlphaBlendValue:=TrackBar1.Position;
end;
----------
Но ничего не меняется при передвижении ползунка. Почему??? Может я чего-то неправильно написал???

---

← →
dataMaster ©   (2003-10-12 14:18) [1]

Установи Form1.AlphaBlend:=True;

---

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

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



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