Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.06.25;
Скачать: CL | DM;

Вниз

Прозрачность   Найти похожие ветки 

 
VasRoG   (2006-06-06 21:42) [0]

Есть две формы - одна предполагается заставкой к проге т.е. является модальной, а вторая - основная форма программы. Как сделать постепенное "растворение" уже нетребующейся в определенный момент заставки до полного ее исчезновения и проявление скозь нее основной формы.


 
unknown ©   (2006-06-06 21:50) [1]

Нужен таймер. Интервал где-то 200, по вкусу :)
Когда в определенный момент splash уже не требуется - делаем
 AlphaBlend     := True;
 Timer1.Enabled := True;

А в процедуре
procedure TForm1.Timer1Timer(Sender: TObject);
begin
 AlphaBlendValue := AlphaBlendValue - 20;
 if AlphaBlendValue < 20 then
   Close;
end;


 
VasRoG   (2006-06-06 22:42) [2]

Спасибо. :)



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

Текущий архив: 2006.06.25;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.025 c
15-1149072488
Kobik..
2006-05-31 14:48
2006.06.25
спасайте горе-математика =)


3-1145965808
Alpine
2006-04-25 15:50
2006.06.25
Проблемма с UPPER(FIELD) LIKE .... в IB 7.01


15-1148989599
RomanH
2006-05-30 15:46
2006.06.25
SQL сервер TransBase


1-1147925148
apl
2006-05-18 08:05
2006.06.25
Как преобразовать TFileTime


4-1143128272
Frantic
2006-03-23 18:37
2006.06.25
обращение к пространству ввода/вывода