以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  跟换背景  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=89292)
--  作者：yzyend
--  发布时间：2016/8/18 16:39:00
--  跟换背景
”主窗口”  的类型是 主窗口 

想更换该窗口的背景，在 images 下面放了10张背景图片

Timertick ：

Static i As Integer
If i = 0 Then
   i = 1
End If
 
e.Form.baseform.controls("主窗口").backgroundimage=getimage("C:\\项目1\\Images\\图片\\" & i & ".jpg")

i = i + 1
If i = 10Then
  i = 1
End If


Afterload:

e.Form.TimerInterval = 10000
  e.Form.TimerEnabled = True
 
  Forms("主窗口").baseform.backgroundimage = getimage("C:\\项目1\\Images\\图片\\1.jpg")

 注意：窗口  的  类型  是主窗口

提示如下错误：

.NET Framework 版本：2.0.50727.5485

Foxtable 版本：2016.7.29.1

错误所在事件：窗口,主窗口,TimerTick

详细错误信息：

未将对象引用设置到对象的实例。

 

.NET Framework 版本：2.0.50727.5485

Foxtable 版本：2016.7.29.1

错误所在事件：窗口,主窗口,TimerTick

详细错误信息：

未将对象引用设置到对象的实例




请问，错在哪里？  计时器  启用和不启用均不行。


求解！
--  作者：yzyend
--  发布时间：2016/8/18 16:41:00
--  跟换背景
还有这个错误

.NET Framework 版本：2.0.50727.5485

Foxtable 版本：2016.7.29.1

错误所在事件：窗口,主窗口,AfterLoad

详细错误信息：

未将对象引用设置到对象的实例。
--  作者：大红袍
--  发布时间：2016/8/18 17:47:00
--  

改成一下

 

Timertick ：


Static i As Integer
If i = 0 Then
    i = 1
End If

e.Form.panel.backgroundimage=getimage("C:\\项目1\\Images\\图片\\" & i & ".jpg")


i = i + 1
If i = 10 Then
    i = 1
End If

 


Afterload:


e.Form.TimerInterval = 10000
e.Form.TimerEnabled = True

e.Form.Panel.backgroundimage = getimage("C:\\项目1\\Images\\图片\\1.jpg")