Announcement

Collapse
No announcement yet.

TLabel blinkend darstellen. Wie geht das ?

Collapse
X
  • Filter
  • Time
  • Show
Clear All
new posts

  • TLabel blinkend darstellen. Wie geht das ?


  • #2
    Setze einen Timer (TTimer bei Kategorie System) aufs Formular, Enabled auf True setzen, und Interval z.B. auf 500 ms.
    Im Quellcode wechselst du einfach die Visible-Eigenschaft des Labels:
    <code><pre>
    <font face="Courier New"><font color="#000080"><b>procedure</b></font> TForm1<font color="#FF0000">.</font>Timer1Timer<font color="#FF0000">(</font>Sender<font color="#FF0000">:</font> TObject<font color="#FF0000">)</font><font color="#FF0000">;</font>
    <font color="#000080"><b>begin</b></font>
    Label1<font color="#FF0000">.</font>Visible <font color="#FF0000">:=</font> <font color="#000080"><b>not</b></font> Label1<font color="#FF0000">.</font>Visible<font color="#FF0000">;</font>
    <font color="#000080"><b>end</b></font><font color="#FF0000">;</font></font>
    </pre></code>
    <p>
    Gruß,<br>
    Bernhar

    Comment

    Working...
    X