|
发表于 16-6-2004 12:40 PM
|
显示全部楼层
白日梦 于 15-6-2004 09:13 AM 说 :
Let's say,
Customer combobox is cboCustomer, this field must index
Address textbox is txtAddress
TelNo textbox is txtTelNo
....
Combobox 的 field 是 index 了, 但为何它 shown 的 LISTS 是 A,B,C,a,b,c 而不是 a,A,b,B,c,C?请问要如何, 才能 shown 成 a,A,b,B,c,C? |
|
|
|
|
|
|
|
发表于 16-6-2004 02:55 PM
|
显示全部楼层
用 upper() 或 lower() 函数
index on upper(Customer) tag Customer
因为A,B,C,a,b,c的ASCII code 是 65,66,67,97,98,99. case sensitive.
upper() 或 lower(), case insensitive.
另一个方法就是用 !放进textbox.format输入栏限制只有大写的输入。 |
|
|
|
|
|
|
|
发表于 16-6-2004 04:30 PM
|
显示全部楼层
我的 exe file 超过 10mb, 可有方法把它分散? 不然通过 internet update 给顾客很麻烦。。 |
|
|
|
|
|
|
|
发表于 16-6-2004 04:52 PM
|
显示全部楼层
1 多用 class 写,少用 program code。
比较难做到,要改很多。
2 减少 form 浓缩输入在 formset。
例如在一个 form 里连 account chart, product ID code等都可以输入。
3 分成几个 executable。
例如 account 和 stock 和 payroll 和 ...
当然 project 是各别的。 |
|
|
|
|
|
|
|
发表于 16-6-2004 11:23 PM
|
显示全部楼层
1.在一个 Invoice 的 Program 里,有 Items, Quantity, Unit Price, Amount。请问要如何写及在哪里写才能使 Amount 自动计算?
2.因为每张 Invoice 的 Transaction 都不一样,所以请问要如何写及在哪里写才能使 Total自动计算全部的Amount? |
|
|
|
|
|
|
|
发表于 17-6-2004 09:40 AM
|
显示全部楼层
1. Let's say,
Invoice 的 detail 是 data grid 4 columns 控制
Thisform.Grid1.Column1.ControlSource = Inv2.Items
Thisform.Grid1.Column2.ControlSource = Inv2.Quantity
Thisform.Grid1.Column3.ControlSource = Inv2.Price
Thisform.Grid1.Column4.ControlSource = Inv2.Amount
在 Thisform.Grid1.Column2.Text1.Valid 编程
Thisform.Grid1.Column4.Text1.Value = This.Value * Inv2.Price
在 Thisform.Grid1.Column3.Text1.Valid 编程
Thisform.Grid1.Column4.Text1.Value = Inv2.Quantity * This.Value
在 Thisform.Grid1.Column4.Text1.When 编程
This.Value = Inv2.Quantity * Inv2.Price
2. Let's say,
The structure of 2 dbf files Inv1 & Inv2
Inv1.RefNo, must index
:
Inv1.Total
Inv2.RefNo, must index
Inv2.Items
:
Inv2.Amount
在 DataEnvironment 把 Inv2.Ref 联接 Inv1.Ref
在 Thisform.Grid1.Column4.Text1.Valid 编程
Select Inv2
Sum Amount To nTotal For Ref=Inv1.Ref
Select Inv1
Replace Total With nTotal
[ Last edited by 白日梦 on 17-6-2004 at 09:42 AM ] |
|
|
|
|
|
|
|
发表于 17-6-2004 10:23 AM
|
显示全部楼层
tstan135 于 16-6-2004 11:23 PM 说 :
1.在一个 Invoice 的 Program 里,有 Items, Quantity, Unit Price, Amount。请问要如何写及在哪里写才能使 Amount 自动计算?
请问如果再加上 TOTAL 要如何写及在哪里写才能使 TOTAL 自动计算全部的 Amount? |
|
|
|
|
|
|
|
发表于 17-6-2004 10:51 AM
|
显示全部楼层
|
|
|
|
|
|
|
发表于 17-6-2004 11:41 AM
|
显示全部楼层
对不起,我不明白这段。请问可不可以再次说明?
白日梦 于 17-6-2004 09:40 AM 说 :
在 DataEnvironment 把 Inv2.Ref 联接 Inv1.Ref
在 Thisform.Grid1.Column4.Text1.Valid 编程
Select Inv2
Sum Amount To nTotal For Ref=Inv1.Ref
Select Inv1
Replace Total With nTotal
...
请问要如何联接,及 COMMNAD 应该写再哪里? |
|
|
|
|
|
|
|
发表于 17-6-2004 02:23 PM
|
显示全部楼层
tstan135 于 17-6-2004 11:41 AM 说 :
请问要如何联接,及 COMMNAD 应该写再哪里?
你create了inv1 & inv2 dbf files没?
然后才create invoice form
在 view menu -> Data Environment
+ 上面 2 个 table
drag inv2 的 ref index 去 inv1 的 ref
command 放进 Thisform.Grid1.Column4.Text1.Valid 里 |
|
|
|
|
|
|
|
发表于 17-6-2004 03:09 PM
|
显示全部楼层
谢谢白日梦!
现在的难题是:我是用 WIZARD 的 BUTTON SET,当我 CLICK ‘ADD’就出现 ADD RECORD 的 OPTION (好象很不 User Friendly)。
按 DELETE 就把全部 DELETE 掉。
请问要如何 DESIGN 才能让 USER 容易使用?
[ Last edited by tstan135 on 17-6-2004 at 08:15 PM ] |
|
|
|
|
|
|
|
发表于 18-6-2004 09:08 AM
|
显示全部楼层
你正在做invoice吗?
由于一面invoice的form是同时控制2个table
所以不要用wizard的CommandGroup,自己design
因为在invoice form里有2个Add CommandButton
1个是Add New Invoice(Inv1.dbf加新记录),第2个是Add New Detail(Inv2.dbf加新记录)
Delete也是同样情况。 |
|
|
|
|
|
|
|
发表于 18-6-2004 04:29 PM
|
显示全部楼层
白日梦 于 18-6-2004 09:08 AM 说 :
你正在做invoice吗?
由于一面invoice的form是同时控制2个table
所以不要用wizard的CommandGroup,自己design
因为在invoice form里有2个Add CommandButton
1个是Add New Invoice(Inv1.dbf加新记录),第2个是 ...
也许是我太笨,所以不会自己design。 |
|
|
|
|
|
|
|
发表于 18-6-2004 04:32 PM
|
显示全部楼层
请问要如何才能只 PRINT 或 PREVIEW current record only? |
|
|
|
|
|
|
|
发表于 18-6-2004 10:09 PM
|
显示全部楼层
白日梦,请您再次说明要如何写及在哪里写才能在 COMBO BOX 上直接增加里面的项目。谢谢! |
|
|
|
|
|
|
|
发表于 19-6-2004 11:56 AM
|
显示全部楼层
tstan135 于 18-6-2004 04:29 PM 说 :
也许是我太笨,所以不会自己design。
慢慢来,罗马不是一天建起。你只不过是VFP新手罢了!最好是买几本书来学,有for Beginner的。
tstan135 于 18-6-2004 04:32 PM 说 :
请问要如何才能只 PRINT 或 PREVIEW current record only?
(Scope of Next 1 = Current record)
Report form ? Preview Next 1
(按印表机的CommandButton就可列印出来)
tstan135 于 18-6-2004 10:09 PM 说 :
请您再次说明要如何写及在哪里写才能在 COMBO BOX 上直接增加里面的项目。
ComboBox没有得加新的项目,我通常另外加TextBox来加。
因为它是用来列出另一个table的field来作选择。
[ Last edited by 白日梦 on 21-6-2004 at 01:38 PM ] |
|
|
|
|
|
|
|
发表于 21-6-2004 11:01 AM
|
显示全部楼层
白日梦 于 19-6-2004 11:56 AM 说 :
慢慢来,罗马不是一天建起。你只不过是VFP新手罢了!最好是买几本书来学,有for Beginner的。 ...
在我这儿要买本 FOXPRO 的书,简直难如登天。 |
|
|
|
|
|
|
|
发表于 21-6-2004 11:23 AM
|
显示全部楼层
请问 (Scope of Next 1 = Current record) 要在哪里写? |
|
|
|
|
|
|
|
发表于 21-6-2004 01:41 PM
|
显示全部楼层
tstan135 于 21-6-2004 11:01 AM 说 :
在我这儿要买本 FOXPRO 的书,简直难如登天。
你住那一州?沙巴我没看到,我是在KL找得到,不过是version 3的书。 |
|
|
|
|
|
|
|
发表于 21-6-2004 04:06 PM
|
显示全部楼层
|
|
|
|
|
|
| |
本周最热论坛帖子
|