Ir para conteúdo
  • Cadastre-se

dev botao

Dacte Fastreport Erro


Ver Solução Respondido por Juliomar Marchetti,
  • Este tópico foi criado há 3603 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

Boa tarde, ao carregar na propriedade FastFile o exemplo "DACTE.fr3" ou qualquer outro relátorio do Fast da um erro(abaixo) no componente e não tem como contorna-lo, alguém já teve algo igual ?

 

 

---------------------------

Error
---------------------------
Access violation at address 11ECB305 in module 'frx14.bpl'. Read of address 00000000.
---------------------------
OK   Details <<   
---------------------------
[11ECB305]{frx14.bpl   } Frxclass.TfrxReport.LoadFromFile + $11
[5000D96B]{rtl140.bpl  } System.@UStrCopy (Line 18107, "System.pas" + 16) + $10
[12F1B543]{ACBrCTeDacteFRpkg.bpl} Acbrctedactefr.TACBrCTeDACTEFR.PrepareReport + $5B
[12F1B26E]{ACBrCTeDacteFRpkg.bpl} Acbrctedactefr.TACBrCTeDACTEFR.GetPreparedReport + $32
[50051671]{rtl140.bpl  } TypInfo.GetOrdProp (Line 1657, "TypInfo.pas" + 24) + $0
[20DA5D8F]{designide140.bpl} DesignEditors.TPropertyEditor.GetOrdValueAt (Line 732, "DesignEditors.pas" + 0) + $B
[20DA5D7E]{designide140.bpl} DesignEditors.TPropertyEditor.GetOrdValue (Line 727, "DesignEditors.pas" + 0) + $2
[20DA7D09]{designide140.bpl} DesignEditors.TComponentProperty.GetComponentReference (Line 1848, "DesignEditors.pas" + 1) + $2
[20DA7A50]{designide140.bpl} DesignEditors.TComponentProperty.GetAttributes (Line 1771, "DesignEditors.pas" + 6) + $E
[20EBD311]{vclide140.bpl} PropBox.TPropItem.GetAttributes (Line 325, "propbox.pas" + 1) + $5
[20EBD434]{vclide140.bpl} PropBox.TPropItem.GetIsExpandable (Line 363, "propbox.pas" + 1) + $2
[20EBE38C]{vclide140.bpl} PropBox.TCustomPropListBox.DrawPropItem (Line 829, "propbox.pas" + 79) + $3
[501CB68C]{vcl140.bpl  } Graphics.TResourceManager.AssignResource (Line 1868, "Graphics.pas" + 12) + $D
[20EBEE0E]{vclide140.bpl} PropBox.TCustomPropListBox.CNDrawItem (Line 1130, "propbox.pas" + 12) + $2E
[50295E70]{vcl140.bpl  } Controls.TControl.WndProc (Line 7062, "Controls.pas" + 91) + $6
(000398F1){CnWizards_D14.dll} [0961A8F1]
(00039958){CnWizards_D14.dll} [0961A958]
(00039A09){CnWizards_D14.dll} [0961AA09]
(000371A1){CnWizards_D14.dll} [096181A1]
[20D8C74E]{designide140.bpl} DeskUtil.SetFocusHook (Line 454, "DeskUtil.pas" + 4) + $C
[5029A738]{vcl140.bpl  } Controls.TWinControl.WndProc (Line 9819, "Controls.pas" + 144) + $6
[501F06D4]{vcl140.bpl  } StdCtrls.TCustomListBox.WndProc (Line 6117, "StdCtrls.pas" + 37) + $4
[50295A94]{vcl140.bpl  } Controls.TControl.Perform (Line 6840, "Controls.pas" + 10) + $8
[5029A88B]{vcl140.bpl  } Controls.DoControlMsg (Line 9888, "Controls.pas" + 12) + $11
[5029B412]{vcl140.bpl  } Controls.TWinControl.WMDrawItem (Line 10211, "Controls.pas" + 1) + $8
[50295E70]{vcl140.bpl  } Controls.TControl.WndProc (Line 7062, "Controls.pas" + 91) + $6
[214CAF33]{vclactnband140.bpl} ActnMenus.CallWindowHook (Line 743, "ActnMenus.pas" + 20) + $F
[5029A738]{vcl140.bpl  } Controls.TWinControl.WndProc (Line 9819, "Controls.pas" + 144) + $6
[50299DD8]{vcl140.bpl  } Controls.TWinControl.MainWndProc (Line 9540, "Controls.pas" + 3) + $6
[50076408]{rtl140.bpl  } Classes.StdWndProc (Line 13015, "Classes.pas" + 8) + $0
(000398F1){CnWizards_D14.dll} [0961A8F1]
(00039958){CnWizards_D14.dll} [0961A958]
[5029A838]{vcl140.bpl  } Controls.TWinControl.DefaultHandler (Line 9860, "Controls.pas" + 30) + $17
[5029AA3C]{vcl140.bpl  } Controls.TWinControl.PaintWindow (Line 9943, "Controls.pas" + 9) + $6
[5029A8F1]{vcl140.bpl  } Controls.TWinControl.PaintHandler (Line 9903, "Controls.pas" + 4) + $14
[5029B0D0]{vcl140.bpl  } Controls.TWinControl.WMPaint (Line 10104, "Controls.pas" + 6) + $5
[20D8C74E]{designide140.bpl} DeskUtil.SetFocusHook (Line 454, "DeskUtil.pas" + 4) + $C
[501F0A04]{vcl140.bpl  } StdCtrls.TCustomListBox.WMPaint (Line 6274, "StdCtrls.pas" + 6) + $6
[50295E70]{vcl140.bpl  } Controls.TControl.WndProc (Line 7062, "Controls.pas" + 91) + $6
[214CAF33]{vclactnband140.bpl} ActnMenus.CallWindowHook (Line 743, "ActnMenus.pas" + 20) + $F
[5029A738]{vcl140.bpl  } Controls.TWinControl.WndProc (Line 9819, "Controls.pas" + 144) + $6
[501F06D4]{vcl140.bpl  } StdCtrls.TCustomListBox.WndProc (Line 6117, "StdCtrls.pas" + 37) + $4
[50299DD8]{vcl140.bpl  } Controls.TWinControl.MainWndProc (Line 9540, "Controls.pas" + 3) + $6
[50076408]{rtl140.bpl  } Classes.StdWndProc (Line 13015, "Classes.pas" + 8) + $0
[5029D4B5]{vcl140.bpl  } Controls.TWinControl.Update (Line 11787, "Controls.pas" + 1) + $12
[5029D4CD]{vcl140.bpl  } Controls.TWinControl.Repaint (Line 11793, "Controls.pas" + 2) + $4
[50294C0A]{vcl140.bpl  } Controls.TControl.Refresh (Line 6310, "Controls.pas" + 0) + $2
[20EBD95B]{vclide140.bpl} PropBox.TCustomPropListBox.ItemsChanged (Line 526, "propbox.pas" + 3) + $2
[50067CC1]{rtl140.bpl  } Classes.TStringList.Changed (Line 5518, "Classes.pas" + 2) + $7
[5006821F]{rtl140.bpl  } Classes.TStringList.SetUpdateState (Line 5755, "Classes.pas" + 1) + $14
[50066495]{rtl140.bpl  } Classes.TStrings.EndUpdate (Line 4863, "Classes.pas" + 1) + $A
[20EBEFEE]{vclide140.bpl} PropBox.TCustomPropListBox.Reset (Line 1194, "propbox.pas" + 25) + $9
[20EC52C0]{vclide140.bpl} IDEInspListBox.TInspListBox.Reset (Line 1457, "IDEInspListBox.pas" + 3) + $2
[20EBF8B3]{vclide140.bpl} PropBox.TCustomPropListBox.SetSelection (Line 1431, "propbox.pas" + 3) + $4
[20978446]{coreide140.bpl} PropInsp.TPropertyInspector.Refresh (Line 1424, "PropInsp.pas" + 46) + $16
[209786C0]{coreide140.bpl} PropInsp.TPropertyInspector.Modified (Line 1476, "PropInsp.pas" + 0) + $4
[209299E0]{coreide140.bpl} PropInspServices.TPropInspManager.NotifyModified (Line 65, "PropInspServices.pas" + 5) + $1
[20D9CDE1]{designide140.bpl} ToolUtils.ForEach (Line 90, "ToolUtils.pas" + 5) + $F
[20929971]{coreide140.bpl} PropInspServices.TPropInspManager.Modified (Line 53, "PropInspServices.pas" + 1) + $F
[2196B3C0]{delphicoreide140.bpl} PropInspManage.TDesignerPropSelection.ItemsModified (Line 526, "PropInspManage.pas" + 10) + $F
[20DD8CBF]{designide140.bpl} ComponentDesigner.DesignNotificationItemsModified (Line 8199, "ComponentDesigner.pas" + 5) + $7
[20DD4471]{designide140.bpl} ComponentDesigner.TComponentDesigner.RootModified (Line 6305, "ComponentDesigner.pas" + 7) + $12
[20DCB437]{designide140.bpl} ComponentDesigner.TComponentRoot.Modified (Line 2896, "ComponentDesigner.pas" + 5) + $1E
[20DA5F53]{designide140.bpl} DesignEditors.TPropertyEditor.Modified (Line 815, "DesignEditors.pas" + 1) + $5
[20DA6058]{designide140.bpl} DesignEditors.TPropertyEditor.SetStrValue (Line 863, "DesignEditors.pas" + 5) + $2
[20DA73C4]{designide140.bpl} DesignEditors.TStringProperty.SetValue (Line 1543, "DesignEditors.pas" + 0) + $0
[096F1E3B]{CnWizards_D14.dll} Unknown function at INITWIZARD0001 + $89C8F
[12F1BA45]{ACBrCTeDacteFRpkg.bpl} Acbrctedactefrreg.TACBrCTeDACTEFRFileNameProperty.Edit + $9D
[20976C8E]{coreide140.bpl} PropInsp.TPropertyInspector.PropListEditDblClick (Line 870, "PropInsp.pas" + 21) + $1
[20EC2F75]{vclide140.bpl} IDEInspListBox.TInspListBox.DoEditDblClick (Line 617, "IDEInspListBox.pas" + 2) + $A
[20EC4D3F]{vclide140.bpl} IDEInspListBox.TInspListBox.ListButtonClick (Line 1307, "IDEInspListBox.pas" + 2) + $2
[502963DB]{vcl140.bpl  } Controls.TControl.Click (Line 7178, "Controls.pas" + 9) + $8
[20EBA922]{vclide140.bpl} IDEListBtns.TListButton.WMLButtonUp (Line 582, "IDEListBtns.pas" + 8) + $11
[50295E70]{vcl140.bpl  } Controls.TControl.WndProc (Line 7062, "Controls.pas" + 91) + $6
[1184AD8C]{rbIDE1114.bpl} Ppsynuedit.TSynEditPlugin + $74
[50299FCB]{vcl140.bpl  } Controls.TWinControl.IsControlMouseMsg (Line 9596, "Controls.pas" + 1) + $9
[5029A738]{vcl140.bpl  } Controls.TWinControl.WndProc (Line 9819, "Controls.pas" + 144) + $6
[50299DD8]{vcl140.bpl  } Controls.TWinControl.MainWndProc (Line 9540, "Controls.pas" + 3) + $6
[50076408]{rtl140.bpl  } Classes.StdWndProc (Line 13015, "Classes.pas" + 8) + $0
[50307AFF]{vcl140.bpl  } AppEvnts.TMultiCaster.GetAppEvents (Line 653, "AppEvnts.pas" + 1) + $5
(0000C3DC){IDEFixPack.dll} [0B69D3DC]
[502C87BA]{vcl140.bpl  } Forms.TApplication.HandleMessage (Line 9790, "Forms.pas" + 1) + $4
[502C8AE5]{vcl140.bpl  } Forms.TApplication.Run (Line 9927, "Forms.pas" + 26) + $3
[004369AE]{bds.exe     } bds.bds (Line 200, "" + 8) + $FFFB
 

 

 

