本上次发过贴。说是求助一段源吗,内容是这样的:“本人想做一个小票打印程序,就是通常在服装店买衣服打印给客户那样的小票,第一部分是LOGO加店名(字体大点),第二部分是基本内容(字体一般标准的),第三部分是,本店的地址,加上联系方式等”。有一分热心的朋友告诉我,用DELPHPI本身代码写,可能很困难,如借助第三方控件就很简单,然后在他的回复中找到了这个控件的名字FastReports4,我也试着用这个控件中的一个组件画了一个画,咦!果真提快的,一下子画好了,接下来的就是代码问题了,那么我要如何把这个EDIT中的内容或者是memo中内空输出到报表上呢?百度,GOOGLE了一下,音讯全无!求高手来发份资料呀,或者方下方法,小人邮箱地址:[email protected]
解决方案 »
- 关于datagrid刷新的问题~
- 请叫一个delphi操作注册表改首页的问题
- 关于Dev Express4.52与Asta3.81组件联合使用中出现的问题。
- 关于sql语句
- 呵呵,看看这个很简单的问题,我一直找不出错误,请大家帮忙找找~~~~~~~~~~~~~~~
- 解决就给分,在线等。。。。。。
- 请问我在使用sub detail打印明细表时,为什么会重复打很多次,预览中的效果是好的,但是打印出来的sub detail中的记录是重复打印的
- 任务栏右键菜单的简单问题!
- Delphi程序問題
- 如何在二个EXE文件间传递数据??????
- 有谁用过fastScript?
- 如何将memo内容另存为excel文件
如下procedure TfrmPrintBill.frxReport1GetValue(const VarName: String;
var Value: Variant);
begin
//自己的增加变量
if Trim(VarName)='制表' then
Value:=Edit1.text;
if Trim(VarName)='工号' then
Value:=Edit2.Text ;
end;2. 在 FastReport 设计画面
使用自己的定义的变量 [制表] ,[工号]
begin
LoadFromFile( 'test.fr3') ; //自己注意路径
//对变量赋值
Variables[ 'address' ] := QuotedStr(Edit1.text);
...
//预备打印
PrepareReport;
ShowPreparedReport;
end;够详细了吧