Valteir Costa de Sousa

Bom dia! Amigo. Para solucionar o problema somente comentei a linha abaixo, que inclusive está colocada sob censura pelo o desenvolvedor; frACBrBoletoFortes := TACBrBoletoFCFortesFr.Create(Self); try ....{conteudo ocultados} RLPrinter.Copies := NumCopias ; // Aparentemente isso está errado... >> Linha que causa a falha. ....{conteudo ocultados} finally frACBrBoletoFortes.Free ; end; /

Bom dia! Amigos; Estou desenvolvendo uma aplicação tipo web services (ISAPI.DLL), ela conecta com o Oracle via dbExpress, usando delphi 7. Ela vai gerar um arquivo pdf. No momento que dou o comando imprimir ele dá o erro "Operation not supported on selected printer.". Nesta linha frACBrBoletoFortes := TACBrBoletoFCFortesFr.Create(Self); ocorre o danandinho do erro. Abaixo a rotina onde ocorre erro sintetizada. Uma coisa me chama atenção, qdo usando a mesma unit em uma aplicação desktop tudo funciona mprimie normalmente. Alguem sabe como posso solucionar o problema procedure TACBrBoletoFCFortes.Imprimir; var frACBrBoletoFortes : TACBRBoletoFCFortesFr; RLFiltro : TRLCustomSaveFilter; RLLayout: TRLReport; begin inherited Imprimir; // Executa verificações padroes {$IFDEF FPC} LoadPortugueseStrings; {$ELSE} // Para que serve esse método ?? // //SetVersion( CommercialVersion, ReleaseVersion, CommentVersion ); {$ENDIF} >>>>>>>>> O Erro ocorre aqui, na criação do TRLReport ele detecta que não existe uma impressoa valida e gera o erro frACBrBoletoFortes := TACBrBoletoFCFortesFr.Create(Self); try ....{conteudo ocultados} finally frACBrBoletoFortes.Free ; end; end;