师父们帮帮忙

[rocket007]

请教一下vfp的form中怎样用timer事件把label从左到右来回移动，给点程序代码之类的吧

[rocket007]

请问在csdn中可否修改个人资料？

[fj_jiangqi]

可以修改个人资料，一个多月，用换了6次名字了。
-------------------------
39度十几天了，41度两三天了，今天41度，明天还是41度，没有空调，没有MM，叫我怎么活？
我就要被烤成人干了，救命啊……
20多天没下过雨，也没有阴天过，甚至连多云都很少出现过。
-------------------------
我流落在凄凉的世界里－孤苦伶仃
我过着动荡无助的生活－四处漂泊

[rocket007]

fj_jiangqi(青狼)，在哪里改？

[fj_jiangqi]

在timer的timer过程里
-------------------------
39度十几天了，41度三四天了，今天41度，明天还是41度，没有空调，没有MM，叫我怎么活？
我就要被烤成人干了，救命啊……
20多天没下过雨，也没有阴天过，甚至连多云都很少出现过。
-------------------------
我流落在凄凉的世界里－孤苦伶仃
我过着动荡无助的生活－四处漂泊

[rocket007]

看来这还行，good job!
thanks for your help
看来不用再流浪了

[rocket007]

火焰山的青狼,程序是ok了 ，
===============但有点看不懂，
刚学vfp嘛
---------------------
还望解释一下
？？？.tag='0'
？？？left>=thisform.width-.width
？？？ .tag=''.left=.left+iif(.tag=='0',1,-1)

[rocket007]

青狼啊,青狼,天涯何处无芳草，何必叹气话伶仃！

[fj_jiangqi]

.tag='0'
这是属性中多余的变量，用来判断左移还是右移。
在没有钱的日子永远是不会有MM的，可我只会在没有钱的日子里拥有的MM才会去珍惜的。
555555555555……………………
永远不可能555555555555……………………
-------------------------
39度十几天了，41度三四天了，今天41度，明天还是41度，没有空调，没有MM，叫我怎么活？
我就要被烤成人干了，救命啊……
20多天没下过雨，也没有阴天过，甚至连多云都很少出现过。
-------------------------
我流落在凄凉的世界里－孤苦伶仃
我过着动荡无助的生活－四处漂泊

[fj_jiangqi]

left>=thisform.width-.width 这个是判断是否到了最右边
.tag=''.left=.left+iif(.tag=='0',1,-1) 这个是根据.tag的值来控制左移还是右移
-------------------------
39度十几天了，41度三四天了，今天41度，明天还是41度，没有空调，没有MM，叫我怎么活？
我就要被烤成人干了，救命啊……
20多天没下过雨，也没有阴天过，甚至连多云都很少出现过。
-------------------------
我流落在凄凉的世界里－孤苦伶仃
我过着动荡无助的生活－四处漂泊

[daniel2008]

THISFORM.TEXT2.BACKCOLOR=rgb(0,125,0)
THISFORM.TEXT2.WIDTH=THISFORM.TEXT2.WIDTH+3
THISFORM.TEXT3.VALUE=THISFORM.TEXT3.VALUE+1
IF THISFORM.TEXT2.WIDTH>=314
FOR i=1 TO 2000000
ENDFOR
DO mainmenu.mpr
*!* do form sysform
THISFORM.RELEASE
ENDIF

[rocket007]

那怎么样使一个VFP程序在W98独立运行?
----------------------=
=============
天大地大何处无我容身避暑之所！

[rocket007]

那怎么样使一个VFP程序在W2000独立运行?
----------------------=
=============
天大地大何处无我容身避暑之所！

[fj_jiangqi]

建立项目文件，添加主程序，编译，ok
-------------------------
我流落在凄凉的世界里－孤苦伶仃
我过着动荡无助的生活－四处漂泊

[rocket007]

青狼，不用绝望啊
================
人生天地间，无始终者，非君子也！
=============
坚持住！
=========
四十几度而已嘛，
怕什么

[fj_jiangqi]

温度不在高，再高也无所谓。
生命不在长，只要有个精彩瞬间。
绝望，人生无望，绝望……
-------------------------
我流落在凄凉的世界里－孤苦伶仃
我过着动荡无助的生活－四处漂泊

[rocket007]

下面的是什么意思？
=====================

THISFORM.TEXT2.BACKCOLOR=rgb(0,125,0)
THISFORM.TEXT2.WIDTH=THISFORM.TEXT2.WIDTH+3
THISFORM.TEXT3.VALUE=THISFORM.TEXT3.VALUE+1
IF THISFORM.TEXT2.WIDTH>=314
FOR i=1 TO 2000000
ENDFOR
DO mainmenu.mpr
*!* do form sysform
THISFORM.RELEASE
ENDIF

[fj_jiangqi]

THISFORM.TEXT2.BACKCOLOR=rgb(0,125,0) && 设置背景颜色
THISFORM.TEXT2.WIDTH=THISFORM.TEXT2.WIDTH+3 && 宽度加3
THISFORM.TEXT3.VALUE=THISFORM.TEXT3.VALUE+1 && 值加1
IF THISFORM.TEXT2.WIDTH>=314
FOR i=1 TO 2000000 && 一个空循环，可能不会运行vfp有这样的优化处理
ENDFOR
DO mainmenu.mpr
*!* do form sysform
THISFORM.RELEASE
ENDIF
-------------------------
我流落在凄凉的世界里－孤苦伶仃
我过着动荡无助的生活－四处漂泊

[rocket007]

上面这个程序都不能使我解决问题
--------
但青狼你上面的却行！
GIVE YOU 分

[fj_jiangqi]

应该不行？？？………(^0^)
-------------------------
我流落在凄凉的世界里－孤苦伶仃
我过着动荡无助的生活－四处漂泊

[rocket007]

hahahahahahha!!!!!!!!!!!!!!!!!!!!!