投稿日 | : 2004/03/12(Fri) 19:58 |
投稿者 | : 花ちゃん |
Eメール | : |
URL | : |
タイトル | : Re^7: Timerを使用したら「×」を表示 |
最初の状況は下記ではなかったのですか?
> ーフォームのプレビュー画面の37,9,に「×」を表示させたい
> のですが、以下のコードだとTimerが起動中にのみ「×」が表
> 示され、Timerが終了すると「×」が消えてしまいます。
> Timer終了後も「×」が表示されるようにするにはどのように
> 改善したらよいのでしょうか?
> そして7箇所の「×」の表示を考えてコードを記述してみましたが、最
> 初の1つは良いのですが2つ目以降は表示されない状況です。
これって、結局前回の事が解決されていないだけでは
> 'Aチームがチャージドタイムアウトを取った場合にプレヴュー表示する'
> For cnt = 0 To 7
> If frmGameRecord.cmdTimeOut.Enabled = True And cnt = 0 Then
> Call PLocate(38, 9, "×")
> ElseIf frmGameRecord.cmdTimeOut.Enabled = True And cnt = 1 Then
> Call PLocate(41, 9, "×")
> ElseIf frmGameRecord.cmdTimeOut.Enabled = True And cnt = 2 Then
> Call PLocate(44, 9, "×")
> ElseIf frmGameRecord.cmdTimeOut.Enabled = True And cnt = 3 Then
> Call PLocate(47, 9, "×")
> ElseIf frmGameRecord.cmdTimeOut.Enabled = True And cnt = 4 Then
> Call PLocate(50, 9, "×")
> ElseIf frmGameRecord.cmdTimeOut.Enabled = True And cnt = 5 Then
> Call PLocate(53, 9, "×")
> ElseIf frmGameRecord.cmdTimeOut.Enabled = True And cnt = 6 Then
> Call PLocate(56, 9, "×")
> End If
今回も投稿して貰ったコードでは状況を確認できませんし、コードが投稿できないなら
自分で、それぞれの IF 文にブレークポイントを設定して見て確認してみて下さい。
私には貴方の説明が理解できませんし、コードを試して見る事もできませんので
これ以上はわかりません、これでパスさせて頂きます。