Как изменять прозрачность формы?

← →
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;

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