★★★关于报表显示日期的问题★★★！！！！来者有分！！！！！！

Question

我想把DateTimePicker控件的日期显示在fastreport的报表中，
我的思路是，把DateTimePicker控件的日期输出在一个表中,在调用其中的数据，如果这样的话，
   with Query1 do
     begin
     close;
     SQL.clear;
     SQL.Add('insert 1表 values (:a)');
    ParamByName('a').AsDateTime:= DateTimePicker1.Date;
    Query1.open;
    end;
用到了BDE中的Query主件，在设置databasename是我遇到了麻烦，我用的是ADO数据源，不想在多设置数据源，大家有什么好办法吗？？？？？？？？？？？，如果用我那办法，怎么解决数据源的问题？？？

Answer 1

Query1.open;改成
  Query1.ExecSql;

Answer 2

我想把DateTimePicker控件的日期显示在fastreport的报表中，
我的思路是，把DateTimePicker控件的日期输出在一个表中,在调用其中的数据，如果这样的话，
   with Query1 do
     begin
     close;
     SQL.clear;
     SQL.Add('insert 1表 values (:a)');
    ParamByName('a').AsDateTime:= DateTimePicker1.Date;
    Query1.open;
    end;
用到了BDE中的Query主件，在设置databasename是我遇到了麻烦，我用的是ADO数据源，不好设置Query主件中的databasename，换成ADOQuery的话，程序怎么改？（上面的程序我是看了一个例子）^*^

Answer 3

不用那么麻烦吧。
在报表中加个Memo1吧。
再在frReport1的OnGetValue事件中加入 
frReport1.FindObject('memo1').Memo.Text:=DateTimePicker1.Date;
不就可以啦!

Answer 4

在报表上放上一个 memo1, 在打开报表的按钮中写:.....
frReport1.FindObject('memo1').memo.Text:= datetimetostr(DateTimePicker1.date);
  frReport1.ShowReport;
一样的.

Answer 5

你可以将日期作为一个变量传递到fastreport中。uses FR_Class  if (q1.Active) then
  begin
    frdata1.DataSet:=q1;
    report1.LoadFromFile(ExtractFilePath(Application.ExeName)+'report\xsmx.frf');    frVariables['datetime']:=DateTimePicker1.Date;
    report1.ShowReport;
  end;
在fastreport中放一个memo，值为：[datetime]

Answer 6

如果按照你的方法把query换成adoquery就可以了吧 
不过楼上的几位的方法好一些 直接传就可以了。但是如果这个日期值需要保存，那就按照你自己的方法

Answer 7

我也頂，引用:"在设置databasename是我遇到了麻烦"
如像不是在說“★★★关于报表显示日期的问题★★★！！！！”
沒聽懂!!!!!!!!!!!

Answer 8

直接设置ADOQUERY的ADOConnectionString属性------>Microsoft OLE DB Provider for ODBE Drivers-------->数据源     //楼主是这个意思吗？？

Answer 9

在设置databasename是我遇到了麻烦
是什么麻烦？说来听听

Answer 10

2个可能
1：你的时间字段格式有问题，如果是datetime格式，先要转换成str,datetimetostr().
2:
   with adoquery1 do
     begin
     close;
     sql.clear;
     sql.text:="";
     sql.execsql;
     end;

Answer 11

接分
FieldByName('时间').AsDateTime:=strtodate(formatdatetime('yyyy-mm-dd',DTPicker1.Date))

Answer 12

可以在FP中添加一个FORM，这样就可以加入时间控件，你可以参考FASTREPORT的DEMO，都可以加进去
在报表中你就直接引用控件就一样的，跟DELPHI一样的使用
如：dtp.data