Att Matthias Bebber Breda

 

Link para o comentário
Compartilhar em outros sites

  • Moderadores

Boa tarde

Primeiro peço que para quando postar algum texto favor anexar ao fórum, seu post fica menor e legível!

sobre seu problema antes de postar chegou a pesquisar? o Régys explica em uns 2 posts que não é possível setar o fr3 em designer

tem que informar em tempo de execução o arquivo!

Consultor SAC ACBr Juliomar Marchetti
 

Projeto ACBr

skype: juliomar
telegram: juliomar
e-mail: [email protected]
http://www.juliomarmarchetti.com.br
MVP_NewLogo_100x100_Black-02.png
 

 

Link para o comentário
Compartilhar em outros sites

Boa tarde

Primeiro peço que para quando postar algum texto favor anexar ao fórum, seu post fica menor e legível!

sobre seu problema antes de postar chegou a pesquisar? o Régys explica em uns 2 posts que não é possível setar o fr3 em designer

tem que informar em tempo de execução o arquivo!

Peço desculpas, na próxima vez anexo o arquivo. Acabei pesquisando sim, mas mesmo colocando em tempo de execução da um erro "Imprimir", não consigo de jeito algum fazer funcionar pelo FastReports, pelo QuickReport funciona.

Link para o comentário
Compartilhar em outros sites

