Jump to content

Valteir Costa de Sousa

Membros
  • Content Count

    2
  • Joined

  • Last visited

Community Reputation

0 Neutral

About Valteir Costa de Sousa

  • Rank
    Novato

Recent Profile Visitors

563 profile views
  1. 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; /
  2. 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;
×
×
  • Create New...