Текущий архив: 2002.03.04;
Скачать: CL | DM;
Вниз
Как сделать мигание формы в свернутом виде? Найти похожие ветки
← →
kingdom © (2002-02-14 16:44) [0]Subj
← →
kingdom © (2002-02-14 18:32) [1]Что никто не знает?
← →
Val © (2002-02-14 18:50) [2]из форума....
var
Flash : bool;
procedure TForm1.Timer1Timer(Sender: TObject);
begin
FlashWindow(Form1.Handle, Flash);
FlashWindow(Application.Handle, Flash);
Flash := not Flash;
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
Flash := False;
end;
Страницы: 1 вся ветка
Текущий архив: 2002.03.04;
Скачать: CL | DM;
Память: 0.46 MB
Время: 0.013 c