Форум: "Начинающим";
Текущий архив: 2006.05.21;
Скачать: [xml.tar.bz2];
Внизпрозрачная форма Найти похожие ветки
← →
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 вся ветка
Форум: "Начинающим";
Текущий архив: 2006.05.21;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.012 c