欢迎大家来讨论,必能拿分(100分)

  • 主题发起人 主题发起人 张林林
  • 开始时间 开始时间

张林林

Unregistered / Unconfirmed
GUEST, unregistred user!
现在我有一个VFP的数据库,想对他进行如下操作。
1、可以对任一字段排序
2、可以对任一条件进行屏蔽,比如,只显示地区=‘香港’的纪录。
3、可以随意选定其中多条纪录,在此纪录前打勾即可。
4、可以设置打印SETUP。将选中纪录打印出来。
5、可以打印表格中的所有数据
我选用那种控件操作比较方便,有3种方案
1、DELPHI4.0中的HCN6,DBGRID
2、DELPHI5.0中的ADO
3、DELPHI5.0中的INFORPOWER
提问:还有什么更好的选择,关于打印我没做过,有什么好的建议,多多益善。
 
我選1﹐用Query加DBGrid完全能夠解決你的問題。
 
Query + DBGrid + QuickReport = Ok
 
为什么没人来讨论?
 
扔掉 vfp ,那是垃圾!
 
Query + DBGrid + QuickReport = Ok
如果用DELPHI做前台开发工具,
这上面的公式组合是个不错的选择。
 
VFP是古董极的破东西了.
 
Query + DBGrid + QuickReport
我同意

 
多谢大家
 
什么时候了还vfp,
query+dbgrid+ReportBuilder.
 
我看大家的意见基本一致了:
用一:DELPHI用起来真的很不错的,VFP就淘汰掉算了!
 
VFP不好,DEPHI简单又稳定,用query和dbgrid再加QuickReport

如果表中字段有特殊格式的显示要求,可以用listview代替query,界面更美观,而且可以加
上小图标来区别不同类型的记录
 
我现在遇到了问题
我用DELPHI4.0的DBGRID显示了12个字段
1。希望鼠标点击第一个字段(MARK)时,在此字段中写入‘*’点击其他字段不发生此操作。
2。怎样在点标题栏就能自动进行排序,且自动加上序号,在另一字段显示(RANK).
对1。
procedure TQKK.DBGrid1CellClick(Column: TColumn);
begin
if column.FieldName = 'MARK' then
begin
WITH kxb.HalcyonDataSet1 do
BEGIN
Edit;
IF FieldByName('MARK').Asstring = '√' THEN
FieldByName('MARK').Asstring := ''
ELSE FieldByName('MARK').Asstring := '√';
post;
END;
end;
end;

'√'打上了,可是表格中我所标记的纪录都会出现两次,并且表格不停的跳动,
比如我只点击了第一条,记录就跳到第三十多条,这时表格中除了第一条被选中且打'√'外
还会凭空又加入一条和第一条一模一样的纪录,也被选中且打'√'。

对2。
procedure TQKK.DBGrid1TitleClick(Column: TColumn);
var
x: Integer;
TheField : String;
begin
x := Column.Index;
TheField :=column.FieldName;
// TheField := Query1.Fields[x].FieldName;
with Query1 do begin
Active := FALSE;
Sql.Clear;
Sql.Add('Select * from qkpx.dbf order by '+TheField);
Active := TRUE;
end;
end;

提示bde错误,是不是因为我的库有索引造成的。
我该怎么办

 
rxlib 's rxdbgrid


>>提示bde错误,是不是因为我的库有索引造成的。
>>我该怎么办
update bde to 5.1.1
或者thefield是long类型,如是,不能用order by

 
谁能发给我FOR DELPHI4.0的INFOPOWER
多谢

 
MARK字段多余,在DBGRID中加一个 逻辑型的计算字段,则在表格中自动显示为
单选按钮,打印时以此属性值决定打印与否。
用 DBGRID+QUERY+SQL较好!
 
http://www.net-wing.net/kangwei/
ip for delphi
I think exGrid is a better choice for you
 
exGrid 是什么东东?能告诉我吗?
 
你263 mail发不过去???
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
D
回复
0
查看
867
DelphiTeacher的专栏
D
后退
顶部