帮我一下,在线等,急~!(50分)

我正在写一个程序，要从一个FORM调用另外一个打印程序，调用方式是对的，可是出现以下的错误:
[Error] bimsoft5.pas(68): Record, object or class type required
[Error] bimsoft5.pas(68): Missing operator or semicolon
[Error] bimsoft5.pas(73): Record, object or class type required
[Error] bimsoft5.pas(73): Missing operator or semicolon
[Fatal Error] bimsoft2.pas(66): Could not compile used unit 'bimsoft5.pas'
我已经在uses处调入bimsoft6.
打印程序的名字为rint.
源程序如下:
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, Grids, DBGrids,unit1, StdCtrls, Buttons, XPMenu, Mask, DBCtrls;

type
Tzr = class(TForm)
DBGrid1: TDBGrid;
Label1: TLabel;
DBText1: TDBText;
Label2: TLabel;
Label3: TLabel;
Label4: TLabel;
Label5: TLabel;
Label6: TLabel;
DBEdit1: TDBEdit;
DBEdit2: TDBEdit;
DBEdit3: TDBEdit;
DBEdit4: TDBEdit;
DBEdit5: TDBEdit;
XPMenu1: TXPMenu;
BitBtn1: TBitBtn;
DBText2: TDBText;
BitBtn2: TBitBtn;
BitBtn3: TBitBtn;
BitBtn4: TBitBtn;
BitBtn5: TBitBtn;
savezr: TBitBtn;
BitBtn7: TBitBtn;
procedure savezrClick(Sender: TObject);
procedure BitBtn7Click(Sender: TObject);
procedure BitBtn4Click(Sender: TObject);
procedure BitBtn5Click(Sender: TObject);
procedure BitBtn1Click(Sender: TObject);
procedure BitBtn2Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
zr: Tzr;

implementation
uses bimsoft6,bimsoft7;

{$R *.dfm}
procedure Tzr.savezrClick(Sender: TObject);
begin

DM.Table_bimsoft.Post;
close;
end;

procedure Tzr.BitBtn7Click(Sender: TObject);
begin

DM.Table_bimsoft.Cancel;
close;
end;

procedure Tzr.BitBtn4Click(Sender: TObject);
begin

print.QuickRep1.print;
end;

procedure Tzr.BitBtn5Click(Sender: TObject);
begin

Print.QuickRep1.Preview;
end;

procedure Tzr.BitBtn1Click(Sender: TObject);
begin

dm.Table_zr.Append;

form11.show;
end;

procedure Tzr.BitBtn2Click(Sender: TObject);
begin

form11.show;
end;

end.

请帮我一下,谢谢~!

bimsoft5.pas第68行、73行对象或者类未定义，缺少分号（bimsoft6和bimsoft5什么关系？）