スプラッシュ画面上のテキストの点滅 (ID:41567)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 スプラッシュ画面上のテキストを点滅させたいです。 下のようにLabelの表示/非表示を試みましたが失敗でした。 絵でも何でも良いので、とにかくスプラッシュフォーム上の 何かを点滅させたいでのすが、どうすれば良いでしょうか？ // Unit1 -------------------- procedure TForm1.FormCreate(Sender: TObject); var SplashForm : TForm2; I: Integer; begin SplashForm:=TForm2.Create(self); SplashForm.show; begin for I := 0 to 10 do begin Sleep(500); end; end; SplashForm.free; end; // Unit2 -------------------- procedure TForm2.Timer1Timer(Sender: TObject); begin label1.Visible := not label1.Visible; end;