| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 4519 人关注过本帖
标题:咨询
只看楼主 加入收藏
qlq
Rank: 1
等 级:新手上路
帖 子:8
专家分:0
注 册:2008-10-3
收藏
 问题点数:0 回复次数:10 
咨询
我用PB做论文,程序流程是先做一个启动封面,启动完成后,自动进入主窗口,现在把主窗口设计和代码编写完成后,没有达到我的目的,请版主帮忙
搜索更多相关主题的帖子: 咨询 
2008-10-03 16:53
freele_china
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:JiNan
等 级:版主
威 望:6
帖 子:352
专家分:0
注 册:2007-4-6
收藏
得分:0 
主要你问的问题太笼统了。也没有说清楚你的目的。
如果你需要 启动封面 延迟的话 可以如下操作
1.W_启动封面中, OPEN事件里   time(5)    //5 是可以变的秒
2.W_启动封面中, timer事件里  open(W_主窗口)
3.W_启动封面中, timer事件里  close(this)

雁过留声,人过留名
2008-10-04 08:41
qlq
Rank: 1
等 级:新手上路
帖 子:8
专家分:0
注 册:2008-10-3
收藏
得分:0 
版主好!上次提的问题已解决,原因在于我是新手,演示方法没选对。今天我在编写确认命令按钮的代码时,系统提示出错,请指教,代码如下:
string qy
qy = "(" + "用户名" + "=" + "'" + sle_1.text  + "'" + ")" + "and"+
    "(" + "用户口令" + "=" + "'" + sle_2.text + "'" + ")"
dw_1.setfilter(qy)
filter(dw_1)
dw_1.retrieve(1)
sle_1.text = string(dw_1.rowcount())
if dw_1.rowcount() =0 then
    messagebox ("警告","你是合法的用户吗?请重新输入!",stopsign!)
else
    open(w_pwindow)
    close(w_password)
end if
系统提示错误如下:
error  c0031:syntax err
error  c0031:syntax err
warning c0014:undefined variable:w_pwindow
error  c0116:reference argument type doesn't match function definition:open
2008-10-05 01:31
qlq
Rank: 1
等 级:新手上路
帖 子:8
专家分:0
注 册:2008-10-3
收藏
得分:0 
2008-10-05 08:50
freele_china
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:JiNan
等 级:版主
威 望:6
帖 子:352
专家分:0
注 册:2007-4-6
收藏
得分:0 
//////////////////////////////////////////////////
//  密码确认登录窗口  
//  两个sle,一个Button
//如下写在 Button clicked 中
//////////////////////////////////////////////////

String ls_usid ,ls_pwd
Long    ll_count

ls_usid    =    sle1.text
ls_pwd        =    sle2.text

SELECT    COUNT(*)
INTO    :ll_count
FROM    <密码确认表>
WHERE    <用户代码>    =    :ls_usid
AND    <密码>        =    :ls_pwd
;

IF ll_count    > 0 THEN
    open(w_pwindow)            //w_pwindow 为主窗口,不要写错
    close(w_password)            //也可以写成 close(parent)
ELSE
    messagebox ("警告","你是合法的用户吗?请重新输入!",stopsign!)
END IF

雁过留声,人过留名
2008-10-05 15:11
qlq
Rank: 1
等 级:新手上路
帖 子:8
专家分:0
注 册:2008-10-3
收藏
得分:0 
非常感谢版主在百忙工作中给予的解答!辛苦了!请问版主在这方面发展有没有推荐的好书?请注明书号,出版社,作者,日期。多谢!向乐于奉献的版主们致敬!
2008-10-06 22:30
qlq
Rank: 1
等 级:新手上路
帖 子:8
专家分:0
注 册:2008-10-3
收藏
得分:0 
请问版主怎样在帖子里粘贴图片
我在运行程序时,出现一个提示小窗口:标题是“不能连接上数据库!”接着是一行英文提示:“transaction already connected”,最后是一个“确定”按钮,点击“确定”按钮后,才能进行下一步运行,请版主解答
2008-10-06 22:50
qlq
Rank: 1
等 级:新手上路
帖 子:8
专家分:0
注 册:2008-10-3
收藏
得分:0 
编写“删除记录”命令按钮控件的代码如下:
         Long  num
         Integer  yess
         Yess =messagebox(“注意!”,”删除的记录不可恢复!确认要删除吗?”,question!,yessno!)
         If  yess=1 then
            Num=dw_2.getrow()
            Deleterow(dw_2.num)
         Else
            Messagebox(“说明”,”记录没有被删除,仍然可以使用!”)
         End if
提示如下:
error c0060:illegal enumerated constant:yessno
error c0019:incompatible property num for type dw_2
2008-10-07 00:12
qlq
Rank: 1
等 级:新手上路
帖 子:8
专家分:0
注 册:2008-10-3
收藏
得分:0 
编写“确认”命令按钮控件的代码如下:
“确认”命令按钮的作用在于对增加记录或删除记录的操作进行确认,如果不执行该操作,则数据库中的记录将不会被保存,即不会真正地增加或删除记录。
         If update(de_2,true,false)=1 then
            Dw_2.resetupdate()
            Commit;
            Dw_2.retrieve(0)
         Else
            Rollback;
            Messagebox(“注意!”,”数据保存失败!”)
         End if
提示如下:
warning c0014:undefined variable:de_2
error  c0051:unknown function name:update
2008-10-07 00:17
qlq
Rank: 1
等 级:新手上路
帖 子:8
专家分:0
注 册:2008-10-3
收藏
得分:0 
编写“执行查询”命令按钮控件的代码如下:
         String s1,s2
         Integer num
         S1=ddlb_1.text +”=”+”’”+sle_1.text +”’”
         Dw_1.setfilter(s1)
         Filter(dw_1)
         Dw_1.retrieve()
         Num =dw_1.getrow()
         S2=”(”+”物品编号=”+”’”+dw_1.object.data[num,1]+”’”+”)”+”or”+”(”+”物品名=”+”’”+dw_1.object.data[num,2]+”’”+”)”
Dw_2.setfilter(s2)
setfilter(Dw_2)
Dw_2.retrieve(0)
S2=”物品编号<>’’”
Dw_1.setfilter(s2)
filter(Dw_1)
提示如下:
error c0084:bad number of arguments for function:setfilter
2008-10-07 00:22
快速回复:咨询
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.038297 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved