Re: Printing from PrintPreview

Return to index

Author

Message

Anderson Wilson

Posted: 06/16/2005 17:54:23

The project attached demonstrates the problem I mention before with the

print button in the print preview form.

As you will see, the rvf appears ok in print preview but the print

button doesn't work,

it just CLOSES the print preview form.

But if you then click on the button MyPrint, rvf prints ok.

OBS: Using RichViewActions 1.47 and RichView 1.9.11

Could you help solving this problem?

Thanks

Anderson

Anderson Wilson wrote:

> Sorry, the problem is not with the assignment of AACtionPrint but when

> the Execute method is called in:

>

> if (PreviewForm.ShowModal=mrOk) and (AActionPrint<>nil) then

>  AActionPrint.Execute;

>

> Shouldn't be

>

> AActionPrint.ExecuteTarget(Target);

>

> ?????

>

> Anderson

>

>

>

> Anderson Wilson wrote:

>

>> Hi,

>>

>> procedure TfrmMD.PrintBtnClick(Sender: TObject);

>> begin

>>   rvActionsResource.rvActionPrint1.ExecuteTarget(RichViewEdit1);

>> end;

>>

>> procedure TfrmMD.PrintPreviewBtnClick(Sender: TObject);

>> begin

>>   rvActionsResource.rvActionPrintPreview1.ActionPrint :=

>>                                   rvActionsResource.rvActionPrint1;

>>   rvActionsResource.rvActionPrintPreview1.ExecuteTarget(RichViewEdit1);

>> end;

>>

>> When PrintBtnClick is called, it shows the Print Dialog and the

>> document is printed. No problems here.

>>

>> When PrintPreviewBtnClick is called, it shows the preview of the

>> document ok, but when I click on the printer button at TfrmRVPreview

>> the PrintDialog does not show, although ActionPrint is assigned.

>>

>> When I debug RichViewActions

>>

>> procedure TrvActionPrintPreview.ExecuteTarget(Target: TObject);

>> begin

>>   AActionPrint := GetActionPrint;

>>

>> GetActionPrint returns nil!!!!

>>

>> Please, could you tell me what am I doing wrong?

>>

>> Thanks

>>

>> Anderson