fernando_vip Postado Janeiro 22, 2007 Denunciar Share Postado Janeiro 22, 2007 Bom dia,Estou fazendo um programinha para cadastro de vendas com cartões de crédito e iniciei o relatório, contudo qd dou F9 ele dá um erro e me diz que não consegue achar o arqui .dcu do mesmo, alguém pode me ajudar, eis o código:Do form relatório:unit Unt_Rel;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, QuickRpt, QRCtrls, DB, DBTables, ExtCtrls;type TFrm_Rel = class(TForm) QuickRep1: TQuickRep; Table1: TTable; QRLabel1: TQRLabel; private { Private declarations } public { Public declarations } end;var Frm_Rel: TFrm_Rel;implementation{$R *.dfm}end.Do projeto:program SCVC;uses Forms, Unt_Entrada in 'Unt_Entrada.pas' {Frm_Entrada}, Unt_Sobre in 'Unt_Sobre.pas' {Frm_sobre}, Unt_Visa in 'Unt_Visa.pas' {Frm_Visa}, Unt_Master in 'Unt_Master.pas' {Frm_Master}, Unt_American in 'Unt_American.pas' {Frm_American}, Unt_Cadastro in 'Unt_Cadastro.pas' {Frm_Cadastro}, Unt_Relatorio in 'Unt_Relatorio.pas' {QR_Cadastro}, Unit1 in '..\Arquivos de programas\Borland\Delphi6\Projects\Unit1.pas' {Frame1: TFrame}, Unt_Rel in 'Unt_Rel.pas' {Frm_Rel};{$R *.res}begin Application.Initialize; Application.CreateForm(TFrm_Entrada, Frm_Entrada); Application.CreateForm(TFrm_sobre, Frm_sobre); Application.CreateForm(TFrm_Visa, Frm_Visa); Application.CreateForm(TFrm_Master, Frm_Master); Application.CreateForm(TFrm_American, Frm_American); Application.CreateForm(TFrm_Cadastro, Frm_Cadastro); Application.CreateForm(TQR_Cadastro, QR_Cadastro); Application.CreateForm(TFrm_Rel, Frm_Rel); Application.Run;end. Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 Churc Postado Janeiro 22, 2007 Denunciar Share Postado Janeiro 22, 2007 opamas qual arquivo .dcu ele não consegue encontrar?Seja mais específico se possível coloque as mensagensde erro que aparece, esse erro não tem haver com seucódigo e sim com alguma unit dele, ou de um componenteque não está presente...abraço Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 fernando_vip Postado Janeiro 22, 2007 Autor Denunciar Share Postado Janeiro 22, 2007 Olá,Eis os erros:[Fatal Error] Unt_Entrada.pas(46): File not found: 'Unt_Relatorio.dcu'[Pascal Error] Unt_Entrada.pas(1): Unable to invoke Code Parameters due to errors in source code Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 fernando_vip Postado Janeiro 22, 2007 Autor Denunciar Share Postado Janeiro 22, 2007 Olá,Obrigado pela ajuda, mas eu consegui resolver sosinho.brigadu Citar Link para o comentário Compartilhar em outros sites More sharing options...
Pergunta
fernando_vip
Bom dia,
Estou fazendo um programinha para cadastro de vendas com cartões de crédito e iniciei o relatório, contudo qd dou F9 ele dá um erro e me diz que não consegue achar o arqui .dcu do mesmo, alguém pode me ajudar, eis o código:
Do form relatório:
unit Unt_Rel;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, QuickRpt, QRCtrls, DB, DBTables, ExtCtrls;
type
TFrm_Rel = class(TForm)
QuickRep1: TQuickRep;
Table1: TTable;
QRLabel1: TQRLabel;
private
{ Private declarations }
public
{ Public declarations }
end;
var
Frm_Rel: TFrm_Rel;
implementation
{$R *.dfm}
end.
Do projeto:
program SCVC;
uses
Forms,
Unt_Entrada in 'Unt_Entrada.pas' {Frm_Entrada},
Unt_Sobre in 'Unt_Sobre.pas' {Frm_sobre},
Unt_Visa in 'Unt_Visa.pas' {Frm_Visa},
Unt_Master in 'Unt_Master.pas' {Frm_Master},
Unt_American in 'Unt_American.pas' {Frm_American},
Unt_Cadastro in 'Unt_Cadastro.pas' {Frm_Cadastro},
Unt_Relatorio in 'Unt_Relatorio.pas' {QR_Cadastro},
Unit1 in '..\Arquivos de programas\Borland\Delphi6\Projects\Unit1.pas' {Frame1: TFrame},
Unt_Rel in 'Unt_Rel.pas' {Frm_Rel};
{$R *.res}
begin
Application.Initialize;
Application.CreateForm(TFrm_Entrada, Frm_Entrada);
Application.CreateForm(TFrm_sobre, Frm_sobre);
Application.CreateForm(TFrm_Visa, Frm_Visa);
Application.CreateForm(TFrm_Master, Frm_Master);
Application.CreateForm(TFrm_American, Frm_American);
Application.CreateForm(TFrm_Cadastro, Frm_Cadastro);
Application.CreateForm(TQR_Cadastro, QR_Cadastro);
Application.CreateForm(TFrm_Rel, Frm_Rel);
Application.Run;
end.
Link para o comentário
Compartilhar em outros sites
3 respostass a esta questão
Posts Recomendados
Participe da discussão
Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.