trackbar - Помощь студентам

delfin07 · 06.06.2011, 19:26

Помогите сделать с помощью trackbar изменения прозрачности формы

Jaguar83 · 06.06.2011, 19:37

в delphi

Код:

procedure TForm1.FormCreate(Sender: TObject);
begin
Form1.AlphaBlend:=True;
TrackBar1.Max:=255;
end;

procedure TForm1.TrackBar1Change(Sender: TObject);
begin
Form1.AlphaBlendValue:= TrackBar1.Position;
end;

delfin07 · 07.06.2011, 01:44

я так пробовол неполучилось еще попробую может чето нетак сделал

06.06.2011, 19:26	#1
delfin07 Форумчанин Регистрация: 14.05.2011 Сообщений: 108	trackbar Помогите сделать с помощью trackbar изменения прозрачности формы

06.06.2011, 19:37	#2
Jaguar83 Профессионал Пользователь Регистрация: 25.05.2011 Сообщений: 91	в delphi Код: `procedure TForm1.FormCreate(Sender: TObject); begin Form1.AlphaBlend:=True; TrackBar1.Max:=255; end; procedure TForm1.TrackBar1Change(Sender: TObject); begin Form1.AlphaBlendValue:= TrackBar1.Position; end;` Помог? Будь человеком - жми на весы слева!

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
TrackBar	Claster	Помощь студентам	0	20.10.2010 01:06
trackbar	larry	Win Api	3	28.07.2009 09:47
trackbar	larry	Win Api	4	25.07.2009 20:59
TrackBar	loozer	Компоненты Delphi	2	20.12.2008 22:50
TrackBar	Михаил Юрьевич	Общие вопросы Delphi	2	29.01.2008 00:43

07.06.2011, 01:44	#3
delfin07 Форумчанин Регистрация: 14.05.2011 Сообщений: 108	я так пробовол неполучилось еще попробую может чето нетак сделал