Mas o que ocorre? ele só não irá funcionar senão conseguir informar o .fr3 correto ou carregar o xml do CT-e!

 

Dá uma mensagem de erro na tela assim -> "Imprimir", só isso, é muito estranho, abaixo tem o código que eu uso, talvez eu esteja esquecendo de fazer algo. 

OBS: Se eu alterar o Objeto para o do QuickReport e retirar o parametro "FastFile", funciona.

      CTE_DACTE.FastFile           := 'D:\Componentes\acbr\Exemplos\ACBrCTe\Delphi\Report\DACTE.fr3';
      CTE_DACTE.PathPDF            := 'D:\';
      CTE_DACTE.ExpandirLogoMarca  := False;
      CTE_DACTE.ImprimirDescPorc   := False;
      CTE_DACTE.ImprimirHoraSaida  := True;
      CTE_DACTE.ImprimirHoraSaida_Hora := DateToStr(Date);
      CTE_DACTE.MostrarPreview := true;
      CTE_DACTE.Sistema := 'AT';
      CTE_DACTE.TipoDACTE := tiRetrato;

      ACBrCTe.EventoCTe.Evento.Clear;
      ACBrCTe.EventoCTe.LerXMLFromString(inXML);
      ACBrCTe.ImprimirEvento;
Link para o comentário
Compartilhar em outros sites

  • Este tópico foi criado há 3603 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Crie uma conta ou entre para comentar

Você precisar ser um membro para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar Agora
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.