Форум: "Основная";
Текущий архив: 2003.03.20;
Скачать: [xml.tar.bz2];

Вниз

Как сделать мерцающую надпись?   Найти похожие ветки 

← →
Intell   (2003-03-07 06:15) [0]

Как сделать надпись (любого компонента), которая будет мерцать. Т.е. не сам компонент, а Font.Color.

---

← →
OlegM   (2003-03-07 06:50) [1]

С button пробовал непроходит а с другими вроде

procedure TForm1.Timer1Timer(Sender: TObject);
begin
if edit1.Font.Color=clWindowText then
edit1.Font.Color:=clRed
else
edit1.Font.Color:=clWindowText
end;

---

← →
Intell   (2003-03-07 11:32) [2]

Спасибо OlegM, выручил!

---

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

Форум: "Основная";
Текущий архив: 2003.03.20;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.007 c