能否将StringGrid内容打印(100分)

L

LIANGXIAOHONG1

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-11-09

• #1

能否有什么方法将StringGrid中内容，按其排列顺序打印出来，
可否通过Quickreport进行预览及打印?

 

Y

YNTW

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-11-10

• #2

直接用Canvas输出

 

L

LIANGXIAOHONG1

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-11-10

• #3

我想能先预览，再选择是否打印

 

W

whbell

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-11-10

• #4

打印窗体就行了

 

T

tseug

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-11-10

• #5

procedure TForm1.Button1Click(Sender:TObject);
begin
if PrintDialog1.Execute then
begin
with Printerdo
begin
begin
Doc;
StringGrid1.PaintTo(Handle, 10, 10);
EndDoc;
end;
end;

end;

 

L

LIANGXIAOHONG1

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-11-10

• #6

最好有提供通过Quickreport进行预览及打印的方法

 

老

老赵

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-11-10

• #7

fastreport2.44
www.51delphi.com
可以打印stringgrid的内容。

 

L

LIANGXIAOHONG1

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-11-10

• #8

老赵：我在www.51.delphi.comk中怎么也没发现您说的同内容，请再赐教!

 

S

sword_liu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-11-10

• #9

可以呀。
如果你的stringgrid是有连接数据库。
如果没有，把它存入到数据库，然后打印、

 

B

bbs_delphi

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-11-10

• #10

用控件可以

 

C

chawk

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-11-10

• #11

对，有现成的控件，或者用一个数据感知控件与它相连。

 

P

peter_peng1980

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-11-10

• #12

你可以将stringgrid做成一个控件，就像dbgrid一样，可以连接数据库，这样就可以用Quickreport
例如：
type
Tssgrid = class(TStringGrid)
procedure ssmousedown(Sender: TObject;
Button: TMouseButton;
Shift: TShiftState;
X, Y: Integer);
procedure ssmouseup(Sender: TObject;
Button: TMouseButton;
Shift: TShiftState;
X, Y: Integer);
procedure beforeopen(sender: tdataset);
procedure afteropen(sender: tdataset);
private
{ Private declarations }
fdatasetname: string;
fsql: string;
protected
procedure ffdatasetname(const value: string);
procedure ffsql(const value: string);
{ Protected declarations }
public
ccol: integer;
query: tquery;
constructor create(aowner: tcomponent);
override;
destructor destroy;
override;
{ Public declarations }
published
property SQL: string read fsql write ffsql;
property DataSetName: string read fdatasetname write ffdatasetname;
{ Published declarations }
end;
再来打印
如果你想要一些打印的话，我发邮件给你。

 

L

LIANGXIAOHONG1

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-11-10

• #13

peter_peng1980:如果可以，将不胜感激！

 

B

balaschen

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-11-10

• #14

用dxComponentPrinter绝对好用

 

海

海阳

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-11-11

• #15

peter_peng1980: 如果可以告诉我怎么样让一个dbgrid原封不动（基本上）地用qreport
打印出来，我将不胜感激，我那儿有个贴子，那100分归你了！！！
海阳（600060@21cn.com)

 

老

老赵

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-11-11

• #16

>>老赵：我在www.51.delphi.comk中怎么也没发现您说的同内容，请再赐教!
我说的不清楚吗？
用fastreport控件。
http://www.51delphi.com
网站上有。

 

L

LIANGXIAOHONG1

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-11-11

• #17

老赵：我在该处下载后，得到一个rar文件，
不知该文件如何进行解压及安装，还请您赐教

 

W

weiweiHU

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-11-11

• #18

我找找、、、是画的，用QRP,

 

L

LIANGXIAOHONG1

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-11-12

• #19

我在安装fastreport244时，提示无fr_class.dcu文件，我搜索全部目录只发现有fr_class.pas文件，
是不是还有其他秘密,请赐教

 

L

LIANGXIAOHONG1

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-11-12

• #20

多人接受答案了。