Delphi使用FastReport设置横向打印报错 10
“fr.Pages[0].pgOr:=poLandscape;”[错误]Unit1.pas(30):Incompatibletypes:'fr_class.TPrinte...
“fr.Pages[0].pgOr:= poLandscape;”
[错误] Unit1.pas(30): Incompatible types: 'fr_class.TPrinterOrientation' and 'Unit1.TPrinterOrientation'
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, Printers , fr_class;
type
TForm1 = class(TForm)
fr: TfrReport;
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
begin
fr.Pages[0].pgOr:= poLandscape;
end;
end. 展开
[错误] Unit1.pas(30): Incompatible types: 'fr_class.TPrinterOrientation' and 'Unit1.TPrinterOrientation'
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, Printers , fr_class;
type
TForm1 = class(TForm)
fr: TfrReport;
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
begin
fr.Pages[0].pgOr:= poLandscape;
end;
end. 展开
1个回答
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询