Migający napis

0

Witam i o Delphi pytam :)
Jak zrobić migający napis np: na Labelu ?

0

Użyć timera i zmieniac ten napis.

0

Albo JVCL

0

Wstawiasz na formę komponent Timer. Masz też na formie Label. Label ma jakiś tam 'Caption'. Włączasz timer (w object inspector, enabled na true) i tak samo interwał (interval=1000 to sekunda). Wygeneruj procedurę dla zdarzenia 'ontimer' i wpisz jej:

begin
  if Label1.Visible = True
  then Label1.Visible := False
  else Label1.Visible := True
end;

tak najprościej dla mnie - początkującego ;)
pzdr

//a nie prosciej tak? :)

Label1.Visible := not Label1.Visible;

//m.M

0

Procedurę powyżej można skrócić!

begin
Label1.Visible := not Label1.Visible;
end;

Ale i tak polecam JVCL!

0

A ja bym napisał komponencik :D

0

A ja bym wylaczyl buforowanie i na okraglo odrysowywal. Miganie samo wyjdzie ;)

0

a ja to se napisałem komponencika
w książce był przykład :-)

1 użytkowników online, w tym zalogowanych: 0, gości: 1