如何将一个memo中的问题完美的打印出来?
解决方案 »
- 怎样判断一个文件的内容为空?
- 郁闷~还是关于主次窗体的问题~类似qq的登陆窗口与主窗口的关系设计问题~[求求各位了]
- 在线等待,为什么我编写的动态链接库里不能使用TADO或其他关于数据库的控件呢?
- 急....我想建一个登陆认证窗口.............
- 为什么用swflash控件显示FLASH以后出了问题?
- 一个奇怪的问题
- 我忘了,谁能告诉我。
- sql添加记录问题???
- 请问ADOTABLE里面存放的是整个表的记录,还是单独某一个记录啊?
- api套接字问题?
- 最近我接到一个中小企业的信息管理系统的定单临时需要4名程序员协作开发,有意者请回复或mail to me [email protected]
- about the local table,waiting online
i:integer;
PText:TextFile;
begin
inherited;
if printdialog1.execute then
begin
Assingprn(ptext);
Rewrite(PText);
try
Printer.canvas.Font:=Memo1.Font;
for i:=0 to Memo1.Lines.Count-1 do
writeln(PText,Memo1.Line[i]);
finally
CloseFile(PText);
end;
end;
end;
不知道能不能达到你所说的完美!!!!!!!!!