Показать сообщение отдельно
Старый 10.03.2005, 08:52   #4   
форумец
 
Аватар для DimmaN
 
Сообщений: 1,603
Регистрация: 22.01.2004
Возраст: 26

DimmaN вне форума Не в сети
Арсений ну я на BCpp использовал альфаБленд. у меня вот так написано - все работает нормально
Цитата:
//---------------------------------------------------------------------------

void __fastcall Tform_main::ApplicationEvents1Deactivate(TObject *Sender)
{
for (int sch = 255; sch >= 150; sch--)
{
form_main->AlphaBlendValue = sch;
};
}
//---------------------------------------------------------------------------

void __fastcall Tform_main::ApplicationEvents1Activate(TObject *Sender)
{
form_main->AlphaBlendValue = 255;
}
//---------------------------------------------------------------------------
Тока надо это в паскакаль переделать

ЗЫ мсье, Захаров?
  Ответить с цитированием